Innerhalb einer procedure/function kannst du mit
Exit rausspringen.
Beispiel:
Delphi-Quellcode:
procedure Irgendwas(Schalter : Boolean);
begin
showmessage('innerhalb der procedure');
if Schalter then
begin
showmessage('Schalter = true');
Exit;
end;
showmessage('Schalter = false');
end;