home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / BI4.ZIP / DRIVES.PAS next >
Encoding:
Pascal/Delphi Source File  |  1993-02-23  |  315 b   |  16 lines
  1. {
  2.   This code shows how to find information about which drives
  3.   exist on the system. It returns the information without
  4.   ever causing an error message to appear on screen.
  5.   See WDrive.Pas for a Windows example.
  6. }
  7. program Drives;
  8. uses
  9.   GetDrive,
  10.   Crt;
  11.  
  12. begin
  13.   ClrScr;
  14.   GetDrives;
  15.   ReadLn;
  16. end.