Also ich habe das Befehl end; reingeschrieben aber trotzdem stoppt es.Schreiben sie mal wie sie es sich das vorstellen.
Delphi-Quellcode:
procedure TForm1.ffnen1Click(Sender: TObject);
begin
if dlgOpen.Execute then
end;
begin
(* Hier das, was mit den Dateinamen geschehen soll *)
end;
end.
oder korrigieren sie mal dieses code komplett