Hi!
Ich hätte da mal eine Frage (wer hätt's gedacht)...
Ich habe mir eine Prozedur "Error" geschrieben:
Delphi-Quellcode:
procedure Error(msg: String);
begin
MessageDlg(msg,mterror,[mbOk],0);
end;
Die wird immer dann aufgerufen, wenn ein schwerwiegender Fehler aufgetreten ist, sodass die Prozedur verlassen werden soll, in der der Fehler auftrat.
Momentan sieht das dann bspw. so aus:
Delphi-Quellcode:
if not IsSthSelected(Listbox1) then
begin
Error('Sie müssen das Bild mindestens einem Gebäude zuordnen');
exit;
end;
Bedeutend schöner fände ich es jetzt allerdings, wenn die Error-Prozedur auch dieses Exit gleich mit veranlassen könnte. Geht das irgendwie?
Ciao Frederic