Подскажите, как узнать из какой процедуры была вызванна процедура

← →
Nikoss © (2002-08-06 00:10) [0]

Подскажите, как узнать из какой процедуры была вызванна данная процедура.
Пример:

Proc1;
begin
...
Proc3;
end;

Proc2;
begin
...
Proc3;
end;

Proc3;
begin
...
end;

Как узнать из процедуры Proc3 c какой именно процедуры она была вызвана

← →
ION T © (2002-08-06 00:28) [1]

Ну, прочитай в стеке адрес возврата, составь список диапазонов функций (учитывая то, что они компилируются в том же порядке, в котором объявлены) и проверь к какой из них этот адрес принадлежит....ну это если асм знаешь....а не знаешь, так передавай в вызываемую функцию какой-нить уникальный для каждой ф-ции идентификатор....

А лучше сделай у каждой ф-ии параметр Sender, который будет определять какая ф-я вызвала её.

Подскажите, как узнать из какой процедуры была вызванна процедура Найти похожие ветки