Форум: "Основная";
Текущий архив: 2002.04.25;
Скачать: [xml.tar.bz2];
ВнизПроблема с TFileStream Найти похожие ветки
← →
Ivan Kohut (2002-04-14 21:12) [0]Уважаемые Мастера!
У меня возникла проблема с TFileStream
Вот фрагмент кода
var f1,f2:TFileStream;
s:string;
rez:string;
begin
f1:=TFileStream.Create("temp.txt",fmCreate);
setLength(s,10);
s:="1111155645";
f1.WriteBuffer(s,10);
f1.Free;
f2:=TFileStream.Create("temp.txt",fmOpenRead);
SetLength(rez,5);
f2.ReadBuffer(rez,5);
f2.Free;
И после етого rez="1111155645". А должно же быть "11111" ?
Помогите, если знаете где ошибка. Буду очень благодарен.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.04.25;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.006 c