Hi all, I'm trying to use blockread/write to speed up a very inefficient unit
I wrote some time ago.
>From the documentation (
http://www.freepascal.org/docs-html/ref/refsu75.html#x159-16500013.3 ) it does
not seem that I can be sure that "Count" records are read using blockread.
Since my data should be read to a buffer I would like to do something like:
count := MAX_BUFFER_SIZE;
reached_index := 1;
repeat
begin
blockread(fout, (pointer to buffer[reached_index]), count, actual_count);
dec(count, actual_count);
inc(reached_index, actual_count);
end;
until ((count = 0) or (err <> 0));
Where I'm not sure how to semantically write (pointer to
buffer[reached_index]). Any ideas?
Best regards Preben
_______________________________________________
fpc-pascal maillist - [EMAIL PROTECTED]
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
