Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.10.03;
Скачать: CL | DM;

Вниз

Вопрос, может, в корне глупый, но все-таки.   Найти похожие ветки 

 
The   (2002-09-24 13:28) [0]

здравствуйте.

сам не знаю, стоит ли спрашивать, но как-то меня заинтересовал вопрос: а возможно ли узнать название процедуры из тела ее самой?
чтобы долго не объяснять, получится должно приблизительно такое

procedure TForm1.Button1Click(Sender: TObject);
var s: string;
begin
s:=...; //Какой-то метод, который и возвратит "Button1Click"
ShowMessage(s);
end;

есть такая возможность?


 
qube ©   (2002-09-24 13:34) [1]

нет


 
DiamondShark ©   (2002-09-24 13:36) [2]

Ответ, может, в корне глупый, но все-таки.

Чтобы долго не объяснять, получается приблизительно такое

procedure TForm1.Button1Click(Sender: TObject);
var s: string;
begin
s:="TForm1.Button1Click";
ShowMessage(s);
end;


 
qube ©   (2002-09-24 13:38) [3]


> DiamondShark ©

:))


 
The   (2002-09-24 13:42) [4]

каков вопрос, таков ответ ))



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

Текущий архив: 2002.10.03;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.015 c
1-7909
qube
2002-09-19 16:42
2002.10.03
TInterfacedObject и reference counting


3-7798
croco
2002-09-11 12:24
2002.10.03
Открыть базу *.dbf без индекса


1-8017
testpu
2002-09-21 20:47
2002.10.03
Как для свойства типа перечисление отобразить НЕ ВСЕ элементы


3-7785
nevel
2002-09-16 07:19
2002.10.03
pack в программе


7-8196
vasya_dvc
2002-06-07 00:48
2002.10.03
Как