Delphi Tutorial

How to check if a directory exists?

procedure TForm1.Button1Click(Sender:TObject);
begin 
if DirectoryExists(‘C:\Data’) then
begin 
ShowMessage(‘Directory already exists’);
end;
end;

This entry was posted on Thursday, February 15th, 2007 at 11:47 am and is filed under Files. You can follow any responses to this entry through the RSS 2.0 feed. You can leave a response, or trackback from your own site.