Minggu, 08 November 2015

Delphi - Copy, Rename dan Delete File

Sebelum mencoba kode di bawah, buatlah file dengan nama CobaCopy.txt di drive D.

Kode untuk copy file :
CopyFile(pchar(‘D:\CobaCopy.txt’),PChar(‘E:\HasilCopy.txt '),true);
kode di atas akan menyalin file D:\CobaCopy.txt ke E:\HasilCopy.txt

Kode untuk rename File :
renamefile(‘D:\CobaCopy.txt’,’D:\HasilRename.txt’);

Kode di atas akan mengganti nama file CobaCopy.txt menjadi HasilRename.txt

Kode untuk delete File :
deletefile('D:\HasilRename.txt');
Kode di atas akan menghapus file D:\HasilRename.txt

Semoga bermanfaat.

Search