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

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

Чтение байтов из файла [D7]


Страницы:   1 2

8ung ©   (2004-08-31 11:26:00) 

Как читать байты из файла, сохраняя их последоватьльность?
Например:
В файле первые четыре байта - $08 $58 $49 $FC
При счтитывании этих четырех байт возвращается $FC495808(так ка и должно быть), а мне нужно, чтобы возвращалось $085849FC.


8ung   (2004-08-31 11:47:00) [21]

var
 buffer : integer^;
 fil : integer;
begin
   GetMem(buffer, 4);
   fil := FileOpen(Edit1.Text, OF_READ);
   FileRead(fil, buffer^, 4);
   FileClose(fil);
   FreeMem(buffer, 4);


8ung   (2004-08-31 11:46:00) [22]

var
 buffer : integer^;
begin
   GetMem(buffer, 4);
   fil := FileOpen(Edit1.Text, OF_READ);
   FileRead(fil, buffer^, 4);
   FileClose(fil);
   FreeMem(buffer, 4);


Reindeer Moss Eater   (2004-08-31 11:43:00) [23]

Читаешь в интегер - значит и пиши из него.


8ung   (2004-08-31 11:42:00) [24]

Я читаю в ^integer.
Читать их в PByteArray/byte - тоже не выход, потом по одно му склеивать придется.


Reindeer Moss Eater   (2004-08-31 11:29:00) [25]

Читать надо так же как и пишешь, тогда все будет сохраняться.


Ega23   (2004-08-31 11:29:00) [26]

Скорее всего ты читаешь их как Integer. Читай как byte/


MU   (2004-08-31 11:29:00) [27]

как, куда, откуда читаете?


MetalFan   (2004-08-31 11:28:00) [28]

а как ты читаешь?


Страницы:   1 2

Наверх

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