Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Вниз

Одна обработка для кучи кнопок 


T2   (2001-12-16 07:23) [0]

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



MBo   (2001-12-16 07:56) [1]

связываешь onclick всех кнопок с одним обработчиком (в инспекторе или программно)

procedure tform1.button1click(Sender:TObject);
begin
if sender is tbutton then // это необязательно
numstring:=numstring+tbutton(sender).caption;
end;




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.036 c
1-22072           Гарик                 2001-12-19 11:08  2002.01.08  
Как создать экземпляр потомка TFrame динамически


1-22236           T2                    2001-12-16 07:10  2002.01.08  
serial.vxd


1-22245           T2                    2001-12-16 07:12  2002.01.08  
Gost & best crypt


14-22364          Merlin                2001-11-06 00:22  2002.01.08  
Если не спасете, то так и пропадет!


3-21938           gordon                2001-12-04 18:19  2002.01.08  
Как настроить работу IB5 c Win2000 Server