Problem beim Abbrechen-Button von TOpenDialog

[Sharky]

Da fehlt ein Begin - End Block!

Delphi-Quellcode:

procedure TForm1.dateioeffnen1Click(Sender: TObject);
begin
 with fileLoad1 do begin
  Filter := 'Mp3-Files(*.mp3)|*.mp3|Wav-Files(*.wav)|*.wav|MIDI-Files(*.mid)|*.mid';
 end;
  if fileLoad1.Execute then
  BEGIN  <------
   mediaplayer1.FileName := fileLoad1.FileName;
   Panel1.Caption := mediaplayer1.FileName;
   mediaplayer1.open;
   mediaplayer1.Play;
   Timer1.Enabled := True;
  END;  <-------
end;