FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Solucion xBrowse,tDolphin,Edicion por celda
Posts: 883
Joined: Tue Oct 11, 2005 11:57 AM
Solucion xBrowse,tDolphin,Edicion por celda
Posted: Sun Feb 06, 2011 05:37 PM
Colegas...
Aqui una solucion a un problema que se presenta en la edicion de celdas usando xBrowse y tDolphin

Poner este codigo en el metodo SetColFromMysql de la clase xBrowse

Code (fw): Select all Collapse
     If ::oMySql:IsKindOf( "TDOLPHINQRY" )
        oCol:bOnPostEdit      :=  { |o,x,n| If( n == VK_RETURN,( ::oMySql:FieldPut( nCol, x ), ::oMySql:Save() ),  NIL ) }
     Else
        oCol:bOnPostEdit      := { |o,x,n| If( n == VK_RETURN, ::onedit( o, x, n, cType, nCol ), NIL ) }
     Endif


Para poder editar la celda y que se grabe el cambio.
Esat solucion fue descubierta por Daniel Garcia-Gil, despues de haberlo molestado algunos minutos...

Saludos
;-) Ji,ji,ji... buena la cosa... "all you need is code"

http://www.xdata.cl - Desarrollo Inteligente
----------
Asus TUF F15, 32GB Ram, 2 * 1 TB NVME M.2, GTX 1650

Continue the discussion