Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Вниз

C -> Pascal: указатель на функцию внутри структуры 


N   (2001-12-20 10:04) [0]

Здравствуйте.
Есть структура на C++, в которой находится указатель на callback-функцию. Вопрос: как это сделать на Delphi? Спасибо.

typedef LONG (*PPACallbackPtr)(LONG cmd, LONG arg, LPSTR str);
typedef struct {
// Пропущено
PPACallbackPtr ControlFunction;
} PPARecord;

--------------------------------------------------

PPACallbackPtr = ???;

PPARecord = record
ControlFunction: PPACallbackPtr;
end;



Внук   (2001-12-20 10:58) [1]

type

PPACallbackPtr=function(cmd,arg:LongInt;str:PChar):LongInt;

PPARecord=record
// Пропущено
ControlFunction:PPACallbackPtr;
end;




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.021 c
3-21915           KAA                   2001-12-04 10:28  2002.01.08  
Обнуление переменной MSSQL2000


1-22000           Striker               2001-12-13 07:59  2002.01.08  
Перенос данных в ячейку листа Excel


1-22251           Dreamer               2001-12-17 14:17  2002.01.08  
Подскажите начсет TLIST


3-21931           SklifF                2001-12-04 15:59  2002.01.08  
Что это за ошибка? Capability not suppoted


4-22506           gluka                 2001-11-06 00:16  2002.01.08  
Как запихнуть *.dll-ку в ехе файл?