Dec 162017
Turbo Pascal functions to determine whether or not a drive uses removeable media. Source included for TP4+. | |||
---|---|---|---|
File Name | File Size | Zip Size | Zip Type |
DRIVES.DOC | 1772 | 401 | deflated |
DRIVES.PAS | 2550 | 768 | deflated |
DRIVES.TPU | 1472 | 646 | deflated |
Download File DRIVES.ZIP Here
Contents of the DRIVES.DOC file
Declaration
function DriveIsRemoveable(Drive : char) : boolean;
Purpose
Returns True if the specified drive uses removeable media.
Comments
Drive should be a letter in the range 'a'..'z' or 'A'..'Z'. If the
drive is invalid DriveIsRemoveable is unpredictable.
DriveIsRemoveable calls DOS function $44, subfunction 8 which is only
available in versions of DOS 3.x or higher.
------------------------------------------------------------------------
Declaration
function DriveIsFixed(Drive : char) : boolean;
Purpose
Returns True if the specified drive uses fixed media.
Comments
Drive should be a letter in the range 'a'..'z' or 'A'..'Z'. If the
drive is invalid DriveIsFixed is unpredictable.
DriveIsFixed calls DOS function $44, subfunction 8 which is only
available in versions of DOS 3.x or higher.
------------------------------------------------------------------------
Declaration
function DriveIsAbsent(Drive : char) : boolean;
Purpose
Returns True if the specified drive is invalid.
Comments
Drive should be a letter in the range 'a'..'z' or 'A'..'Z'. If the
drive is invalid DriveIsAbsent is unpredictable.
DriveIsAbsent calls DOS function $44, subfunction 8 which is only
available in versions of DOS 3.x or higher.
------------------------------------------------------------------------
Declaration
function NumberOfFloppies : integer;
Purpose
Returns the number of floppy drives installed on the system.
Comments
NumberOfFloppies calls ROM BIOS interrupt $11 to determine the
configuration of the system.
December 16, 2017
Add comments