Displaying 1 result from an estimated 1 matches for "streamnumb".
Did you mean:
streamname
2001 Feb 14
1
Problem with seek functions,
...(Buffer: PChar; Size: Longword; var Time: Single): Longword;
var BytesRead, Change: Longword;
begin
BytesRead := 0;
Time := ov_time_tell(vf^);
if Time < 0 then // check against NAN, -INF
Time := 0;
repeat
Change := ov_read(vf^, @Buffer[BytesRead], Size - BytesRead, 0, 2, 1, StreamNumber);
BytesRead := BytesRead + Change;
until (Change = 0) or (BytesRead = Size);
Result := BytesRead;
end;
Windows 98/MSVC++6-Dynamic/Borland Delphi 5.
Matthijs
Only two things are infinite, the universe and human stupidity, and I'm not sure about the former.
Albert Einstein (1879 - 1...