Текущий архив: 2004.08.29;
Скачать: CL | DM;
Вниз
Кнопки, созданные во время выполнения приложения Найти похожие ветки
← →
Случайно забежавший (2004-08-11 19:42) [0]Здрасьте:-) Есть динамический массив (TButton), из которого потом я создаю кнопочки Button[0], Button[1] и т.д. Как словить OnClick этих кнопок? Спасибо...
← →
_student (2004-08-11 19:49) [1]При создании
Button[i].OnClick:=MyClick;
← →
Алхимик © (2004-08-11 19:51) [2]
procedure TForm.MyClick(Sender: TObject);
begin
ShowMessage("Обязуюсь прочитать правила задавания вопросов"+#13+
http://www.rsdn.ru/Info/Howtoask.xml);
end;
далееwith TButton(Button[0]) do
OnClick := MyClick;
← →
Случайно забежавший (2004-08-11 19:55) [3]А какое имя дать процедуре, которая будет обрабатывать OnClick?
← →
Случайно забежавший (2004-08-11 19:56) [4]Простите, долго писал, пропустил ответ...
← →
Случайно забежавший (2004-08-11 20:08) [5]Огромное всем спасибо, сегодня весь день мучался, ничего не получалось, теперь все ок.
ShowMessage("На самом деле обязуюсь прочитать правила задавания вопросов"+#13+"http://www.rsdn.ru/Info/Howtoask.xml"); - ковычки забыл :о)
← →
Алхимик © (2004-08-11 20:55) [6]Это модная фича которой кавычки не требуются :)
Страницы: 1 вся ветка
Текущий архив: 2004.08.29;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.036 c
