FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Boton en celda xBrowse
Posts: 851
Joined: Sun Nov 09, 2014 05:01 PM
Boton en celda xBrowse
Posted: Sun Nov 27, 2022 04:12 PM
Saludos amigos.

Necesito colocar un boton en una celda de un xBrowse donde el DATASOURCE es el objeto de una consulta (oQuery) y que al hacer click ejecute una funcion.

He intentado con :
Code (fw): Select all Collapse
 
oBrwFacturas:aCols[9]:nEdittype  := EDIT_BUTTON
oBrwFacturas:aCols[9]:bEditBlock := {|| MiFuncion() }
Asi como esta, se va a la funcion y hace lo que quiero, pero al retornar, tdolphin me arroja el error 9016, como si quisiera ejecutar alguna accion sobre la tabla.
No quiero realizar cambios en la tabla, solo que ejecute la funcion y nada mas.

¿cual es mi error?
"Los errores en programación, siempre están entre la silla y el teclado..."



Fwh 19.06 32 bits + Harbour 3.2 + Borland 7.4 + MariaDB + TDolphin



Carora, Estado Lara, Venezuela.
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: Boton en celda xBrowse
Posted: Mon Nov 28, 2022 11:58 AM

Please make sure that bEditBlock returns nil

That means, MiFunction() should return nil.

Explanation:

If bEditBlock returns nil, xbrowse does not take any further action.

But if bEditBlock returns any value other than nil, XBrowse assigns that value to the field.

Regards



G. N. Rao.

Hyderabad, India

Continue the discussion