как правильно подключить функцию на Delphi робит на c++ нет ((
HWND FHwnd;
LONG_PTR OldWndProc;
в создании формы
FHwnd = Fmx::Platform::Win::WindowHandleToPlatform(Handle)->Wnd;
OldWndProc = GetWindowLongPtr(FHwnd, GWL_WNDPROC);
SetWindowLongPtr(FHwnd, GWL_WNDPROC, LONG_PTR(MyWndProc));
LRESULT __stdcall MyWndProc(HWND Hwnd,UINT Msg, WPARAM WParam,LPARAM LParam)
{
if (Msg == WM_MOVE) {
ShowMessage("Тест") ;
}
return CallWindowProc(OldWndProc,Hwnd, Msg, WParam, LParam); /////// ошибка E2034 Cannot convert 'long' to 'long (__stdcall *)(HWND__ *,unsigned int,unsigned int,long)'
}