procedure TForm1.Button1Click(Sender: TObject); begin if FileExists(Edit1.Text) then ShowMessage('File already exists!') else ShowMessage('This file is unique'); end;
Delphi books recommended by Amazon.com
More Delphi programming books on Amazon.com
Copyright © 1998-2013 Greatis Software