Declare de la Libreria vbisam.DLL

[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

[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 )