Главная страница
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-86652
Alcogol
2003-01-08 08:44
2003.01.27
Использование TIBTable..


14-87069
Gunzzz
2003-01-07 21:58
2003.01.27
Nero


3-86680
DC2
2003-01-08 19:54
2003.01.27
Подскажите как сделать поле с числом десятичных знаков больше 4 (


1-86835
Hooch
2003-01-19 11:31
2003.01.27
Восстановление MS SQL БД из лога


3-86621
BlackTiger
2003-01-06 15:47
2003.01.27
Как бы поймать