Скачать: CL | DM;

Подскажите с TNotifyEvent   Найти похожие ветки 

← →
Геннадий ©   (2002-10-16 16:14) [0]

Создаю динамический объекть. Скажем, TButton. Есть моя процедура, скажем, ButClick. Как сделать так, что бы она была обработчиком события OnClick для созданного TButton?

---

← →
Игорь Шевченко ©   (2002-10-16 16:16) [1]

MyButton := TButton.Create(Self)
....
MyButton.OnClick := ButClick

---

← →
Opuhshii ©   (2002-10-16 16:17) [2]

MyObject:=TButton.Create(nil);
MyObject.OnClick:=ButClick;

---

← →
Геннадий ©   (2002-10-16 17:45) [3]

Ага, как же! Он пишет о несовместимости типов!

---

← →
Андрей Прокофьев ©   (2002-10-16 17:47) [4]

Процедура должна быть объявлена
procedure ButClick(Sender : TObject);

---

← →
Zemal ©   (2002-10-16 17:50) [5]

Опять же вопрос, который в любой книге по Делфи пишут в самой первой главе: "Событие приложения не что иное, как ссылка на метод-обработчик, т.е. ссылка на процедуру и функцию, которую в любой момент выполнения программы можно переопределить."
Например: Application.OnTerminate := MyActionOnTerminate;
Почитайте литературу, сударь. Вам явно нехватает знаний, а их можно почерпнуть в литературе и FAQ.

---

← →
MBo ©   (2002-10-16 17:50) [6]

процедура должна быть МЕТОДОМ ОБЪЕКТА!!!

---

← →
Zemal ©   (2002-10-16 17:56) [7]

Да! Процедура должна быть объявлена: procedure ButClick(Sender : TObject);
Т.к. ей передаётся ссылка на вызывающий объект, а чтобы такую ссылку получить, она естественно должна быть МЕТОДОМ ОБЪЕКТА!

---

← →
Zemal ©   (2002-10-16 18:02) [8]

Вообще она может быть объявлена и как метод класса, но небудем вдаваться в подробности :).

---

← →
Игорь Шевченко ©   (2002-10-16 18:08) [9]

Zemal © (16.10.02 17:56)


> Да! Процедура должна быть объявлена: procedure ButClick(Sender
> : TObject);
> Т.к. ей передаётся ссылка на вызывающий объект, а чтобы
> такую ссылку получить, она естественно должна быть МЕТОДОМ
> ОБЪЕКТА!


Неверно

---

← →
Zemal ©   (2002-10-16 18:19) [10]

>>Игорь Шевченко
В чём неверно?

---

← →
MBo ©   (2002-10-16 18:21) [11]

>Zemal
ButClick( Nil )

Методом класса должна быть по соображениям совместимости типов -
обработчик - procedure() of object

---

← →
Zemal ©   (2002-10-16 18:33) [12]

О! Точно! Спасибо! Пора меня к литературе отрпавлять! Спасибо за вскрытие пробела! Пойду домой читать! :)

---

← →
Геннадий ©   (2002-10-16 21:31) [13]

Всем спасибо. Получилось. Только хочу заметить:

> Почитайте литературу, сударь. Вам явно нехватает знаний, а их можно почерпнуть в литературе и FAQ.

Подчерпнуть их можно и на форуме. А если бы мне их хватало, то меня бы здесь не было (и моих вопросов, соотвественно, тоже). А если знаешь немжко больше других, то или помогай, или вообще здесь не появляйся. Твои язвительные замечания здесь не нужны.

---

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

Скачать: CL | DM;



Память: 0.48 MB
Время: 0.011 c