README.md

Description

GetDir will return the current directory for a specified drive.

More Info

0=default, 1=a, 2=b, 3=c

Submitted On
By	N/A
Level	Beginner
User Rating	5.0 (10 globes from 2 users)
Compatibility	Delphi 5, Delphi 4, Pre Delphi 4
Category	Files/ File Controls/ Input/ Output
World	Delphi
Archive File

Source Code

procedure TForm1.Button1Click(Sender: TObject);
var S : String;
begin
  GetDir(0, S);
  Label1.Caption := 'The current drive and directory are: ' + S;
end;