Текущий архив: 2003.06.09;
Скачать: CL | DM;
Вниз
запись в файл Найти похожие ветки
← →
baracuda (2003-05-28 15:06) [0]Добрый день. Помогите решить проблему записи в конец файла из переменной s1 типа string;
Пишет независимо от значения переменной 3 символа
что нужно поправить?
Заранее благодарен.
stream1:=TFilestream.Create(name_file,fmOpenWrite);
stream1.seek(0,sofromend);
stream1.writebuffer(s1,sizeof(s1));
FlushFileBuffers(stream1.Handle);
stream1.Free;
← →
Skier © (2003-05-28 15:08) [1]Посказка : sizeof(s1)) = 4 байта
← →
MBo © (2003-05-28 15:08) [2]stream1.writebuffer(s1[1],Length(s1));
перед этим лучше записать длину строки
← →
Александр из Минска © (2003-05-28 15:10) [3]Если всю переменную, то:
var
f : TextFile;
begin
AssignFile(f, "1.txt");
Append(f); //Открывает файл 1.тхт для записи в конец файла...
WriteLn(f, s1);
CloseFile(f);
end;
Страницы: 1 вся ветка
Текущий архив: 2003.06.09;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.018 c
