Запись числа в файл

← →
Хазей (2004-06-16 20:59) [0]

Добрый день!
Я имею
var f1:TFileStream,
inst:integer,str1:string;

f1.WriteBuffer("([ontologypeople_Instance_",26);
str1:=inttostr(1);
f1.Write(str1,1);

В файле получается вместо числа левый символ.

← →
Хазей (2004-06-16 21:25) [1]

очень нужно узнать

← →
YurikGL © (2004-06-16 21:27) [2]

str1:="1";

← →
Adder © (2004-06-16 21:29) [3]

f1.Write(str1[1],1);

← →
YurikGL © (2004-06-16 21:30) [4]

> YurikGL © (16.06.04 21:27) [2]

Чушь сказал, сорри.

str1:Shortstring;

← →
YurikGL © (2004-06-16 21:31) [5]

> Хазей (16.06.04 21:25) [1]

Он у тебя записал первый байт указателя адреса начала строки

← →
Хазей (2004-06-16 21:31) [6]

Adder,
пример показательный,str1 может пинимать разные значения

← →
Adder © (2004-06-16 21:35) [7]

2 Хазей (16.06.04 21:31) [6]
А проверить?
str1:=inttostr(1332);
f1.Write(str1[1],4);

← →
YurikGL © (2004-06-16 21:39) [8]

А еще можно {$H-} сделать.

← →
Хазей (2004-06-16 21:43) [9]

Запись числа в файл Найти похожие ветки