browses en pijama
Publicado: Dom Mar 06, 2005 8:09 pm
Hola,
Tengo el siguiente código:
--------------------------------
METHOD DbBrowse2DrawRow(oSender, nRowPos) CLASS TForm1
IF ::oDbBrowse2:nKeyNo%2 == 0
::oDbBrowse2:nClrPane := clLtGray
ENDIF
RETURN nil
-------------------------------
Pues bien,
La primera línea me sale con fondo blanco y todas las restantes en gris.
Cuando me muevo con el cursos abajo, se van poniendo blancas y grisis
alternas, pero cuando le doy inicio, de nuevo sale mal
Un saludico,
Fredy
Tengo el siguiente código:
--------------------------------
METHOD DbBrowse2DrawRow(oSender, nRowPos) CLASS TForm1
IF ::oDbBrowse2:nKeyNo%2 == 0
::oDbBrowse2:nClrPane := clLtGray
ENDIF
RETURN nil
-------------------------------
Pues bien,
La primera línea me sale con fondo blanco y todas las restantes en gris.
Cuando me muevo con el cursos abajo, se van poniendo blancas y grisis
alternas, pero cuando le doy inicio, de nuevo sale mal
Un saludico,
Fredy