Вниз
Скачать: 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 вся ветка

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



Память: 0.46 MB
Время: 0.018 c
15-1183624547
Magedon
2007-07-05 12:35
2007.08.05
Виста с её системой безопастности.


2-1183796262
Kolan
2007-07-07 12:17
2007.08.05
Логика дин. добавления пунктов меню.


15-1183981766
Pashok
2007-07-09 15:49
2007.08.05
заблокирован DVD привод (Lite-on DVDRW SHM-165 P6S)


2-1184074625
WebSQLNeederr
2007-07-10 17:37
2007.08.05
Ламерский вопрос - как перейти на следующую итерацию цикла?


15-1184129215
Ольга
2007-07-11 08:46
2007.08.05
Библиотека компонентов EhLib




   Наверх