Hola a todos, y muchas gracias por sus respuestas.
ggram2: El tema de las grillas no lo tengo pensando todavía, porque necesitaría que se cambie de color solo la el registro que se esta editando... y no toda la grilla.
Gracias por responder.
José Luis Garcí:
Voy a probar el panel que me sugieres, después te comento como me va con la prueba.
Yo había pensando algo así:
Código Delphi
[-]
procedure TForm.DSMainStateChange(Sender: TObject);
i:Integer;
myColor:TColor;
begin
Case DSMain.DataSet.State of
dsInactive: myColor := clGray;
dsBrowse : myColor := clWindow;
dsEdit : myColor := $00B7DBFF;
dsInsert : myColor := $00C5DEC9;
end;
for I := 0 to Form1.ComponentCount - 1 do
begin
if Form1.Components[i] is TcxDBTextEdit then
TcxDBTextEdit(Form1.Components[i]).Style.Color := myColor
else
if Form1.Components[i] is TcxDBLookupComboBox then
TcxDBLookupComboBox(Form1.Components[i]).Style.Color := myColor
else
if Form1.Components[i] is TcxDBMemo then
TcxDBMemo(Form1.Components[i]).Style.Color := myColor;
end;
end;
Lo probe y hace lo que necesito...
De nuevo gracias a las respuestas...
Saluda Atte Neeruu!!!
