home *** CD-ROM | disk | FTP | other *** search
/ C!T ROM 2 / ctrom_ii_b.zip / ctrom_ii_b / PROGRAM / PASCAL / EDITWIN / KEYDEFS.INC < prev    next >
Text File  |  1991-06-14  |  2KB  |  56 lines

  1. {==============================================================}
  2. {                                                              }
  3. {             Saved as: KEYDEFS.INC                            }
  4. {               Author: Pat Anderson                           }
  5. {        Last modified: Fri 01-31-90                           }
  6. {              Purpose: Define key code values returned        }
  7. {                       by GetKey function as constants        }
  8. {                                                              }
  9. {==============================================================}
  10.  
  11. CONST
  12.   {Control code constants}
  13.   BackSpace = #8; Tab = #9; LineFeed = #10;
  14.   FormFeed = #12; Enter = #13; Esc = #27; Space = #32;
  15.  
  16.   {Constants for character codes returned by GetKey function}
  17.   {Cursor pad constants}
  18.   Home = #199; End_Key = #207; PgUp = #201; PgDn = #209;
  19.   CtlHome = #247; CtlEnd = #245; CtlPgUp = #132; CtlPgDn = #246;
  20.   LeftArrow = #203; RightArrow = #205; UpArrow = #200; DownArrow = #208;
  21.   CtlLeft = #243; CtlRight = #244;
  22.  
  23.   {Insert/delete key constants}
  24.   Ins = #210; Del = #211;
  25.  
  26.   {Function key constants}
  27.   F1 = #187; F2 = #188; F3 = #189; F4 = #190; F5 = #191;
  28.   F6 = #192; F7 = #193; F8 = #194; F9 = #195; F10 = #196;
  29.  
  30.   {Shifted function key constants}
  31.   ShF1 = #212; ShF2 = #213; ShF3 = #214; ShF4 = #215; ShF5 = #216;
  32.   ShF6 = #217; ShF7 = #218; ShF8 = #219; ShF9 = #220; ShF10 = #221;
  33.  
  34.   {Control-function key constants}
  35.   CtlF1 = #222; CtlF2 = #223; CtlF3 = #224; CtlF4 = #225; CtlF5 = #226;
  36.   CtlF6 = #227; CtlF7 = #228; CtlF8 = #229; CtlF9 = #230; CtlF10 = #231;
  37.  
  38.   {Alt-function key constants}
  39.   AltF1 = #232; AltF2 = #233; AltF3 = #234; AltF4 = #235; AltF5 = #236;
  40.   AltF6 = #237; AltF7 = #238; AltF8 = #239; AltF9 = #240; AltF10 = #241;
  41.  
  42.   {Alt-alpha key constants}
  43.   {QWERTUIOP row}
  44.   AltQ = #144; AltW = #145; AltE = #146; AltR = #147; AltT = #148;
  45.   AltY = #149; AltU = #150; AltI = #151; AltO = #152; AltP = #153;
  46.   {ASDFGHJKL row}
  47.   AltA = #158; AltS = #159; AltD = #160; AltF = #161; AltG = #162;
  48.   AltH = #163; AltJ = #164; AltK =  #165; AltL = #166;
  49.   {ZXCVBNM row}
  50.   AltZ = #172; AltX = #173; AltC = #174; AltV = #175; AltB = #176;
  51.   AltN = #177; AltM = #178;
  52.   {1234567890 row}
  53.   Alt1 = #248; Alt2 = #249; Alt3 = #250; Alt4 = #251; Alt5 = #252;
  54.   Alt6 = #253; Alt7 = #254; Alt8 = #255; Alt9 = #128; Alt0 = #129;
  55.  
  56.