home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / 1991 / 06 / leser / shelltst.pas < prev   
Encoding:
Pascal/Delphi Source File  |  1991-04-10  |  621 b   |  16 lines
  1. (* ------------------------------------------------------ *)
  2. (*                    SHELLTST.PAS                        *)
  3. (*          Demoprogramm zur Unit SHELLTST.PAS            *)
  4. (*          (c) 1991 Gunnar Blumert & TOOLBOX             *)
  5. (* ------------------------------------------------------ *)
  6. {$A+,B-,D-,E-,F-,I-,L-,N-,O-,R-,S-,V-}
  7. {$M 1024,4096,4096}
  8. USES Shell;
  9. BEGIN
  10.   WriteLn('Jetzt wird die Shell gestartet!');
  11.   DosShell;
  12.   WriteLn('Hier ist wieder ShellTst!')
  13. END.
  14. (* ------------------------------------------------------ *)
  15. (*               Ende von SHELLTST.PAS                    *)
  16.