#10 DelphiComponent/daveWriteBytes+daveReadBytes

[Anonymous]

after several hangups with the davewritebytes procedure we've found a simple bug in the following line:

FLastError:=daveWriteBytes(DaveConn, AreaCode(Area), DB, Index+Start, Size, Pointer(Integer(Buffer) + Index));

the variable "size" should be "length", otherwise the programm will hang if trying to pass buffers with a size greater than maxPDUsize.

consequently i suppose that the davereadbytes procedure suffers from the same effect (could be the reason for bug# 1706468)

FLastError:=daveReadBytes(DaveConn, AreaCode(Area), DB, Index+Start, Size, Pointer(Integer(Buffer) + Index));

kindly
rené paris