Xailer & OZ Software

Hola a todos:
************************************************************ **************
Tengo este código en Visual Basic que deseo convertir a Xharbour/Xailer
' Estructura nueva (Generica)
Public Type registro_CURPG
curp As String * 19
archivokey As String * 256
archivocer As String * 256
password As String * 256
End Type
Global CURPSG(0 To 4) As registro_CURPG
***************** termina codigo visual basic ***************
Codigo Xharbour/Xailer
// FIRMADO DE PEDIMENTOS
#include "Xailer.ch"
#include "CStruct.ch" // required for "typedef struct"
#include "Wintypes.ch" // required Windows C data types
#define DC_CALL_STD 0x0020 // calling convention for DllCall()
pragma pack(4) // all Windows API structures
// are 4 byte aligned
CLASS TForm1 FROM TForm
COMPONENT oFIRMA
METHOD CreateForm()
METHOD FIRMAClick( oSender )
METHOD FormInitialize( oSender )
ENDCLASS
#include "Form1.xfm"
// Aqui defino la Estructura Creo que esta bien ?
typedef struct _registro_CURPG {;
char curp[19];
char archivokey[256];
char archivocer[256];
char password[256]; <= password el editor lo deja en azul
} registro_CURPG, *pregistro_CURPG; // no se porque ?
METHOD FIRMAClick( oSender ) CLASS TForm1
local archivo,oFea,archivokey,archivocer,clave ,tipo,err,h1
archivo:="E:SISTEMASXAILERFIRMAFEAM3950011.329"
archivokey:="E:SISTEMASXAILERFIRMAFEABEJA6309182B8_0806241241.KEY "
archivocer:="E:SISTEMASXAILERFIRMAFEABEJA6309182B8.CER"
clave:="123456789"
tipo:=0
oFEA:=(struct resgistro_CURPG) // creo objeto estructura
************************************************************
Pero esto no se como se traduce un array de tipo estructura:
Codigo Visual Basic a Xharbour
Global CURPSG(0 To 4) As registro_CURPG
***********************************************************
Si Alguien Sabe.
Gracias...