Pintar celda de un grid
Publicado por Antonio Marin (1 intervención) el 14/03/2005 14:14:20
Hola
Baje este codigo de la web de davphantom para pintar toda la linea donde esta el cursor en un grid pero no corre en la version de VFP 7.0 que yo tengo.
LPARAMETERS nColIndex
ThisForm.HitRow = RECNO()
ThisForm.LockScreen = .T.
cDynamic = 'IIF(RECNO() = ThisForm.HitRow, RGB(255,255,0), RGB(255,255,255))'
This.SetAll('DynamicBackColor', cDynamic, 'Column')
This.Refresh
ThisForm.LockScreen = .F.
me alega que se encuentra el Hitrow
Gracias de antemano
Baje este codigo de la web de davphantom para pintar toda la linea donde esta el cursor en un grid pero no corre en la version de VFP 7.0 que yo tengo.
LPARAMETERS nColIndex
ThisForm.HitRow = RECNO()
ThisForm.LockScreen = .T.
cDynamic = 'IIF(RECNO() = ThisForm.HitRow, RGB(255,255,0), RGB(255,255,255))'
This.SetAll('DynamicBackColor', cDynamic, 'Column')
This.Refresh
ThisForm.LockScreen = .F.
me alega que se encuentra el Hitrow
Gracias de antemano
Valora esta pregunta


0