Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   colorear una linea de un dbgrid (https://www.clubdelphi.com/foros/showthread.php?t=19880)

hook 30-03-2005 11:06:23

colorear una linea de un dbgrid
 
Hola, estoy intentando, que cuando cargo en un Dbgrid los datos y la fecha final(que es una columna) aparece en blanco, esa linea quiero que aparezca en rojo...He consultado otros hilos y me han dado una idea pero sigue sin salirme el codigo que pongo es el siguiente:

procedure TForm1.DBGrid3DrawDataCell(Sender: TObject; const Rect: TRect;
Field: TField; State: TGridDrawState);
begin
if (dbgrid3.Columns.fecha_fin = ' ') then
DBGrid3.Canvas.Font.Color := clRed;-->esto me da un error
end;
En que falla?????
Muchas Gracias!!!!

Neftali [Germán.Estévez] 30-03-2005 12:14:17

Cita:

Empezado por hook
DBGrid3.Canvas.Font.Color := clRed;-->esto me da un error
En que falla?????

¿Qué error te da?????? :D

hook 30-03-2005 14:29:16

el error me lo da aqui....
 
Perdon, me he explicao mal, el error me lo da aqui:

if (dbgrid3.Columns.fecha_fin = ' ') then

como se pondria, para que en las lineas donde la fecha_fin estuvira en blanco, aparecieran en rojo???

Gracias.

Neftali [Germán.Estévez] 30-03-2005 15:40:16

No quiero ser reiterativo, pero.... ¿Qué error te da????????
Es buena costumbre cuando hablas de que tienes un error, describir qué error es, seguramente eso ayudará a los que leen el mensaje...

Haciendo suposiciones supongo que deberías usar el siguiente código:

Código Delphi [-]
    if (dbgrid3.Columns.fecha_fin.IsNull) then

hook 30-03-2005 16:04:41

colorear una linea de un dbgrid
 
Me expresare mejor ahora....

Esta expresion: if (dbgrid3.Columns.fecha_fin.IsNull) then me da error de que no reconoce ni "fecha_fin" ni "IsNull"
Lo he puesto de la siguiente manera: if (dbgrid3.Columns.Items[4]=null) then --> me da error de incompatible tipos y solo acepta este tipo de comparacion -->
if (dbgrid3.Columns.Items[4]=dbgrid3.Columns.Items[3]) then pero esto no es lo que yo quiero....

De todas formas no quiero insistir en los errores que me da ya que a lo mejor no lo estoy haciendo bien, asi que agradeceria que me dijerais como harias vosotros para que en el resultado de un grid se colorearan de rojo las lineas que tubieran un campo en blanco, como en mi caso la fecha_fin.

Gracias de nuevo y un saludo.

roman 30-03-2005 16:15:07

if (dbgrid3.Fields[4].IsNull) then

ó

if (dbgrid3.DataSource.DataSet.FieldByName('fecha_fin').IsNull) then

// Saludos


La franja horaria es GMT +2. Ahora son las 13:24:21.

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