Форум: "Основная";
Текущий архив: 2003.06.09;
Скачать: [xml.tar.bz2];
Вниззапись в файл Найти похожие ветки
← →
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;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.008 c