Текущий архив: 2002.12.16;
Скачать: CL | DM;

Вниз

ReadFile   Найти похожие ветки 

← →
ctapik-net ©   (2002-12-04 20:16) [0]

Не могу понять почему в этом примере я не могу прочитать 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) [1]

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

---

Страницы: 1 вся ветка

Текущий архив: 2002.12.16;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.013 c