Procedure / Function sauber beenden

[DelTurbo]

Hi,

wie kann ich einer procedure bzw. funktion "sagen" das sie immer am ende rauslaufen soll. Egal ob mitten drin eine exception oder sonstwas passiert ist.

Im moment ist das bei mir so.

Delphi-Quellcode:

procedure xy;
begin
   // mach ganz viel
   // und nochmehr
   // hier passiert was und er springt raus 
   procedureende:=True; //<-- hier kommt er dann nie hin
end;

Danke im voraus