home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Pascal / MAXONPASCAL2.DMS / in.adf / INCLUDE / keymap.lib < prev    next >
Encoding:
Text File  |  1994-07-25  |  746 b   |  23 lines
  1. {$if not def KEYMAP_LIB_H} CONST KEYMAP_LIB_H=0;
  2.  
  3. { ************************************************************
  4.   ** KickPascal-Include-Datei "keymap.lib" zu Kickstart 3.0 **
  5.   ************************************************************ }
  6.  
  7. {$if not def DEVICES_INPUTEVENT_H;incl "devices/inputevent.h";endif}
  8. {$if not def DEVICES_KEYMAP_H;incl "devices/keymap.h";endif}
  9.  
  10. VAR KeymapBase : Ptr;
  11.  
  12. LIBRARY KeymapBase:
  13.  
  14. { *** Routinen ab V36 / Kickstart Release 2.0 *** }
  15.  
  16. -30 : PROCEDURE SetKeyMapDefault(A0:p_KeyMap);
  17. -36 : FUNCTION  AskKeyMapDefault: p_KeyMap;
  18. -42 : FUNCTION  MapRawKey(A0:p_InputEvent; A1:Str; D1:LongInt; A2:p_KeyMap): Integer;
  19. -48 : FUNCTION  MapANSI(A0:p_InputEvent; A1:Str; D1:LongInt; A2:p_KeyMap): Integer;
  20. END;
  21.  
  22. {$endif}
  23.