Hello, Josef! Monday, June 18, 2012, 10:18:57 AM, you wrote:
JK> function STRBLOB(Value: PAnsiChar; Dest: PBlob): PBlob; cdecl JK> The blob record (probably wrong for x64): JK> TISC_BlobGetSegment = function(BlobHandle: PInt; JK> Buffer: PAnsiChar; JK> BufferSize: LongInt; JK> var ResultLength: LongInt): SmallInt; cdecl; no, buffersize: word; // two unsigned bytes, NOT longint. resultlength: word: // the same two unsigned bytes JK> TISC_BlobPutSegment = procedure(BlobHandle: PInt; JK> Buffer: PAnsiChar; JK> BufferLength: SmallInt); cdecl; that's correct. JK> TBlob = record that's correct too -- Dmitry Kuzmenko, www.ib-aid.com
