Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.11.06;
Скачать: CL | DM;

Вниз

Перевод курсора на новую строку   Найти похожие ветки 

 
STEEL ©   (2005-10-16 15:31) [0]

Есть такая вот процедура
procedure TForm1.LogFileStream(s, filename: string);
begin
with TFileStream.Create(filename,fmOpenWrite+fmShareDenyNone) do
//
try
// Position :=
Seek(0, soFromEnd);

write(pointer(s)^,length(s));
finally
free;
end;
end;

необходимо при каждом обращении дописывать инфу в конец файла, в новую строку.
Пробовал добавлять \n , без результатно


 
Lamer@fools.ua ©   (2005-10-16 17:16) [1]

Добавляйте #13#10.

write(pointer(s)^,length(s));
Write(#13#10, 2);



Страницы: 1 вся ветка

Текущий архив: 2005.11.06;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.044 c
14-1129639182
vecna
2005-10-18 16:39
2005.11.06
может кто-нить сталкивался и лечил такой косяк:


1-1128978861
Ricks
2005-10-11 01:14
2005.11.06
Рисование поверхностей (желательно OpenGL)


1-1129207393
Квэнди
2005-10-13 16:43
2005.11.06
Цвета в StringGrid


2-1128957774
Tonich
2005-10-10 19:22
2005.11.06
IdFTPServer


1-1129182020
pmi1
2005-10-13 09:40
2005.11.06
Изменям Edit, при этом картинка не портится