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

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

Уважаемые знатоки, подскажите по массивам - [D7, XP]


Ulyana ©   (2010-06-29 17:30:00) 

Переделываю чужую программу, в которой есть запись в файл, следующего вида -
Lowest_Address, Highest_Address : Cardinal;
Memory_Block  : PByte;
type PByte = ^byte;

BlockWrite(Filout,PByte(Cardinal(Memory_Block)+Cardinal(Lowest_Address))^,Highest_Address - Lowest_Address +1);

Каким образом переделать, чтобы вместо записи в файл происходило копирование в массив HexBuf , объявленный как array of byte?
Заранее благодарна!


Deltas   (2010-06-29 17:38:00) [1]

Заменить
BlockWrite()
на
Move(PByte(Cardinal(Memory_Block)+Cardinal(Lowest_Address))^, HexBuf[0], Highest_Address - Lowest_Address +1);


Наверх

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