problemas con el cuadro Color.Dialog

[snowlis]

Yo tambien tengo un problema parecido al colorear las filas de un dbgrid, no hay manera de que me muestre el color que yo quiero. Por ejemplo le pongo este color --> #FFFF00 y me saca un azul chillon muy feo.
Alguien sabe como funciona esto de los colores el delphi ?

Los códigos de los colores los saco de aquí, nose si servirá --> http://www.webtaller.com/utilidades/...er/colores.php

Saludos

[[seoane]]

¿Donde utilizas el valor #FFFF00? ¿Puedes poner la linea de código donde lo usas?

[snowlis]

Lo uso aquí :

Código Delphi [-]
procedure TForm13.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
  DataCol: Integer; Column: TColumn; State: TGridDrawState);
const
 clPaleGreen = Tcolor($CCFFCC);
 clPaleRed = TColor($CCCCFF);
 clPaleYellow= TColor($FFFF00);
begin
if column.Field.DataSet.FieldByName('HECHO').AsString='NO'
 then
  if (gdFocused in State)
   then dbgrid1.Canvas.brush.Color:=clblack
    else
     dbgrid1.Canvas.brush.Color:=clPalered;
dbgrid1.DefaultDrawColumnCell(rect,datacol,column,state);

if column.Field.DataSet.FieldByName('HECHO').AsString='SI'
then
  if (gdFocused in State)
   then dbgrid1.Canvas.brush.Color:=clblack
    else
     dbgrid1.Canvas.brush.Color:=clPaleGreen;
dbgrid1.DefaultDrawColumnCell(rect,datacol,column,state);

if column.Field.DataSet.FieldByName('PRIORIDAD').AsString='URGENTE'
then
  if (gdFocused in State)
   then dbgrid1.Canvas.brush.Color:=clblack
    else
     dbgrid1.Canvas.brush.Color:=clPaleYellow;
dbgrid1.DefaultDrawColumnCell(rect,datacol,column,state);

end;

[[seoane]]

Bien, el problema esta aqui:

Código Delphi [-]
 clPaleGreen = Tcolor($CCFFCC);
 clPaleRed = TColor($CCCCFF);
 clPaleYellow= TColor($FFFF00);

En delphi, si haces ese tipo de asignación debes intercambiar el primer y ultimo byte para obtener el resultado que tu esperas. Es decir:

Código Delphi [-]
 clPaleGreen = Tcolor($CCFFCC);
 clPaleRed = TColor($FFCCCC);
 clPaleYellow= TColor($00FFFF);

[snowlis]

Gracias seoane, así si que funciona perfectamente.
Hay que ver que cosas más raras pasan cuando lo normal sería mantener el mismo código hexadecimal del color en delphi y que funcionara de la misma manera sin tener que cambiar nada.