Setfattr.PAS

Language:
Русский
English

   {Setfattr.PAS}
  ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀
  {Sample code for the SetFAttr procedure.}

  uses WinDos;

  var
    F: file;
  begin
    Assign(F, 'C:\AUTOEXEC.BAT');
    SetFAttr(F, faHidden); { Uh-oh }
    Readln;
    SetFAttr(F, faArchive); { Whew! }
  end.

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