Скачать: CL | DM;

Exports...   Найти похожие ветки 

← →
First_May ©   (2002-11-29 09:26) [0]

Привет всем! Я делаю функцию следующим образом:

procedure ListFactorys(PForm: TFormFounder; cod: integer);
begin
FormFactorys:=TFormFactorys.Create(Application);
with FormFactorys do
begin
ParentForm:=PForm;
Show;
end;
end; exports ListFactorys;

Вопрос такой, можно ли в событии OnCreate узнать имя функции, которая ее создала, то есть ListFactorys?

---

← →
First_May ©   (2002-11-29 12:31) [1]

Кто нибудь может мне помочь в этом вопросе?

---

← →
Skier ©   (2002-11-29 12:33) [2]

>First_May
А зачем ? Что хочешь сделать ?

---

← →
First_May ©   (2002-11-29 16:35) [3]

Просто таких функций у меня очень много и я хотел бы знать, какая функция сделала ту или иную форму...

---

← →
Cobalt ©   (2002-11-30 01:07) [4]

Нельзя, т.к. у функций отсутствует RTTI (кстати, было бы любопытно посмотреть на "пример реализации" такового).
А вообще попробуй ввести глобальную переменную, и при входе в ф-ию записывай туда имя ф-ии, в которую ты вошел.
Подозреваю, что это для отладки?

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.015 c