textshell.inc

来自「一个能够在 Console Mode 下使用的 Shell 类 (1.00 版」· INC 代码 · 共 23 行

const

     SShellFirst      =     54230;
     SShellClosing    =     SShellFirst;
     SShellHelpTitle  =     SShellFirst + 1;
     SBadDirName      =     SShellFirst + 2;
     SCloseHint       =     SShellFirst + 3;
     SHelpHint        =     SShellFirst + 4;
     SDirHint         =     SShellFirst + 5;
     SChDirHint       =     SShellFirst + 6;
     SUnkCommand      =     SShellFirst + 7;
     SException       =     SShellFirst + 8;
     SUnkException    =     SShellFirst + 9;
     SAddError        =     SShellFirst + 10;
     SMultiInstance   =     SShellFirst + 11;
     SNoFile          =     SShellFirst + 12;
     SNoFileExists    =     SShellFirst + 13;
     SCOntinuePrompt  =     SShellFirst + 14;
     STypeHint        =     SShellFirst + 15;
     SDeletePrompt    =     SShellFirst + 16;
     SDelError        =     SShellFirst + 17;
     SDelHint         =     SShellFirst + 18;