...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