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

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

Буфер чтения для ReadFile [D5, WinXP]

Kemuri ©   (2007-11-03 04:18:00) 

Задача: считать файл в память с помощью ReadFile.
В SDK на ф-ию ReadFile дано такое описание:
BOOL ReadFile(
HANDLE hFile, // handle of file to read
LPVOID lpBuffer, // address of buffer that receives data  
DWORD nNumberOfBytesToRead, // number of bytes to read
LPDWORD lpNumberOfBytesRead, // address of number of bytes read
LPOVERLAPPED lpOverlapped // address of structure for data
);
Смотрим 2й пораметр - адрес буфера для получения данных. Но в Windows.pas он описан как Var Buffer, т е использовать указатель, полученый при помощи GlobalAlloc нельзя. И, казалось бы, логичейкий подход
FileHandle:= CreateFile(.....
FileSize:= GetFileSize(FileHandle....
MemH:= GlobalAlloc(FileSize....
MemPointer:= GlobalLock(MemH.....
ReadFile(FileHandle, MemPointer, FileSize....
не работает :(
Есть ли способ обойти это (не используя циклическое чтение в локальную переменную)?

---

Kemuri   (2007-11-03 19:43:00) [1]

Спасибо!

---

Reindeer Moss Eater   (2007-11-03 09:09:00) [2]

var P : Pointer;
begin
....
ReadFile(AFile,ANumberToRead,P ^,ANumberReaded,nil);

---

Наверх