Result := CallWindowProc(FOldWindowProc, Application.Handle, Msg,wParam,lParam);
и вот такая ошибка в lazarus'е:
Error: identifier idents no member "Handle"
Посмотрел в Forms в LCL там у Application и правда нет Handle, что с ним можно сделать? )
lazarus ругается на Application.Handle из delphi-кода
Модератор: Модераторы
lazarus ругается на Application.Handle из delphi-кода
вот такая строчка в pas-файле из-под delphi:
Result := CallWindowProc(FOldWindowProc, Application.Handle, Msg,wParam,lParam);
и вот такая ошибка в lazarus'е:
Error: identifier idents no member "Handle"
Посмотрел в Forms в LCL там у Application и правда нет Handle, что с ним можно сделать? )
Result := CallWindowProc(FOldWindowProc, Application.Handle, Msg,wParam,lParam);
и вот такая ошибка в lazarus'е:
Error: identifier idents no member "Handle"
Посмотрел в Forms в LCL там у Application и правда нет Handle, что с ним можно сделать? )
Может использовать:
Код: Выделить всё
Application.Mainform.Handle
спасибо, сработало