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

можно как-нибудь получить стринговое имя выполняющегося метода?   Найти похожие ветки 

← →
nasty ©   (2004-08-18 18:31) [0]

или нет?

---

← →
Юрий Зотов ©   (2004-08-18 18:45) [1]

Посмотрите Assert

---

← →
Юрий Зотов ©   (2004-08-18 18:46) [2]

Забыл уточнить. Имя метода Assert не даст, а вот имя модуля и номер строки в нем - даст.

---

← →
Rem   (2004-08-18 18:46) [3]

TMyClass = class(TObject)
private
 m_sRunningMethodName: string;
....
 procedure Method1;
 procedure Method2;
....
public
 property RunningMethodName: string read m_sRunningMethodName;
end;

....

procedure TMyClass.Method1;
begin
 m_sRunningMethodName := "TMyClass.Method1";
 try
 ....
 finally
   m_sRunningMethodName := "";
 end;
end;

procedure TMyClass.Method2;
begin
 m_sRunningMethodName := "TMyClass.Method2";
 try
 ....
 finally
   m_sRunningMethodName := "";
 end;
end;

---

← →
Rem   (2004-08-18 18:48) [4]

Забыл добавить :)
Но, по моему, это единственная возможность. (Уже без :))

---

← →
Гаврила ©   (2004-08-18 19:01) [5]

Стринговое имя выполняющегося метода ты и так знаешь.
Видимо речь идет о стринговом имени метода, откуда был вызван текущий метод ?
И далее по стеку

В принципе, возможно, но очень сложно

---

← →
Alex Konshin ©   (2004-08-18 19:11) [6]

Посмотрите Dеbug в JCL.
http://homepages.borland.com/jedi/jcl/

---

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

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



Память: 0.46 MB
Время: 0.02 c