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

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

Stream.Write


ANTPro ©   (2006-11-21 00:37:00) 


Var
ID:Cardinal;
...

// пишу в файл

ID := $00454249;
fStream.Write(ID, 4); //Почему идет запись наоборот?
//В файле будет записанно: 49 42 45 00

...
//читаю это из файла…

fStream.Read(ID, 4);
if(ID <> $49424500)) then //Здесь будет True, почему?
...


Vga   (2006-11-21 17:58:00) [1]

> // пишу в файл
>
> ID := $00454249;
> fStream.Write(ID, 4);//Почему идет запись наоборот?
> //В файле будет записанно: 49 42 45 00

Потому что Intel использует кодировку Little Endian.

> fStream.Read(ID, 4);
> if (ID <> $49424500)) then//Здесь будет True, почему?

Естественно, что записано, то и считается, а $00454249<>$49424500


Galkov   (2006-11-21 17:29:00) [2]


> > [1] thaddy   (21.11.06 01:14)
>
> Запись и чтение в разных процедурах... (разными fStream)

Чаво :roll:


ANTPro   (2006-11-21 17:10:00) [3]

> [0] ANTPro ©   (21.11.06 00:37)
> fStream.Read(ID, 4);
> if (ID <> $49424500)) then//Здесь будет True, почему?

Тупой вопрос... ночью надо спать :)


> [1] thaddy   (21.11.06 01:14)

Запись и чтение в разных процедурах... (разными fStream)


> [2] Боб   (21.11.06 07:53)
> в памяти байты расположены начиная с младшего, т.е. 49 42
> 45 00.

Это единственное объяснение пока...


Боб   (2006-11-21 07:53:00) [4]

2 ANTPro
Я думаю так :
в памяти байты расположены начиная с младшего, т.е. 49 42 45 00.
В таком же порядке они пишутся в файл и в таком же читаются из файла.
поэтому после чтения  ID <> $49424500 а должно быть
как раз   ID = $00454249.


thaddy   (2006-11-21 01:14:00) [5]

This may be a studid answer, but...
fStream.pos := fStream.pos -4;//??before you read back.

;) It's a stream!

And it works. You know that, you're too good to forget.


Наверх

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