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

Вниз

Прошу прощения, по ошибке закрыл ветку "Использование MakeMethod"   Найти похожие ветки 

 
Игорь Шевченко ©   (2009-11-03 15:28) [0]

Вот ее текст
stas © (03.11.09 15:03) [0]

При обращении к параметрам внутри функции выходит ошибка Runtime 216.
Что я делаю не так?

Вот присваеваю функцию:
Form.OnMessage:=TOnMessage(MakeMethod( nil,@msg));

Вот сама функция:
function msg (var Msg: TMsg; var Rslt: Integer ): Boolean; stdcall;
begin
if Msg.message<>WM_DEVICECHANGE then
begin

end;
Result:=false;
end;

stas © (03.11.09 15:16) [1]

использую KOL.


 
Jon ©   (2009-11-03 15:38) [1]


> function msg (var Msg: TMsg; var Rslt: Integer): Boolean; stdcall;


function msg(Dummy: Pointer; var Msg: tagMSG; var Rslt: Integer): Boolean;


 
Jon ©   (2009-11-03 15:41) [2]


> > function msg (var Msg: TMsg; var Rslt: Integer): Boolean; stdcall;
>
>
> function msg(Dummy: Pointer; var Msg: tagMSG; var Rslt: Integer): Boolean;
>


> function amsg(Dummy: Pointer; var Msg: tagMSG; var Rslt: Integer): Boolean;


 
stas ©   (2009-11-03 15:44) [3]

Спасибо!



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

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

Наверх




Память: 0.47 MB
Время: 0.006 c
2-1387265285
aka
2013-12-17 11:28
2015.01.18
Что быстрее будет работать?


15-1402829721
Юрий Зотов
2014-06-15 14:55
2015.01.18
Диск накрылся - чем лечить?


15-1402753733
Override Func
2014-06-14 17:48
2015.01.18
Пересечение прямоугольника и окружности


15-1403123402
Юрий
2014-06-19 00:30
2015.01.18
С днем рождения ! 19 июня 2014 четверг


15-1402311626
KilkennyCat
2014-06-09 15:00
2015.01.18
Delphi + Asterisk