Obtener nombre de los Campos a partir de un Array(SOLUCIONAD

Obtener nombre de los Campos a partir de un Array(SOLUCIONAD

Postby Compuin » Sat Apr 24, 2021 2:45 am

Saludos

Estoy llenado un Browse con un Array de la forma siguiente

Code: Select all  Expand view  RUN
   oBrw := TXBrowse():New( oWnd )

    oBrw:SetArray( aData, .T. )

    oBrw:CreateFromCode()


Luego paso los registros a una Funcion para Editar asi,

Code: Select all  Expand view  RUN
ACTION Modificar( aData[oBrw:nArrayAt,1], oBrw )


Y estoy obteniendo los campos de esta manera

Code: Select all  Expand view  RUN

        @ 01, 02 SAY "First"        OF oDlg
        @ 02, 1.5 GET oBrw:aRow[1]   PICTURE "@K" UPDATE OF oDlg

        @ 01, 26.6 SAY "Last"       OF oDlg
        @ 02, 20 GET oBrw:aRow[2]    PICTURE "@K" UPDATE OF oDlg


Pero necesito obtenerlos asi

Code: Select all  Expand view  RUN

       @ 01, 02 SAY "First"        OF oDlg
        @ 02, 1.5 GET oCursor:First   PICTURE "@K" UPDATE OF oDlg

        @ 01, 26.6 SAY "Last"       OF oDlg
        @ 02, 20 GET oCursor:Last    PICTURE "@K" UPDATE OF oDlg


oCursor es el nombre de mi Array

Hay alguna forma de hacer esto?

Gracias de antemano
Last edited by Compuin on Mon Apr 26, 2021 9:14 pm, edited 1 time in total.
FWH 20.12
Hbmk2 32/64 Bits (Build 19.29.30133)
Microsoft Visual C 32 Bits
MySql 8.0.24 32/64 Bits
VS Code
Compuin
 
Posts: 1214
Joined: Tue Dec 28, 2010 1:29 pm
Location: Quebec, Canada

Re: Obtener nombre de los Campos a partir de un Array

Postby AngelSalom » Sun Apr 25, 2021 6:18 pm

Prueba con :

Code: Select all  Expand view  RUN

       @ 01, 02 SAY "First"        OF oDlg
        @ 02, 1.5 GET oCursor:First:Value  PICTURE "@K" UPDATE OF oDlg

        @ 01, 26.6 SAY "Last"       OF oDlg
        @ 02, 20 GET oCursor:Last:Value   PICTURE "@K" UPDATE OF oDlg
 
Angel Salom
Visionwin Software - https://www.visionwin.com
------------------------------------------------------------
fwh 19.05 - harbour 3.2 - bcc 7.4
User avatar
AngelSalom
 
Posts: 727
Joined: Fri Oct 07, 2005 7:38 am
Location: Benicarló (Castellón ) - España

Re: Obtener nombre de los Campos a partir de un Array

Postby Compuin » Sun Apr 25, 2021 6:23 pm

Saludos Angel

Me arroja este error

Error BASE/1004 No exported method: VALUE
FWH 20.12
Hbmk2 32/64 Bits (Build 19.29.30133)
Microsoft Visual C 32 Bits
MySql 8.0.24 32/64 Bits
VS Code
Compuin
 
Posts: 1214
Joined: Tue Dec 28, 2010 1:29 pm
Location: Quebec, Canada


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 47 guests

cron