Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Для новичков > Запись в html файл

Автор: zhefran 2.10.2007, 16:47

мне надо записывать результаты в html файл. как єто можно сделать?
Покатит ли:

Код


 fName := CurrntDir+'\log.html';
                AssignFile(f, fName);
                Append(f);  
                writeln(f, datetostr(date)+' '+timetostr(time)+': все работает');
                CloseFile(f);

+ теги или нет?
если возможно, то покажите на примере! smile

Автор: Alexeis 2.10.2007, 17:02

HTML файл это обычный текстовый файл. В него можно писать также как в любой файл, лишь бы то что записывается соответствовало стандарту HTML.

Автор: Негодяй 2.10.2007, 17:06

Покатит и с тегами:

Код


var f:textfile;
begin
AssignFile(f, 'a.html');
                Append(f);
                writeln(f, '<b>ura!<b>');
                CloseFile(f);
end;

Автор: zhefran 2.10.2007, 18:28

как добавлять запись в предпоследнюю строку?

Автор: BaD_SeCt0R 2.10.2007, 19:09

Нужно с конца файла искать символ перехода (#13), а затем с следующий такой символ. Все, что между этими символами - твоя строка.

PS можно искать и с начала

Автор: Alexeis 2.10.2007, 20:12

Цитата(zhefran @ 2.10.2007, 18:28

)

как добавлять запись в предпоследнюю строку?

Вооот началось. Либо паскаль либо делфи smile

. Если делать как это принято в делфи, то строки нужно добавлять в StingList, у него есть метод SaveToFile Для сохранения и методы add для добавления в конец, insert для вставки в нужную позицию, а также возможность объединения таких StingList ов.

Автор: zhefran 3.10.2007, 09:04

Спасибо, я разобрался

Код


begin
f:= TStringList.Create();
f.LoadFromFile('d:\a.html');// Çàãðóæàþ ôàéë
f.Insert(f.Count-1,'<tr><td>9:00</td><td>event</td></tr>');
f.SaveToFile('d:\a.html');
f.Free;
end;