Page 1 of 1

Declare de la Libreria vbisam.DLL

Posted: Fri Aug 14, 2015 6:47 pm
by Ismach
Sres
Tengo que acceder a archivos tipo vbisam (vbisam de TinyCobol u OpenCobol) a traves de una dll vbisam.dll
dicho archivo esta indexado y sabiendo que la funcion se definio asi

Code: Select all

extern int	isopen (const char *pcfilename, int imode);
extern int	isread (int ihandle, char *pcrow, int imode);
extern int	iswrite (int ihandle, char *pcrow);
extern int	isbegin (void);
extern int	isclose (int ihandle);
extern int	isdelete (int ihandle, char *pcrow);
como seria el declare de la funcion en Harbour? yo puse asi pero me saltan 800 errores...

Code: Select all

DECLARE DLL_TYPE_INT isopen(DLL_TYPE_LPCSTR cFileName, DLL_TYPE_INT nNome ) asi esta bien para isopen()?
en realidad la libreria tiene mas 30 funciones pero con poder saber usar estas funciones me sentiria en el paraiso

Re: Declare de la Libreria vbisam.DLL

Posted: Sat Aug 15, 2015 10:48 pm
by srvet_claudio
Ver en la doc: C:/hmg.3.4.1/DOC/data/HMG_CallDLL.htm
ej.
nValue := HMG_CallDLL ( "vbisam.dll", HB_DYN_CTYPE_INT, "isopen", cFilename, nMode )