Exceptions auswerten

[Matze]

Hi,

um evtl. auftretende Exceptions leicht auswerten zu können, bin ich dabei, einen Fehlerreport zu basteln. Damit dieser zuverlässig ist, habe ich mir gedacht, ich weise in jeder Prozedur/Funktion einer globalen Variablen den Namen der Prozedur zu. Doch ist das irgendwie nicht sehr zuverlässig, da bei folgendem Beispiel, die Variable den Namen der falschen Prozedur enthällt:

Delphi-Quellcode:

procedure xyz;
begin
  error_proc_fct := 'xyz';

  Do_something;  // Aufruf einer anderen Peozedur
  
  // Hier ist der Variableninhalt dann 'Do_something' und nicht, wie es sein sollte 'xyz'
  // tritt hier ein Fehler auf, bekomme ich logischerweise die falsche Prozedur übermittelt.
end;

Im Forum habe ich ein paar Threads dazu gefunden, doch sind das noch unzuverlässigere Methoden (Bsp: hier.
Ich möchte weder Madshi noch Eurekalog nutzen. Die Jedis habe ich installiert, falls es da was zuverlässiges gegen sollte.

Was könntet ihr mir da empfehlen?