Скачать: 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.02 c