1. Delphi K.Top 討論區
  2. 難以歸類主題的討論區(Delphi)
  3. 請問如何把這一小段Delphi的Code改成BCB?
線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數：889
推到 Plurk!
推到 Facebook!

請問如何把這一小段Delphi的Code改成BCB?
尚未結案
sky6733
一般會員


發表：2
回覆：1
積分：0
註冊：2004-09-09

發送簡訊給我
#1 引用回覆 回覆 發表時間：2004-10-20 16:10:11 IP:211.20.xxx.xxx 未訂閱
小弟不會Delphi.... 不知如何把下面一小段 class="code"> type TSockProc = function (s: TSocket; var Buf; len, flags: Integer): Integer; stdcall; PJmpCode = ^TJmpCode; TJmpCode = packed record JmpCode: BYTE; Address: TSockProc; MovEAX: Array [0..2] of BYTE; end; procedure HookAPI; procedure UnHookAPI; var OldSend, OldRecv: TSockProc; JmpCode: TJmpCode; OldProc: array [0..1] of TJmpCode; AddSend, AddRecv: pointer; TmpJmp: TJmpCode;
Zard
尊榮會員


發表：24
回覆：396
積分：539
註冊：2003-11-26

發送簡訊給我
#2 引用回覆 回覆 發表時間：2004-10-20 21:22:20 IP:61.64.xxx.xxx 未訂閱
引言: 小弟不會Delphi.... 不知如何把下面一小段 class="code"> type TSockProc = function (s: TSocket; var Buf; len, flags: Integer): Integer; stdcall; PJmpCode = ^TJmpCode; TJmpCode = packed record JmpCode: BYTE; Address: TSockProc; MovEAX: Array [0..2] of BYTE; end; procedure HookAPI; procedure UnHookAPI; var OldSend, OldRecv: TSockProc; JmpCode: TJmpCode; OldProc: array [0..1] of TJmpCode; AddSend, AddRecv: pointer; TmpJmp: TJmpCode; 
      int (WINAPI *TSockProc)(int s, void* Buf, int len, flags);      typedef struct _TJmpCode
  {
    BYTE JmpCode;
    TSockProc Address;
    BYTE MovEAX[3];
  }TJmpCode, *PJmpCode;
  
  void HookAPI();
  void UnHookAPI();      TSockProc OldSend, OldRecv;      
  TJmpCode JmpCode;
  TJmpCode OldProc[2];
  void* AddSend;
  void* AddRecv;        
  TJmpCode TmpJmp;
sky6733
一般會員


發表：2
回覆：1
積分：0
註冊：2004-09-09

發送簡訊給我
#3 引用回覆 回覆 發表時間：2004-10-21 09:24:26 IP:211.20.xxx.xxx 未訂閱
引言:
引言: 
type
  TSockProc = function (s: TSocket; var Buf; len, flags: Integer): Integer; stdcall;      PJmpCode = ^TJmpCode;
  TJmpCode = packed record
    JmpCode: BYTE;
    Address: TSockProc;
    MovEAX: Array [0..2] of BYTE;
  end;      procedure HookAPI;
  procedure UnHookAPI;    var
  OldSend, OldRecv: TSockProc;      
  JmpCode: TJmpCode;
  OldProc: array [0..1] of TJmpCode;
  AddSend, AddRecv: pointer;        
  TmpJmp: TJmpCode;

  int (WINAPI *TSockProc)(int s, void* Buf, int len, flags);      typedef struct _TJmpCode
  {
    BYTE JmpCode;
    TSockProc Address;
    BYTE MovEAX[3];
  }TJmpCode, *PJmpCode;
  
  void HookAPI();
  void UnHookAPI();      TSockProc OldSend, OldRecv;      
  TJmpCode JmpCode;
  TJmpCode OldProc[2];
  void* AddSend;
  void* AddRecv;        
  TJmpCode TmpJmp;
終於有人幫我了 之前貼在BCB相同的版都沒人回 感謝Zard大大~~謝謝你
系統時間：2025-02-26 5:29:36
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！
5151線上健康照護網 | 台灣西醫網 | 台灣中醫網 | 台灣牙科網 | 台灣照護網 | 趴趴狗旅遊網
大花蓮旅遊網 | 大花蓮民宿網 | 花蓮旅遊網 | 花蓮旅遊 | 花蓮旅遊 | 花蓮住宿
花蓮民宿網 | 花蓮旅遊 | 花蓮住宿 | 花蓮民宿 | 花蓮旅遊 | 花蓮民宿
花蓮住宿 | 大南投旅遊網 | 大南投民宿網 | 日月潭風景區 | 日月潭旅遊網 | 日月潭民宿網
日月潭住宿網 | 宜蘭旅遊網 | 宜蘭民宿網 | 宜蘭住宿網 | 宜蘭旅遊網 | 宜蘭民宿網
宜蘭住宿網 | 宜蘭旅遊網 | 宜蘭民宿網 | 宜蘭住宿網 | 台東旅遊網 | 台東民宿網
台東住宿網 | 台東旅遊網 | 台東民宿網 | 台東住宿網 | 台東旅遊 | 台東民宿
台東住宿 | 綠島旅遊網 | 綠島民宿網 | 綠島住宿網 | 綠島旅遊網 | 綠島民宿網
綠島住宿網 | 綠島旅遊網 | 綠島民宿網 | 綠島住宿網 | 集集旅遊網 | 集集民宿網
集集住宿網 | 關子嶺旅遊網 | 關子嶺民宿網 | 白河旅遊網 | 白河民宿網 | 心脈大師
尊榮牙醫診所 |