Node:MkDir, Next:mod, Previous:MinReal, Up:Reference
procedure MkDir (Directory: String);
MkDir
creates the given Directory, if its argument is a
valid parameter to the related operating system's function.
Otherwise a runtime error is caused.
MkDir
is a Borland Pascal extension.
program MkDirDemo; var Foo: String (127); begin WriteLn ('Enter directory name to create:'); ReadLn (Foo); {$I-} { Don't abort program on error } MkDir (Foo); if IOResult <> 0 then WriteLn ('Directory `', Foo, ''' could not be created') else WriteLn ('Okay') end.