編程語法轉換解决方法

編程語法轉換

GUID *guidDev = (GUID*)&GUID_CLASS_COMPORT;
HDEVINFO hDevInfo = INVALID_HANDLE_VALUE;

請問上述 C++ 語法如何轉為 Delphi 呢? Delphi Windows?API
[解决办法]
不容易啊
uses
  ActiveX;

var
  guidDev: TGuid;
  hdevinfo: THandle;
begin
  guidDev:=GUID_CLASS_COMPORT;
  hdevinfo:=INVALID_HANDLE_VALUE;
end;

类似这样子吧！
[解决办法]
var
  guidDev : PGUID;
  hDevInfo : HDEVINFO;
begin
  guidDev := PGUID(@GUID_CLASS_COMPORT);
  hdevinfo:=INVALID_HANDLE_VALUE;
[解决办法]
楼上正解    。

查看更多 下一篇