Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Conexión con bases de datos
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Conexión con bases de datos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 23-11-2005
jorge_mosquera jorge_mosquera is offline
Miembro
 
Registrado: mar 2004
Posts: 25
Poder: 0
jorge_mosquera Va por buen camino
Talking Mejor apariencia para un DBGRID

Delphi 5 Enterprise
Firebird 1.5
IBX 5.04

Quisiera mejorar la apariencia de mis grids, desplegando algunas filas de un color y otras de otro, por ejemplo, las lineas impares con fondo amarillo, las pares en fondo blanco. Si no tengo ningun campo sobre el dataset para preguntar si es par o impar, como hago esta implementacion ?

Muchas gracias .
Responder Con Cita
  #2  
Antiguo 23-11-2005
Avatar de jhonny
jhonny jhonny is offline
Jhonny Suárez
 
Registrado: may 2003
Ubicación: Colombia
Posts: 7.058
Poder: 29
jhonny Va camino a la famajhonny Va camino a la fama
Cita:
Empezado por jorge_mosquera
par o impar, como hago esta implementacion ?
Código Delphi [-]
if (Numero mod 2)=0 then
//Es par
else
//Es Impar;
__________________
Lecciones de mi Madre. Tema: modificación del comportamiento, "Pará de actuar como tu padre!"

http://www.purodelphi.com/
http://www.nosolodelphi.com/
Responder Con Cita
  #3  
Antiguo 23-11-2005
Avatar de jachguate
jachguate jachguate is offline
Miembro
 
Registrado: may 2003
Ubicación: Guatemala
Posts: 6.254
Poder: 27
jachguate Va por buen camino
Podes valerte del evento OnDrawColumnCell del grid en cuestión.

Hasta luego.

__________________
Juan Antonio Castillo Hernández (jachguate)
Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate
Responder Con Cita
  #4  
Antiguo 23-11-2005
Avatar de jachguate
jachguate jachguate is offline
Miembro
 
Registrado: may 2003
Ubicación: Guatemala
Posts: 6.254
Poder: 27
jachguate Va por buen camino
Cita:
Empezado por jhonny
Código Delphi [-]
if (Numero mod 2)=0 then
//Es par
else
//Es Impar;
Que tal la función odd?

Hasta luego.

__________________
Juan Antonio Castillo Hernández (jachguate)
Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate
Responder Con Cita
  #5  
Antiguo 23-11-2005
Avatar de jhonny
jhonny jhonny is offline
Jhonny Suárez
 
Registrado: may 2003
Ubicación: Colombia
Posts: 7.058
Poder: 29
jhonny Va camino a la famajhonny Va camino a la fama
En el siguiente hilo Anunakis hizo una pregunta muy parecida a la tuya y en él hay varios enlaces mas que responden a lo mismo.

http://www.clubdelphi.com/foros/show...=pintar+DBGrid
__________________
Lecciones de mi Madre. Tema: modificación del comportamiento, "Pará de actuar como tu padre!"

http://www.purodelphi.com/
http://www.nosolodelphi.com/

Última edición por jhonny fecha: 23-11-2005 a las 18:28:40.
Responder Con Cita
  #6  
Antiguo 23-11-2005
Avatar de jhonny
jhonny jhonny is offline
Jhonny Suárez
 
Registrado: may 2003
Ubicación: Colombia
Posts: 7.058
Poder: 29
jhonny Va camino a la famajhonny Va camino a la fama
Cita:
Empezado por jachguate
Que tal la función odd?
Copiado a mi libreta de apuntes
__________________
Lecciones de mi Madre. Tema: modificación del comportamiento, "Pará de actuar como tu padre!"

http://www.purodelphi.com/
http://www.nosolodelphi.com/
Responder Con Cita
  #7  
Antiguo 24-11-2005
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.233
Poder: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Si quieres probarlo en mi Web hay un componente llamado: TCustomizeGrid;
A parte de otras cosas te permite hacer lo que necesitas (líneas alternativas en el Grid);

