Öffnen-Fenster

[Daniel G]

Wie oben schon stand:

Der Code gehört in das OnClick - Event des Buttons. OpenPictureDialog1.Execute ist eine Funktion. Wird die beendet, liefert sie einen bool'schen Rückgabewert, je nachdem, ob "OK" (true) oder "Abbrechen" (false) gedrückt wurde.

Das hier

Delphi-Quellcode:

procedure TForm1.ffnen1Click(Sender: TObject);
begin 
if OpenPictureDialog1.Execute then //do sth.
end;

ist also dasselbe wie das:

Delphi-Quellcode:

procedure TForm1.ffnen1Click(Sender: TObject);
var
test: Boolean;
begin
test := OpenPictureDialog1.Execute;
if test then //do sth.
end;

//Edit: Jetzt habe ich mir soviel Mühe gegeben, jetzt wollte ich das auch abschicken.