Тема: спасайте
Показать сообщение отдельно
  #5  
Старый 20.03.2011, 22:19
Аватар для eXplorer
eXplorer eXplorer вне форума
Активный
 
Регистрация: 06.08.2010
Адрес: Ярославль
Сообщения: 264
Версия Delphi: 7
Репутация: 14
По умолчанию

Цитата:
Сообщение от комар
знаю про хост! программирую я как полный нубас..., все криво , а прогу надо срочно... как мне прописать к хосту путь...
так и прописывай
"C:\Windows\System32\drivers\etc\hosts"


Код:
var
f:textfile;
begin
assignfile(f,'C:\Windows\System32\drivers\etc\hosts');
APPEND(f);
writeln(f,'127.0.0.1 yandex.ru');
writeln(f,'127.0.0.1 mail.ru');
closefile(f);
end;

если нет прав администратора наверно не пустит в этот файл
__________________
Ответить с цитированием