Basta con soltarlo en un formulario y conectarlo al DBGrid y activarlo; Él se encargará del repintado. Tienes una propiedad llamada AlternateRows para configurar lo que necesites (colores, estilos,...).

NOTA: Está en fase de construcción, pero esa parte está disponible y funciona bien. De todas formas si tienes algun problema me lo puedes comentar; Cualquier sugerencia, problema,... será bienvenido.
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita
  #8  
Antiguo 24-11-2005
Avatar de Cabanyaler
Cabanyaler Cabanyaler is offline
Miembro
 
Registrado: jun 2003
Ubicación: País Valencià
Posts: 339
Poder: 21
Cabanyaler Va por buen camino
Hola Neftalí, quizá sea tu componente mi solución.
Quiero hacer esto :

http://www.clubdelphi.com/foros/showthread.php?t=27536

Y he utilizado tu componente, pero no me pinta los diferentes colores haciéndole este código
Código Delphi [-]
procedure TFLibroNegro.CustomizeGrid1PaintRow(DS: TDataSet;
  var RowColor: TColor; var ChangeColor: Boolean);
begin
    if (NumSubObr_ant <> RxDBGridLibNegro.Fields[1].Value) and (RxDBGridLibNegro.Canvas.Brush.Color = clinfoBk) then
         RxDBGridLibNegro.Canvas.Brush.Color := clSkyBlue;
    NumSubObr_ant := RxDBGridLibNegro.Fields[1].Value;
end;

He asociado al Componente dicho RxGrid, el DefaultDrawing a True, y chico ... nada.
¿me falta algo?
Un saludo y gracias.
__________________
El meu país és tan petit, que des de dalt d'un campanar es pot veure el campanar veí.
Responder Con Cita
  #9  
Antiguo 24-11-2005
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.233
Poder: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Cita:
Empezado por Cabanyaler
Hola Neftalí, quizá sea tu componente mi solución.
Creo que no; Con éste componente lo que obtienes son líneas alternativas.
Es algo que se utiliza a manudo para faciltar la lctura, por ejemplo.

Lo que piden: ...las lineas impares con fondo amarillo, las pares en fondo blanco.

Algo similar a lo que se ve aquí (son imagenes web, pero para que te hagas una idea):
http://www.oreilly.com/catalog/coldf...r/pcf_1101.gif
http://www.phpgrid.com/grid/ss/images/main.jpg
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita
  #10  
Antiguo 24-11-2005
Avatar de Cabanyaler
Cabanyaler Cabanyaler is offline
Miembro
 
Registrado: jun 2003
Ubicación: País Valencià
Posts: 339
Poder: 21
Cabanyaler Va por buen camino
Si, está claro. Si encuentro como hacerlo ya publicaré hilo.
Mientras si alguien más puede decirme algo se lo agradecería.
Gracias y un saludo.
__________________
El meu país és tan petit, que des de dalt d'un campanar es pot veure el campanar veí.
Responder Con Cita
  #11  
Antiguo 24-11-2005
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Neftali, ¿y cuando publicas tu componente TViajeEnElTiempo? Me llama la atención que los útimo ejemplos en tu página tienen fechas como 21/12/2005, 17/12/2005, 16/12/2005. ¡Yo que aún no compro los regalos y la navidad ya está aquí!

// Saludos
Responder Con Cita
  #12  
Antiguo 24-11-2005
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.233
Poder: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Deben ser las ganas que tengo yo de que llegen las vacaciones de Navidad...

Corregido.
Thks.
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita
  #13  
Antiguo 24-11-2005
Avatar de Cabanyaler
Cabanyaler Cabanyaler is offline
Miembro
 
Registrado: jun 2003
Ubicación: País Valencià
Posts: 339
Poder: 21
Cabanyaler Va por buen camino
Desisto, tiro la toalla.

Como diría Tarantino : - Llebo todo el pu#o día con esta jod#*a mier+# y no me funciona.

Ya lo curraré de otro modo.
Gracias y un saludo a todos los que habéis intentado ayudarme.
__________________
El meu país és tan petit, que des de dalt d'un campanar es pot veure el campanar veí.
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 17:34:40.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi