De nuevo otra dudita.
Tengo el siguiente código situado en el evento onchange del campo:
Código Delphi
[-]
procedure TF_ModulDades.CamionsCODI_ACTUALChange(Sender: TField);
begin
if Pos('X', CamionsCODI_ACTUAL.Text ) > 0 then
begin
F_Camions.DBEdit11.Font.Color:= clRed;
F_Camions.DBEdit11.Brush.Color:=clYellow;
F_Camions.DBEdit11.Font.Style:= [fsBold];
end
else
begin
F_Camions.DBEdit11.Font.Color:= clBlack;
F_Camions.DBEdit11.Brush.Color:=clWhite;
F_Camions.DBEdit11.Font.Style:= [];
end;
end;
Cuando lo ejecuto, la linea de cambio de color del texto se realiza perfectamente pero al pasar por la linea de cambio de color del fondo, no lo hace.
He realizado el F8 y colocandome sobre los valores teoricamente si le asigna el valor 65 mil y pico del color amarillo al igual que el cambio de estilo de la letra.
Alguna sugerencia.
Gracias
Josep