createdr.pas

Пример программы для процедуры CreateDir.

Код примера
  {CreateDr.PAS} 
 
  { Пример программы для процедуры CreateDir }
 
  Uses WinDos;
 
  Const Create : PChar = 'C:\NEWDIR';
 
  Begin
  CreateDir(Create);
 WriteLn('Создана директория :', Create);
End.

Скачать createdr.pas