Hello,耽誤您一些時間, 請問以下的Delphi程式碼如果換成BCB應該怎麼寫呢?? (主程式碼和函式宣告的部分)

unit HKProc;    interface    uses
  Windows, Messages;    var
  hNextHookProc: HHook;
  procSaveExit: Pointer;    function KeyboardHookHandler(iCode: Integer;
  wParam: WPARAM;
  lParam: LPARAM): LRESULT; stdcall; export;    implementation    function KeyboardHookHandler(iCode: Integer;
  wParam: WPARAM;
  lParam: LPARAM): LRESULT; stdcall; export;
const
  _KeyPressMask = $80000000;
begin
  Result := 0;
  If iCode < 0 Then
  begin
    Result := CallNextHookEx(hNextHookProc, iCode, wParam, lParam);
    Exit;
  end;
  if ((lParam and _KeyPressMask) = 0) and
    (GetKeyState(vk_Control) < 0) and (wParam = Ord('B')) then
  begin
    Result := 1;
    WinExec('Notepad.exe', sw_Normal);
  end;
end;    end.

站長對BCB不熟,這裡是Delphi專區! 若有網友對BCB熟的幫個忙吧! ～～～Delphi K.Top討論區站長～～～

------
～～～Delphi K.Top討論區站長～～～

很對不起我看不太懂...但是我之前學過， 我的想法是這樣， 設兩個變數、其中一個是point, 變數設定方式： var A:interger; B:point; 然後你自己要設函數的方法有可以，或是用類別也可以， 因為你的程式我看不太懂，所以能幫的忙比較少， 或者你可以找本書看看， C語言學習實務， 或許對你會有幫助。 riverlan