Opendialog-Fehler wegen zweiter Form?

[marabu]

Herzlich willkommen in der Delphi-PRAXiS, Moondryl.

Unabhängig von Vista, D2007 und dem CoolTrayIcon - was du mit TOpenDialog machst, scheint nicht das zu sein, was du erreichen möchtest. Wenn du die internen Meldungen des TOpenDialog unterliegenden common dialog nicht sehen willst, dann darfst du die beiden Flags ofPathMustExist und ofFileMustExist nicht setzen:

Delphi-Quellcode:

const
  CUSTOM_MSG = '"%s" doesn''t live here anymore';

procedure TDemoForm.OpenButtonClick(Sender: TObject);
begin
  with OpenDialog do
    if Execute then
      if FileExists(FileName)
        then DoProcessFile(FileName)
        else ShowMessage(Format(CUSTOM_MSG, [FileName]));
end;

Freundliche Grüße