procedure ChDir (Directory: String);
ChDir changes the current directory to Directory, if its argument is a valid parameter to the related operating system's function. Otherwise, a runtime error is caused.
ChDir is a Borland Pascal extension.
program ChDirDemo; var Foo: String (127); begin WriteLn ('Enter directory name to change to:'); ReadLn (Foo); {$I-} { Don't abort the program on error } ChDir (Foo); if IOResult <> 0 then WriteLn ('Cannot change to directory `', Foo, '''.') else WriteLn ('Okay.') end.