Правила форума
RemoveDr.PASLanguage:
Русский
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.
::
::
::
