GetDir

Vrací aktuální adresář určené diskové jednotky.

Deklarace

procedure GetDir(D: Byte; var S: String);

kde D je:

0	Aktuální jednotka
1	Mechanika A
2	Mechanika B
3	Disk C

atd.

Režim

Windows, Reálný, Chráněný

Poznámky

Neprovádí žádnou kontrolu chyb. Jestliže jednotka určená parametrem D je neplatná, S vrátí X:\, jako by šlo o hlavní adresář této neplatné jednotky.

GetCurDir vykonává stejnou funkci jako GetDir, ale místo řetězce pascalského stylu používá jako argument nulou zakončené řetězce.

Viz také

ChDir

MkDir

RmDir

Vzorový příklad

{GetDir.PAS}
{Vzorový příklad pro proceduru GetDir.}
{ Pro Windows: }
{ uses WinCrt; }
 var
   s : String;
 begin
   GetDir(0,s); { 0 = aktuálni disk }
   Writeln('Aktuální disk a adresář: ', s);
 end.