![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Чтение байтов из файла [D7]
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]а как ты читаешь?