Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
if openDialog1.execute then
begin
if FileExists(OpenDialog1.FileName) then
ShowMessage('File vorhanden')
else
ShowMessage('File nicht vorhanden');
end;
end;
Wenn der OpenDialog offen ist, dann kannst Du in das FileName(DateiName)
einen Dateinamen eingeben der nicht existiert.
Dann kommst Du in den else Zweig, kannst also auch eine neue Datei anlegen.
Aber etwas komisch ist das Verhalten schon, das würde ich nie von einem Programm erwarten.
Grüße
Klaus