Главная страница
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.02 c
15-1183614347
Qzzma
2007-07-05 09:45
2007.08.05
Книги по Delphi Pascal для "девушек"


1-1180095491
Dmitry_177
2007-05-25 16:18
2007.08.05
Цикл в отдельном потоке


15-1181944148
Kostafey
2007-06-16 01:49
2007.08.05
Спасибо Вам за то что Вы есть !


15-1183630966
Jeer
2007-07-05 14:22
2007.08.05
AK-47 60 лет.


15-1183920981
Dimka Maslov
2007-07-08 22:56
2007.08.05
не едут лыжи