Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - Prüfen, wer Procedure startet


Metschu - Mi 23.12.09 17:34
Titel: Prüfen, wer Procedure startet
Nabends zusammen!

Ich stehe ein wenig auf dem Schlauch und weiß nicht mehr, nach welchen begriffen ich noch suchen soll.

Würde gerne Feststellen, ob "Procedure A" von "Procedure B" oder "Procedure C" aufgerufen wurde.

Frei nach dem Motto "IF Sender = Procedure B then ..."

Bekomme das Ganze derzeit über ne Variablen hin (Procedure B setzt Status auf 1, C auf 2, etc...), würde das ganze aber gerne Eleganter lösen.

Mir reicht schon der Tip, wonach ich suchen soll

Danke schonmal.

Gruß

Torsten.


Gausi - Mi 23.12.09 17:41

Warum erweiterst du die Prozedur A nicht um einen weiteren Parameter, der je nach aufrufender Prozedur anders gesetzt wird?


BenBE - Mi 23.12.09 18:46

Gausi's Variante ist die beste Variante und vor allem auch die einfachste.

Mit etwas mehr Aufwand kann man durchaus den Aufrufer herausbekommen, das erfordert aber etwas Ahnung von der Programmausführung.


Metschu - Mi 23.12.09 20:11

Ok, danke für die Hilfe.

Dachte es gäbe eine Sipmle Variante über "Sender", aber so gehts auch.

Gruß

Torsten


Gausi - Mi 23.12.09 20:26

Wenn du den Parameter "Sender" nennst, geht das genauso. :mrgreen: