Правила форума
RmDir.PASLanguage:
Русский
English
{RmDir.PAS}
▀▀▀▀▀▀▀▀▀▀▀▀▀
{Sample code for the RmDir procedure.}
uses WinCrt;
begin
{$I-}
{ Get directory name from command line }
RmDir(ParamStr(1));
if IOResult <> 0 then
Writeln('Cannot remove directory')
else
Writeln('directory removed');
end.
::
::
::
