Delphi & Pascal (česká wiki)
/****************************************************************************** * * * Subor KEY.H * * * *****************************************************************************/ #define F1 0x3b00 #define F2 0x3c00 #define F3 0x3d00 #define F4 0x3e00 #define F5 0x3f00 #define F6 0x4000 #define F7 0x4100 #define F8 0x4200 #define F9 0x4300 #define F10 0x4400 #define UP 0x4800 #define DOWN 0x5000 #define LEFT 0x4b00 #define RIGHT 0x4d00 #define PGUP 0x4900 #define PGDOWN 0x5100 #define HOME 0x4700 #define END 0x4f00 #define ESC 27 #define ENTER 13 #define DEL 0x5300 #define INS 0x5200 #define TAB 0x09 #define BKSPC 0x08 #define CTRLPGUP 0x8400 #define CTRLPGDOWN 0x7600 unsigned int key(void); void tlac_cas(void); /*----------------------------------END-------------------------------------*/