VPF::TFileStream и целые типы - Форум программистов

Seldon

Дата 26.7.2006, 12:13 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 114
Регистрация: 23.12.2005
Где: Minsk

Репутация: нет
Всего: 2

Почему после выполнения такого кода в файле лежат байты FE и FF, а не FF и FE?

Код


const
  W:Word=$FFFE;
var
  FS:TFileStream;
begin
  FS:=TFileStream.Create(FileName,fmCreate);
  try
    FS.Write(W,2);
  finally
    FS.Free
  end;
end.

и этот код возвращает true не тогда, когда первые байты файла FF и FE, а когда FE и FF

Код


var
  FS:TFileStream;
  W:Word;
begin
  FS:=TFileStream.Create(FileName,fmOpenRead or fmShareDenyNone);
  try
    FS.Read(W,2);
    Result:=W=$FFFE
  finally
    FS.Free
  end;
end.

можно ещё написать такой код, и в файле будет DD CC BB AA, т.е. получается, что в памяти байты у Word и Integer (может ещё у кого) идут в обратном порядке, почему?

Код


const
  I:Integer=$AABBCCDD;
var
  FS:TFileStream;
begin
  FS:=TFileStream.Create(FileName,fmCreate);
  try
    FS.Write(I,4);
  finally
    FS.Free
  end;
end.

--------------------

MiBEditor v2.Alpha 10 - Программерский редактор

Romikgy

Дата 26.7.2006, 12:19 (ссылка)

(нет голосов)

Загрузка ...

Любитель-программер

Профиль
Группа: Участник Клуба
Сообщений: 7326
Регистрация: 11.5.2005
Где: Porto Franco Odes sa

Репутация: 26
Всего: 146

потому как в файлах/памяти все данные лежат по байтно , сначало младшие а потом старшие

--------------------

Владение русской орфографией это как владение кунг-фу — истинные мастера не применяют его без надобности.

Snowy

Дата 26.7.2006, 12:20 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 192
Всего: 484

Потому что так они хранятся в памяти.
Так устроен интеловский процессор - хранит байты чисел от младшего к старшему.
Это мы их читаем от старшего к младшему, и в компиляторе так пишем. А для процессора порядок обратный.

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »