Delphi - Mostrar de otro color una columna de un

 
Vista:

Mostrar de otro color una columna de un

Publicado por miguel (3 intervenciones) el 29/11/2004 08:20:34
Hola a todos: Desearia saber si es posible en un listado de delphi con varias lineas de una tabla, si es posible poner una linea de diferente color. Gracia a todos/as
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Mostrar de otro color una columna de un

Publicado por JuanMa (5 intervenciones) el 30/11/2004 20:42:36
Se puede colocar una linea de diferentes color, antes de abrir el listado la podes localizar con un locate en la tabla y cuando encuentre el registro que pinte el color del grid o elcolor de la banda del quickreport
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Mostrar de otro color una columna de un

Publicado por Virum (484 intervenciones) el 01/12/2004 00:43:33
Hola:

Deberías precisar más tu duda para podertela aclarar mejor.

En el título pones que quieres cambiar de color una "columna" y después dices que es una "linea".

Tampoco dices qué utilizas para listar: QR, FR, ...

Adivinando que es gerundio... te puedo decir:

Imaginemos que utilizas QuickReport y la linea tienes 3 QRDBText. Puedes poner en el evento OnPrint del primero, que si se cumple una condición sea de color rojo por ejmplo y si no se cumple negro.

Ejemplo: si un valor es negativo que vaya la línea en rojo, si no negro.

procedure TFLisContParti.QRDBText1Print(sender: TObject; var Value: String);
begin
if DM.IBDSPartContaCANTIDAD.AsInteger < 0 then
begin
QRDBText1.Font.Color := clRed;
QRDBText2.Font.Color := clRed;
QRDBText3.Font.Color := clRed;
end
else
begin
QRDBText1.Font.Color := clBlack;
QRDBText2.Font.Color := clBlack;
QRDBText3.Font.Color := clBlack;
end;
end;

Suerte. Virum.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar