Наши проекты:
Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту |
||
ПРАВИЛА | FAQ | Помощь | Поиск | Участники | Календарь | Избранное | RSS |
[3.145.60.149] |
|
Сообщ.
#1
,
|
|
|
Есть метод у формы (или хотя бы просто функция).
function TForm1.MyFunction(Command: integer; Param: Pointer): boolean; begin //... end; type FTMyFunction = function(Command: integer; Param: Pointer): boolean; var MyFunctionVar: FTMyFunction; |
Сообщ.
#2
,
|
|
|
Присвоить. А чтобы можно было присваивать методы класса напиши так
type FTMyFunction = function(Command: integer; Param: Pointer): boolean of object; MyFunctionVar := MyFunction; |
Сообщ.
#3
,
|
|
|
О! Пасиба!
Я про "of object" не знал |