Rücksprungadresse ermitteln

[sx2008]

Ich habe folgende Methode und möchte gerne die Rücksprungadresse wissen, damit der Debugger genau an der richtigen Stelle
anhält.

Delphi-Quellcode:

procedure TKlasseXY.SetError(const errormessage:string);
var
  addr : Pointer;
begin
  addr := ?;
  raise Exception.CreateFmt('Fehler in KlasseXY: %s', [errormessage]) at addr;
end;

Zusatzfrage:
Ich habe folgende Zeile im Sourcecode von Delphi 2007 gesehen:
  raise ETestFailure.Create(ModMsg) at CallerAddr; Kann das sein, dass CallerAddr durch den Compiler zur Verfügung gestellt wird?
Und falls ja, aber welcher Version gibt es das?