Open Dialog - Abbrechhen Ereignis

[Daniel B]

Hi,

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  if OpenDialog1.Execute then
    ShowMessage('Öffnen geklickt')
  else
    ShowMessage('Abbrechen geklickt');
end;