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

Вниз

События   Найти похожие ветки 

 
Lexa   (2003-01-13 00:06) [0]

Подскажите как назначить событие компоненту созданному програмно


 
Юрий Зотов ©   (2003-01-13 00:13) [1]

http://www.delphikingdom.com/helloworld/runtime_comp.htm


 
Lexa   (2003-01-15 04:17) [2]

а как назначить обработчик события в объявлении класса
Например OnClick


 
Юрий Зотов ©   (2003-01-15 09:26) [3]

Назначить обработчик события в объявлении класса???

Это что-то новое.


 
ЮЮ ©   (2003-01-15 09:28) [4]

Посмотреть код любого компонента


 
Lexa   (2003-01-15 16:34) [5]

Так можно или нельзя?
Неужели мне каждый раз при создании объекта в run-time
нужно указывать

TObject.OnClick:=WhatToDo;


 
gsu ©   (2003-01-15 16:37) [6]

TObject.OnClick ??? TObject ???
если создаешь свой класс, то да
а в D есть инспектор


 
Lexa   (2003-01-16 09:48) [7]

Так как назначить обработчик события объекту созданному програмно?
Например у меня такое объявление

TField=class(TImage)
...................
procedure Separation(Sender:TObject);
end;

Field:=TField.Create(Form1);
Field.OnClick:=Field.Separation;//выдает ошибку несовместимые типы procedure and TNotifyEvent



 
MBo ©   (2003-01-16 09:51) [8]

где описан OnClick?
должно быть procedure() of object

BTW, неприлично заводить тип с именем TField - такой есть в Delphi


 
Юрий Зотов ©   (2003-01-16 11:02) [9]

> Неужели мне каждый раз при создании объекта в run-time
> нужно указывать...

Нет, это можно сделать один раз - в конструкторе объекта. Но не в его объявлении.


 
still ©   (2003-01-16 11:22) [10]

TMyClass = class
private
FOnClick: TNotifyEvent;

public
property OnClick: TNotifyEvent read FOnClick write FOnClick;
end;

TMyAnotherClass = class
procedure MyOnClick(Sender: TObject);
end;
....

myobj := TMyClass.Create;
myanobj := TMyAnotherClass.Create;
myobj.FOnClick := myanobj.MyOnClick;

вот так



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

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

Наверх




Память: 0.48 MB
Время: 0.023 c
3-86698
REA
2003-01-09 11:19
2003.01.27
IBX deadlock


3-86620
mate
2003-01-06 14:07
2003.01.27
DBGrid


3-86668
Anatoliy
2003-01-08 13:16
2003.01.27
Уважаемые мастера. Помогите пожалуйста с ADO+Access.


6-86994
Vlad-Sh
2002-11-29 06:33
2003.01.27
Не могу задать порт источника в TIdUDPClient (Delphi 6)


3-86720
Пентюх
2003-01-07 18:18
2003.01.27
Список активных MS SQL серверов