search

TurboPack / AsyncPro

Async Professional is a comprehensive communications toolkit for Embarcadero Delphi and C++Builder.
101 stars 50 forks source link

64-Bit Version #31

Open CSchildhauer opened 2 years ago

CSchildhauer commented 2 years ago

The serial port would not function in 64-bit. this is caused by the wrong parameters being passed. In AdPort.pas the function ComWindowProc must have the same parameters as "DefWindowProc(hWnd: HWND; Msg: UINT; wParam: WPARAM; lParam: LPARAM): LRESULT; stdcall;" so, replace with "function ComWindowProc(hWindow : TApdHwnd; Msg : UINT; wParam : WPARAM; lParam : LPARAM) : LRESULT; stdcall; export;". There are probably other such instances too... I did not check...

romankassebaum commented 2 years ago

I fixed all places I found.