Browse Source

* hookproc alias, delphi compat

git-svn-id: trunk@5768 -
marco 18 years ago
parent
commit
507da73806
1 changed files with 1 additions and 0 deletions
  1. 1 0
      rtl/win/wininc/redef.inc

+ 1 - 0
rtl/win/wininc/redef.inc

@@ -30,6 +30,7 @@ type
   TFNThreadStartRoutine = FARPROC;
   TFNThreadStartRoutine = FARPROC;
   TFNTimerAPCRoutine    = FARPROC;
   TFNTimerAPCRoutine    = FARPROC;
   TFNFiberStartRoutine  = FARPROC;
   TFNFiberStartRoutine  = FARPROC;
+  TFNHookProc =  HOOKPROC;
 
 
   PObjectTypeList = ^TObjectTypeList;
   PObjectTypeList = ^TObjectTypeList;
   _OBJECT_TYPE_LIST = record
   _OBJECT_TYPE_LIST = record