Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Запись числа в файл [D7, WinXP]


Хазей ©   (2004-06-16 20:59:00) 

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

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

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


YurikGL   (2004-06-16 21:56:00) [1]


> Adder ©   (16.06.04 21:45) [10]

Проверил. Записывает, но начиная с байта размера.


Adder   (2004-06-16 21:45:00) [2]

2 YurikGL ©   (16.06.04 21:39) [8] Вы свой совет проверяли?


Хазей   (2004-06-16 21:43:00) [3]

Adder ©,спасибо.
Блин,это похоже на маразм


YurikGL   (2004-06-16 21:39:00) [4]

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


Adder   (2004-06-16 21:35:00) [5]

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


YurikGL   (2004-06-16 21:31:00) [6]


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

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


Хазей   (2004-06-16 21:31:00) [7]

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


YurikGL   (2004-06-16 21:30:00) [8]


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

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

str1:Shortstring;


Adder   (2004-06-16 21:29:00) [9]

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


YurikGL   (2004-06-16 21:27:00) [10]

str1:='1';


Хазей   (2004-06-16 21:25:00) [11]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо