home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 9 / 09.iso / l / l044 / 2.ddi / TVDEMOS.ZIP / FORMCMDS.PAS < prev    next >
Encoding:
Pascal/Delphi Source File  |  1990-10-23  |  1.1 KB  |  50 lines
  1. {************************************************}
  2. {                                                }
  3. {   Turbo Pascal 6.0                             }
  4. {   Turbo Vision Forms Demo                      }
  5. {   Copyright (c) 1990 by Borland International  }
  6. {                                                }
  7. {************************************************}
  8.  
  9. unit FormCmds;
  10.  
  11. {$D-}
  12.  
  13. interface
  14.  
  15. uses Drivers;
  16.  
  17. const
  18.  
  19.   { Misc UI commands }
  20.   cmAboutBox    = 2000;
  21.   cmChangeDir   = 2001;
  22.   cmVideoMode   = 2002;
  23.   cmDosShell    = 2003;
  24.  
  25.   { List & form-oriented commands }
  26.   { (Cannot be disabled)          }
  27.   cmListOpen    = 3000;
  28.   cmListSave    = 3001;
  29.   cmFormEdit    = 3002;
  30.   cmFormNew     = 3003;
  31.   cmFormSave    = 3004;
  32.   cmFormDel     = 3005;
  33.  
  34.   { Broadcast commands }
  35.   cmTopForm      = 3050;
  36.   cmRegisterForm = 3051;
  37.   cmEditingForm  = 3052;
  38.   cmCanCloseForm = 3053;
  39.   cmCloseForm    = 3054;
  40.   cmTopList      = 3055;
  41.   cmEditingFile  = 3056;
  42.  
  43.   { History list IDs }
  44.   hlChangeDir   = 1;
  45.   hlOpenListDlg = 2;
  46.  
  47. implementation
  48.  
  49. end.
  50.