Hallo Skiron,
vielen Dank für Deine Antwort.
Jetzt habe ich vergessen oben zu posten,
dass ich gerne eine Beispielcode dazu hätte.
Klar ich kann einen Zeichenkette Parameter übergeben.
Aber dann muss ICH mir bei jedem Aufruf die Arbeit machen
die Zeichenkette einzugeben.
Das ist jedoch genau das was ich vermeiden will.
Ich hätte gerne eine Möglichkeit das der Aufruf IMMER gleich aussieht.
OHNE extra-Parameter
Delphi bietet so viele Möglichkeiten den Code zu beeinflussen
bzw. Details abzufragen. Da gibt es doch bestimmt auch was
mit dem man die aufrufende procedure aus dem schon vorhandenem
ermitteln kann.
In C habe ich dazu etwas von "Stack-Tracing" gelesen.
Vielleicht muss man ja nur "WISSEN" wie man
Sender.ClassInfo
Sender.MethodName oder was weiß ich
tricky miteinander in einer function GetCallingName verknüpft um zu erreichen dass
Delphi-Quellcode:
procedure ABC;
begin
blabla;
XYZ;
end;
procedure XYZ;
var
CalledFrom : string;
begin
CalledFrom := GetCallingName;
end;
das GetCallingName "ABC" zurückgibt
vielen Dank schon im Voraus für
Code-Vorschläge
viele herzliche Grüße
Stefan