Autor Beitrag
Metschu
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 135

Windows XP SP2 Home
Delphi 7; Delphi XE2-Starter
BeitragVerfasst: Mi 23.12.09 17:34 
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
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 8554
Erhaltene Danke: 481

Windows 7, Windows 10
D7 PE, Delphi XE3 Prof, Delphi 10.3 CE
BeitragVerfasst: 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?

_________________
We are, we were and will not be.
BenBE
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 8721
Erhaltene Danke: 191

Win95, Win98SE, Win2K, WinXP
D1S, D3S, D4S, D5E, D6E, D7E, D9PE, D10E, D12P, DXEP, L0.9\FPC2.0
BeitragVerfasst: 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.

_________________
Anyone who is capable of being elected president should on no account be allowed to do the job.
Ich code EdgeMonkey - In dubio pro Setting.
Metschu Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 135

Windows XP SP2 Home
Delphi 7; Delphi XE2-Starter
BeitragVerfasst: 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
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 8554
Erhaltene Danke: 481

Windows 7, Windows 10
D7 PE, Delphi XE3 Prof, Delphi 10.3 CE
BeitragVerfasst: Mi 23.12.09 20:26 
Wenn du den Parameter "Sender" nennst, geht das genauso. :mrgreen:

_________________
We are, we were and will not be.