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

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

ReadFile [D7, WinXP]

Svin ©   (2005-10-16 17:43:00) 

Что-то не догоняю не работает такой код

nFileSize:DWORD;
WriteBuffer:PChar;
nBytesRead:Integer;

hFilePC:=CreateFile(PChar(Source),GENERIC_READ,0,nil,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,0);
nFileSize:=GetFileSize(hFilePC,nil);
WriteBuffer:=AllocMem(nFileSize);
ReadFile(hFilePC,WriteBuffer,nFileSize,nBytesRead,nil);
CloseHandle(hFilePC);

отчего так? эксцепшн вылетает.

---

Fay   (2005-10-16 19:23:00) [1]

2 Svin   (16.10.05 17:43)
Почему nFileSize:DWORD, а nBytesRead:Integer?

---

Германн   (2005-10-16 17:58:00) [2]

ReadFile(hFilePC, WriteBuffer^,nFileSize,nBytesRead,nil);

---

Наверх