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

Вниз

Про Это.   Найти похожие ветки 

 
Лана Розанова ©   (2002-01-22 14:51) [0]

На форме четыре кнопки. При нажатии какой-либо как узнать на какую именно нажали.


 
NLO ©   (2002-01-22 14:55) [1]

Form1.caption := (Sender as TButton).Name


 
MBo ©   (2002-01-22 14:56) [2]

если всем кнопкам один обработчик присвоен, то в нем
procedure TForm1.Button1Click(Sender: TObject);
begin
label1.caption:=TButton( Sender).name;
или
if Sender=Button1 then...


 
Вячеслав ©   (2002-01-22 18:01) [3]

А еще у компонентов есть свойство Tag-специально для таких целей.
Типа Лонгинт. Его предварительно заполнить надо :), а дальше как советовали, например:
TButton(Sender).Tag;
Из документации:
Tag has no predefined meaning. The Tag property is provided for the convenience of developers. It can be used for storing an additional integer value or it can be typecast to any 32-bit value such as a component reference or a pointer.



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

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

Наверх




Память: 0.47 MB
Время: 0.008 c
14-18983
zarum
2001-12-19 15:43
2002.02.07
(2) выбор домашнего монитора 17 за 340 з.е.


1-18849
well
2002-01-22 13:09
2002.02.07
Вопрос по TTreeViev (TTreeNode)


6-18929
Aleksey2001
2001-11-16 09:17
2002.02.07
Интересует работа в delphi с сетями


3-18745
saviola
2002-01-10 17:03
2002.02.07
Почему не записывает из Table1 в Table2


4-19017
Андрей
2001-08-20 22:08
2002.02.07
Как увеличить и уменшить громкость звука!!!!