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

Вниз

Можно ли создать событие для не визуального класса?   Найти похожие ветки 

 
koha ©   (2007-07-06 17:17) [0]

Можно ли создать событие для не визуального класса?


 
clickmaker ©   (2007-07-06 17:20) [1]

а почему нет?
пример: TStringList.OnChange


 
Stanislav ©   (2007-07-06 17:20) [2]

можно.


 
koha ©   (2007-07-06 17:59) [3]

Может чего подскажете мне нужно создать свое событие в TThread


 
oldman ©   (2007-07-06 18:01) [4]


> Можно ли создать событие для не визуального класса?


Ну... Если они существуют, значит можно.
Я думаю, создаются так-же, как и для визуального класса.


 
Kolan ©   (2007-07-06 18:06) [5]

> Может чего подскажете мне нужно создать свое событие в TThread

TMyThreadEvent = procedure (Sender: TObject; SomeParam: Integer) of object;

TMyThreadWithEvent = class(TThread)
strict private
 FMyThreadEvent: TMyThreadEvent;
public
 property OnMyEvent: TMyThreadEvent read FMyThreadEvent write FMyThreadEvent;
end;


 
Kolan ©   (2007-07-06 18:10) [6]

Пользуемся как обычно:

{&#133}
procedure ThradEvent(Sender: TObject; SomeParam: Integer);// <&#151; это должен быть метод. Например формы.

{&#133}
var
 MyThread: TMyThreadWithEvent;
begin
 MyThread.OnMyEvent := ThradEvent;


 
{RASkov} ©   (2007-07-06 23:05) [7]

События в делфи-классах - это теже самые свойства, только их тип - ссылка на метод.... См [5],[6]...



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

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

Наверх




Память: 0.48 MB
Время: 0.021 c
2-1183965289
Pohil
2007-07-09 11:14
2007.08.05
Перекомпиляция модулей


15-1183958958
JanMihail
2007-07-09 09:29
2007.08.05
Отключить Пик системного динамика при включении ПК


2-1183727842
koha
2007-07-06 17:17
2007.08.05
Можно ли создать событие для не визуального класса?


15-1184135029
malefik
2007-07-11 10:23
2007.08.05
Обработка сообщений в TService + TDataModule


11-1166973414
mixail_shar
2006-12-24 18:16
2007.08.05
MCK