CreateDr.PAS

Language:
Русский
English

  {CreateDr.PAS}
  ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀
 {Sample code for the CreateDir procedure.}

  uses WinCrt, WinDOS;

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

 begin
   CreateDir(Create);
   Writeln('There is now a new directory at ', Create,'.');
 end.

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