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

Вниз

Одна обработка для кучи кнопок   Найти похожие ветки 

 
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;



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

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

Наверх




Память: 0.46 MB
Время: 0.015 c
7-22429
Oleg_swap
2001-09-20 19:13
2002.01.08
удаленный запуск программы


1-22140
Serg5
2001-12-20 10:17
2002.01.08
Вопрос, есть ли возможность уменьшить шрифт до 4 пикселей, менятся он меняется(программа не ругается), а на экран (Canvas.Font) он всё равно выводится 8 (самым минимальным)


4-22456
RedMax
2001-11-01 11:10
2002.01.08
COM объекты NetMeeting


3-21990
SkyR
2001-12-04 03:58
2002.01.08
Проблема с LookUp - полями


4-22473
amamed_3071
2001-11-02 13:46
2002.01.08
Epson Printer commands