🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.os.msdos.programmer
Article #4702

Is B: really A:? How do you tell in TurboPascal?

#4702
From: Tim Holt
Date: Wed, 13 Feb 1991 04:36
23 lines
974 bytes
My current method, using TP 5.5 is like this...

var drive : byte;
drive := 1;

{ Set up dialog and wait for button click... }

if (NextDriveWanted) then begin
   repeat
      drive := drive + 1;
      if (drive > 26) then drive := 1;
   until (DiskFree(drive) <> -1);
   ChDir (Chr(drive)+':');
   { rescan directory and redisplay dialog box }
end;


So, is there any way in TP 5.5 to see if B is really A?

Thanks...
Tim Holt
holtt@jacobs.cs.orst.edu
(503)737-3891
Technical Details
Message-ID: <1991Feb13.043603.27610@lynx.CS.ORST.EDU>
Path: arc1-ca.pugleaf.net!utzoo!mnetor!tmsoft!torsqnt!news-server.csri.toronto.edu!cs.utexas.edu!uunet!ogicse!usenet!jacobs.CS.ORST.EDU!holtt

Show Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!utzoo!mnetor!tmsoft!torsqnt!news-server.csri.toronto.edu!cs.utexas.edu!uunet!ogicse!usenet!jacobs.CS.ORST.EDU!holtt
From: holtt@jacobs.CS.ORST.EDU (Tim Holt)
Newsgroups: comp.os.msdos.programmer
Subject: Is B: really A:?  How do you tell in TurboPascal?
Message-ID: <1991Feb13.043603.27610@lynx.CS.ORST.EDU>
Date: 13 Feb 91 04:36:03 GMT
Sender: holtt@jacobs.cs.orst.edu
Organization: Oregon State University, CS Dept.
Lines: 23
Nntp-Posting-Host: jacobs.cs.orst.edu