Sunday, April 22, 2012

Mengecek ada atau tidaknya sebuat Path dari sebuah Directory

 
uses FileCtrl;


procedure TForm1.Button1Click(Sender: TObject);
begin
  if DirectoryExists('c:\test') then
    ShowMessage('Path Ditemukan!')
    else
    ShowMessage('Path Tidak Ditemukan!');
end;

No comments:

Post a Comment