Hallo,
Ich habe ein Prg in 32 bit unter XE6 programmiert, das gut läuft. Doch wenn ich es für x64bit compilieren will kommt da ein Error:
E2089:
Ungültige Typumwandlung
bei
(TWMDeviceChange(Msg).Event = DBT_DEVNODES_CHANGED)
Delphi-Quellcode:
// gets all the Windows events/messages directly
procedure TJvHidDeviceController.EventPipe(var Msg: TMessage);
begin
// sort out WM_DEVICECHANGE : DBT_DEVNODES_CHANGED
if (Msg.Msg = WM_DEVICECHANGE) and (TWMDeviceChange(Msg).Event = DBT_DEVNODES_CHANGED) then
if not FInDeviceChange then
begin
FLParam := Msg.LParam;
FInDeviceChange := True;
DeviceChange;
FInDeviceChange := False;
end;
Msg.Result := DefWindowProc(FHWnd, Msg.Msg, Msg.wParam, Msg.lParam);
end;
Kann mir jemand mitteilen, wie ich das Problem lösen kann? DANKE