MkDir: Porovnání verzí

Z Delphi & Pascal (česká wiki)
Skočit na navigaci Skočit na vyhledávání
m (1 revízia: Unit System)
 
Řádek 36: Řádek 36:
 
[[Category:System]]
 
[[Category:System]]
 
[[Category:Procedúry System]]
 
[[Category:Procedúry System]]
 +
[[Category:Vstupně/výstupní procedury a funkce]]

Aktuální verze z 5. 10. 2012, 20:51

Vytvoří podadresář.

Deklarace
procedure MkDir(S: String);
Režim
Windows, Reálný, Chráněný
Poznámky
Vytvoří nový podadresář s cestou, určenou řetězcem S. Poslední položka v cestě nesmí být jménem existujícího souboru.
V režimu {$I-} vrátí IOResult 0, jestliže operace byla úspěšná; jinak vrátí nenulový kód chyby. CreateDir provádí stejnou funkci jako MkDir, ale jako argument má namísto řetězce pascalského stylu řetězec ukončený nulovým znakem.
Viz také
ChDir
GetDir
RmDir


Vzorový příklad

{Mkdir.PAS}
{Vzorový příklad pro proceduru MkDir.}
begin
  {$I-}
  { Zjištění jména adresáře z příkazové řádky }
  MkDir(ParamStr(1));
  if IOResult <> 0 then
    Writeln('Adresář nelze vytvořit')
  else
    Writeln('Nový adresář byl vytvořen');
end.