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

Вниз

Указатель на функцию   Найти похожие ветки 

 
Still Swamp   (2003-08-07 18:38) [0]

Возможно ли некую MyObject.myFunction(param:integer):integer представить как указатель на эту функцию

pt:pointer;
pt:=@MyFunction

?


 
Skier ©   (2003-08-07 18:42) [1]

@MyObject.myFunction


 
Serginio594   (2003-08-07 18:51) [2]

Можно только применять надо с TMethod
Type
TMyFunction=Function(param:integer):integer Of Object;
Var V:TMethod;
V.Code:=@MyObject.myFunction
V.Data:=MyObject;
TMyFunction(v)(666);

Так как функции класса нужна ссылка на экземпляр класса (Данные класса)



 
Still Swamp   (2003-08-07 18:53) [3]

для Skier....
компилятор ошибку рисует Variable Require... и он прав!


 
Serginio824   (2003-08-07 18:57) [4]

А лучше
Var V:TMyFunction;
V:=MyObject.myFunction;
v(666);



 
Толик ©   (2003-08-07 19:35) [5]

to Still Swamp (07.08.03 18:53)
да нет, всё правильно:

var
p: pointer;
begin
p := @TMyClass.MyFunction;
end;



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

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

Наверх




Память: 0.47 MB
Время: 0.021 c
3-68156
diokant
2003-07-29 12:46
2003.08.21
Cобытия ComboBox, который находится в DBGrid


3-68178
Alik$
2003-07-28 22:21
2003.08.21
ASCII как можно в таблице базы подсчитать контрольные суммы


1-68376
acsoft
2003-08-07 19:57
2003.08.21
Как программно навести курсор на ссылку в документе, загруженном


1-68310
Lonik
2003-08-08 19:19
2003.08.21
кусок кода


14-68485
Работодатель
2003-07-29 15:18
2003.08.21
А чем мы хуже? У нас тоже появилась вакансия!