01.06.2009, 17:22
|
|
Познающий
Регистрация: 31.05.2009
Сообщений: 68
С нами:
8919750
Репутация:
19
|
|
SeNaP,
Код:
var
f: TextFile;
begin
AssignFile(f, 'имя файла');
try
Append(f);
writeln(f, 'текст для записи');
finally
CloseFile(f);
И да кстати, ты уверен, что тебе нужен файл svhosts(не hosts?).
Получение директории файла hosts:
Код:
Buff: array[1..MAX_PATH] of char;
begin
GetSystemDirectory(@buff, MAX_PATH);
lstrcat(@buff, '\drivers\etc\hosts');
|
|
|