else exit Problem ?

[thomas2009]

Hallo

auf einmal funktioniert mein Programm nicht
alle Programm-Stücke mit "Exit" meldet Delphi eine Fehlermeldung !
Vorher ging aber

beispiel :

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
if Clipboard.HasFormat(CF_BITMAP) then
showMessage('Grafik')
else
exit; // Error
end;

Ich weiß nicht was ich in mein Programm geändert habe, dann auf einmal Fehler überall !
Aber sicher nicht in diesem Bereich wo Delphi Fehler meldet