IPB

> RmDir.PAS
Чат
Форум
Загрузка...
 

Language:
Русский
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.

 
 К началу страницы 
Тэги:
 

Код для вставки: :: :: :: ГОСТ ::
Поделиться: //
 



-
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"