Consulta xBrowser

[Enrrique Vertiz]

Estimados, buenos dias, consulta

Soy novato usando xBrowser, lo defino asi y presenta el array Ok :

XBROWSER aSal TITLE "Seleccione Liquidacion" SETUP ( oBrw:cHeaders := { "Cuenta", "Auxiliar", "Td", "NumDoc", "Liquidac.", "Saldo MN", "Saldo ME" } )

Pero quisiera aumentar que al darle doble click a un registro cierre el xBrowser y me devuelva el numero de registro donde se hizo el doble click.

Muchas gracias

[joseluisysturiz]

Saludos, si quieres el numero de registro

nReg := oBrw:nArrayAt / oBrw:KeyNo()

si qieres el valor de una celda determinada:

Valor_Celda := oBrw]:aArrayData[ oBrw:nArrayAt, nCol ]

nCol es el numero de la columna de la cual quieres obtener el valor de la celda,

para cerrar el xBrowse deberias cerrar el DLG q lo contenga, oDlg:END(), no se si oBrw:END() te sirva en algo

espero te sirva, saludos...

[Enrrique Vertiz]

JoseLuis, gracias por contestar.

Pero como lo implemento en esa linea de codigo ??, dentro de esa misma sentencia ?? en XBROWSER no funciona "With Object" como en xBrowse(), el oBrw:KeyNo() donde lo coloco ?? y el DBLCLICK como defino que cierre el XBROWSER y me deje el numero de fila ...

Disculpa tanta consulta, pero no tengo idea de como hacer lo que necesito, gracias

[joseluisysturiz]

JoseLuis, gracias por contestar.

Pero como lo implemento en esa linea de codigo ??, dentro de esa misma sentencia ?? en XBROWSER no funciona "With Object" como en xBrowse(), el oBrw:KeyNo() donde lo coloco ?? y el DBLCLICK como defino que cierre el XBROWSER y me deje el numero de fila ...

Disculpa tanta consulta, pero no tengo idea de como hacer lo que necesito, gracias

Ya lo probastes en la misma sentencia.? si no intentalo del lado de afuera, no uso xbrowser si no xbrowse, no habia notado la diferencia...saludos..

doble click..... oBrw::bLDblClick := {|| lo q qieres q haga...}

[Enrrique Vertiz]

Gracias JoseLuis

La solucion que necesitaba me la dio Mr. Rao en el foro en Ingles.

[nageswaragunupudi]

Code: Select all  Expand view  RUN

local RetVal

XBROWSER aSal TITLE "Seleccione Liquidacion" SETUP ( oBrw:cHeaders := { "Cuenta", "Auxiliar", "Td", "NumDoc", "Liquidac.", "Saldo MN", "Saldo ME" } ) SELECT RetVal := oBrw:NumDoc:Value

? RetVal
 

OR

Code: Select all  Expand view  RUN

local RetVal

XBROWSER aSal TITLE "Seleccione Liquidacion" SETUP ( oBrw:cHeaders := { "Cuenta", "Auxiliar", "Td", "NumDoc", "Liquidac.", "Saldo MN", "Saldo ME" } ) SELECT RetVal := oBrw:KeyNo

? RetVal