Mail

В этот день много лет назад...
20 апреля. В 1526 году (498 лет назад) - Армия Могола под командованием Babur разбивает Афганскую армию в Битве Panipat, захватив города Дели и Agra.

Turbo Pascal Documentation

Процедура RmDir

     Функция: Удаляет пустой подкаталог.
     Описание: RmDir(s : string)
     Примечания: Параметр s является  выражением  строкового
типа. Удаляется подкаталог с путем доступа, заданным строкой
s. Если путь доступа не существует,  является  непустым  или
если  он  задает  текущий католог, то происходит ошибка вво-
да-вывода.
     При  указании  директивы  компилятора   {I-}   функция
IORеsult будет возвращать значение 0 в том случае, если опе-
рация завершилась успешно, и ненулевой код ошибки в  против-
ном случае.
     Прочее: См. также процедуры MkDir, ChDir, GetDir.
     Пример:

begin
   {I-}
{ получить имя каталога из командной строки }
RmDir(ParamStr(1));
if IOResult <> 0 then
    Writeln('Каталог удалить нельзя');
else
    Writeln('Каталог удален');