CyberMatrix wrote:
> bbs wrote:
> b> Pake DeleteFile, FindFirst, FindNext
>
> Udah,  tapi  koq  selalu  tersisa satu file yang posisinya paling atas
> yach ? Skripnya sebagai berikut :
> 
>  FindFirst(Dir, faArchive, SearchResult);

Rasa-rasanya sih, kesalahannya adalah:

 ArrayFile[a] := ExtractFileName(SearchResult.Name);
 ArrayFile[a] := SearchResult.Name;
 TempFile := ExtractFileName(ArrayFile[b]);

Maaf kalau salah, saya belum pernah pake Delphi, 
cuma nekat aja karena lagi iseng, Sabtu libur.


    milis ini didukung oleh :
 >> http://www.indolinux.com - dunia linux indonesia
 -------------------------------------------------------------------
 untuk berhenti kirim  email  ke  [EMAIL PROTECTED]
 untuk melihat peraturan kirim email  ke  [EMAIL PROTECTED]
 arsip berada di  http://www.mail-archive.com/[email protected]
 

Kirim email ke