Estoy bloqueado en el acceso a Datos

[Pedro Amaro]

Estoy intentando acceder a una tabala de una BD FireBird mediante ODBC, utilizo un TOdbcDataSource como detallo en el ejemplo y creo
WITH OBJECT ::oOdbcData
if !:lConnected
:cConnect :="Driver=Firebird/InterBase(r) driver;"+;
"Dbname=192.168.1.101:c:depositoDbarqueo.fdb;"+;
"CHARSET=NONE;"+;
"PWD=1234;"+;
"UID=ADMIN;"+;
"Client=H:Archivos de programaFirebirdFirebird_2_0binfbclient.dll"
:lConnected := .T.
endif
if :lConnected
::oDataSet := :NewDataSet( "Select DESCRIPCION from CAJAS" )
::oDataSet:OnComplete := {|| ::RellenaList() }
::oDataSet:Open()
endif
END WITH
Hasta aqui todo bien, aparentemente
Pero cuando se me ejeuta el metodo ::RellenaList(), no se como acceder a los registros de la consulta que hay en ::oDataSet, siempre se lo he asignado a un browser, pero necesito acceder directamente por codigo y estoy bloquedo, he rebuscado en los ejemplos y no encuentro una solución.
Saludos
Pedro Amaro
--

[joseluis]

Pedro,
Si el nombre del campo sigue las mismas reglas que para el nombre de una
variable, prueba:
::oDataSet:NombreDelCampo := loquesea
Sino,
::oDataSet:FieldGetByName("NombreDelCampo") := loquesea
o
::oDataSet:FieldGet( nNumeroCampo ) := loquesea
Saludos,
José Luis Capel
PD:
Pedro Amaro escribió:
> Estoy intentando acceder a una tabala de una BD FireBird mediante ODBC,
> utilizo un TOdbcDataSource como detallo en el ejemplo y creo
>
> WITH OBJECT ::oOdbcData
> if !:lConnected
> :cConnect :="Driver=Firebird/InterBase(r) driver;"+;
> "Dbname=192.168.1.101:c:depositoDbarqueo.fdb;"+;
> "CHARSET=NONE;"+;
> "PWD=1234;"+;
> "UID=ADMIN;"+;
> "Client=H:Archivos de
> programaFirebirdFirebird_2_0binfbclient.dll"
> :lConnected := .T.
> endif
> if :lConnected
> ::oDataSet := :NewDataSet( "Select DESCRIPCION from CAJAS" )
> ::oDataSet:OnComplete := {|| ::RellenaList() }
> ::oDataSet:Open()
> endif
> END WITH
> Hasta aqui todo bien, aparentemente
>
> Pero cuando se me ejeuta el metodo ::RellenaList(), no se como acceder a
> los registros de la consulta que hay en ::oDataSet, siempre se lo he
> asignado a un browser, pero necesito acceder directamente por codigo y
> estoy bloquedo, he rebuscado en los ejemplos y no encuentro una solución.
>
> Saludos
> Pedro Amaro

[Pedro Amaro]

Gracias José Luis, estaba mas perdido que un pulpo en un garaje.
Saludos
Pedro Amaro