Чтение данных
DillerXX © (2005-11-16 23:57:00)
У меня возникла проблема: есть функция
Function InternetReadFile(hFile: HFILE; lpBuffer: LPDWORD;
dwNumberOfBytesToRead: DWORD;
lpdwNumberOfBytesRead: LPDWORD): Boolean; stdcall; external
'WinINet.dll';
Если её вызвать, то в переменные
lpBufferи
lpdwNumberOfBytesReadвозвратят поинтеры на данные. Как мне
прочитать получаемый файл, просто я забыл как работать с
указателями :(
Джо (2005-11-17 00:18:00) [1]
Например:
const
READ_BUF_SIZE = 4096;
var
FBuffer: array [0..READ_BUF_SIZE] of Char;
BytesRead: Cardinal;
...
while
InternetReadFile(FHandle,@FBuffer,Length(FBuffer),BytesRead) and
(BytesRead <> 0) do
begin
// Очередная порция данных находится в
массиве FBuffer
// размер этой порции хранится в
переменной BytesRead
end;
Надеюсь, без опечаток -- набирал прям здесь.
Наверх 
ЧАТ |
Орешник |
|
