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

Вниз

Добавление обработчика события в кнопку Run-Time   Найти похожие ветки 

 
Strate ©   (2006-04-27 22:33) [0]

Привет всем.

Подскажите пжалста, как должна выглядеть процедура, чтобы её можно было подставить в OnClick-свойство кнопки, которую я создаю в Run-Time режиме?

Пишу вот так:

procedure Clicker (sender : TObject);
begin

end;

....

Button.OnClick := Clicker;


Выдаёт ошибку :(


 
Юрий Зотов ©   (2006-04-27 23:46) [1]

Это должен быть метод класса, а не просто процедура.

type
 TForm1 = class(TForm)
 ...
 private
   procedure Clicker (Sender : TObject);
 ...
 end;

procedure TForm1.Clicker (Sender : TObject);
begin
 ...
end;


 
Strate ©   (2006-04-28 00:29) [2]

Юрий Зотов ©   (27.04.06 23:46) [1]

Спасибо!
Тупой вопрос, не правда-ли? :о)


 
Юрий Зотов ©   (2006-04-28 08:13) [3]

> Strate ©   (28.04.06 00:29) [2]

Нормальный вопрос. Тупой вопрос - это такой вопрос, на который невозможно ответить. Например, потому, что его просто невозможно понять (часто из-за того, что автор, желая показать свою якобы крутизну, начинает пользоваться терминологией, в которой он на самом деле не разбирается, а в итоге в его вопросе получается та же самая каша, что и у него в голове).

Или вопрос типа "У меня программа выдает ошибку, в чем дело" (и при этом ни строчки кода). Или вопрос другого типа: "Как написать программу" (как? сесть, да и написать - а как еще их пишут?).

Тут такого добра много было (см. "Орешник"). А у Вас - совершенно нормальный вопрос.



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

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

Наверх




Память: 0.47 MB
Время: 0.05 c
15-1145979840
ArtemESC
2006-04-25 19:44
2006.05.21
Шрифт с английскими транскрипциями...


15-1145951720
Игорь Н
2006-04-25 11:55
2006.05.21
API


15-1145988181
Fenik
2006-04-25 22:03
2006.05.21
Хочу найти песню, хотя бы название и автора.


4-1141325287
NightLord
2006-03-02 21:48
2006.05.21
Вывод на рабочий стол


11-1126879441
rOOse
2005-09-16 18:04
2006.05.21
Меню к панели задач