The type declarations would look something like this:

type
TISC_PRINT_CALLBACK=procedure (P1:Pointer;P2:Short;P3:PChar); cdecl;
TISC_VERSION_CALLBACK=procedure (P1:Pointer;P2:PChar); cdecl;
TISC_EVENT_CALLBACK=procedure (P1:Pointer;P2:Word;P3:PByte); cdecl;
TISC_BLOB_GET_SEGMENT=function (Hnd:Pointer;Buffer:PByte;BufSize:Word;var
ResultLen:Word):SmallInt; cdecl;

procedure PrintCallback(P1:Pointer;P2:Short;P3:PChar); cdecl;
begin
...
end;

procedure VersionCallback(P1:Pointer;P2:PChar); cdecl;
begin
...
end;

procedure EventCallback(P1:Pointer;P2:Short;P3:PByte); cdecl;
begin
...
end;

function BLOBGetSegment(Hnd:Pointer;Buffer:PByte;BufSize:Word;var
ResultLen:Word):SmallInt; cdecl;
begin
...
end;


Does anybody know if these callbacks are properly documented anywhere,
including the methods with which they are used. I've only found some kind of
description of ISC_EVENT_CALLBACK or rather isc_que_events.

/Svend

________________________________

From: firebird-support@yahoogroups.com
[mailto:firebird-support@yahoogroups.com] On Behalf Of said bounderra
Sent: 29. december 2007 16:20
To: firebird-support@yahoogroups.com
Subject: [firebird-support] Code in C to Object Pascal



Hello all
I have a small problem in how to interpret the C Code
concerning the Callback function into the object
pascal
this will help me to write component to delphi C
buiilder
the functions are :

typedef void (*ISC_PRINT_CALLBACK) (void*, ISC_SHORT,
const char*);
typedef void (*ISC_VERSION_CALLBACK)(void*, const
char*);
typedef void (*ISC_EVENT_CALLBACK)(void*, ISC_USHORT,
const ISC_UCHAR*);

short (*blob_get_segment)
(void* hnd, ISC_UCHAR* buffer, ISC_USHORT buf_size,
ISC_USHORT* result_len);

thnks

__________________________________________________________
Ne gardez plus qu'une seule adresse mail ! Copiez vos mails vers Yahoo! Mail
http://mail.yahoo.fr <http://mail.yahoo.fr>