RemoveDr.PAS

Language:
Русский
English

  {RemoveDr.PAS}
  ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀
 {Sample code for the RemoveDir procedure.}

  uses WinCrt, WinDos;

 const
   Remove: PChar = 'C:\NEWDIR';
   CDrive: Byte = 3;

 begin
   RemoveDir(Remove);
   Writeln('There is no longer a directory at ', Remove,'.');
 end.

Тэги:
| G+
Код для вставки: :: :: :: ::
Поделиться: // //