热血江湖V40006版功能键CALL的调用方法(Delphi2010源码)

procedure TfrmMain.Button2Click(Sender: TObject);
var
Address: Pointer;
begin
Address := Pointer($00618910);  // 功能键call基址
asm
pushad
mov     edx, 0  // F1=0 .... F10=9
push    edx
call    Address
popad
end;
end;