| [ < ] | [ > ] | [ << ] | [ Up ] | [ >> ] | [Top] | [Contents] | [Index] | [ ? ] |
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.
|
section 9.161 MkDir, section 9.234 RmDir