Форум: "Основная";
Поиск по всему сайту: 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.019 c
4-22465           AKV                   2001-11-02 10:44  2002.01.08  
как определить handle окна над которым находится мышь


1-22154           Марина                2001-12-20 15:42  2002.01.08  
Удаление содержимого каталога


3-21905           nic406                2001-11-28 04:21  2002.01.08  
Help! Делаю Select * From T1 -> refresh -> ошибка(ADODataSet)


14-22375          Nemeis                2001-11-07 14:08  2002.01.08  
И опять про Ламеров ;)


1-22259           Крыс                  2001-12-12 17:55  2002.01.08  
Дорисовка кривых (дубль 2)