Files Delphi

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;