...check if a file/directory exists?

Author: Reto Zehnder

Category: Files

uses
 
FileCtrl;
 
procedure TForm1.Button1Click(Sender: TObject);
begin
  if 
FileExists('c:\boot.ini') then
    
ShowMessage('File exists! Datei existiert!');

  if FileExists('c:\windows') then
    
ShowMessage('Directory Exists!');
end;

 

printed from
www.swissdelphicenter.ch
developers knowledge base