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

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

ReadFile

ctapik-net ©   (2002-12-04 20:16:00) 

Не могу понять почему в этом примере я не могу прочитать 512 байт файла

BufferSize := 512 ;
PFileName := PChar(FileName) ;
FileHandle := OpenFile(PFileName,Struct,OF_READ) ;
GetMem(FileBuffer,BufferSize);
If (FileHndle<>HFILE_ERROR)and ReadFile(FileHandle,FileBuffer,BufferSize,ReadBytes,Nil) Then DoSmth...
Else ShowMessage("Ошибка блин") ;
_lClose(FileHandle) ;


---

Набережных С.   (2002-12-04 22:10:00) [1]

ReadFile(FileHandle,FileBuffer^,BufferSize,ReadBytes,Nil)

---

Наверх