//可怜Delphi没有宏定义function MK_FP(seg, ofs: Word): Pointer; far;
begin
Result := Pointer((seg shl 16) or ofs);
end;
(*
//or
function MK_FP(seg, ofs: Word): Longword; far;
begin
Result := (seg shl 16) or ofs;
end;
*)
begin
Result := Pointer((seg shl 16) or ofs);
end;
(*
//or
function MK_FP(seg, ofs: Word): Longword; far;
begin
Result := (seg shl 16) or ofs;
end;
*)
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货