запись в файл с правами админа

[allegator333]

хочу запись в файл hosts из списка (memo) , но это нужно делать с правами админа иначе ошибка, как записать антологичным способом , только что он открывал файл с правами админа???

Вок как я пытался:
procedure TForm1.btn1Click(Sender: TObject);
var F: TextFile; I: Integer;
begin
AssignFile(F,'C:\Windows\System32\d rivers\etc\hosts');
Rewrite(F);
for I := 0 to mmo1.Lines.Count-1 do
WriteLn(F,'127.0.0.1 ',mmo1.Lines[I]);
CloseFile(F);
end;
end.

[romlo]

Если я не ошибаюсь, сама программа права администратора получить не сможет. Зато её можно запустить от имени администратора.
(правой кнопкой мыши по файлу>запуск от имени администратора)

[allegator333]

большое спасибо)))))