algo cutre pero da el pego ahi os lo dejo
:
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
begin
dbedit1.enabled:=true;
dbedit1.color:= clWindow;
dbedit1.Font.color:= clWindowText;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
dbedit1.enabled:=false;
dbedit1.color:= clInactiveCaptionText;
dbedit1.Font.color:= clInactiveCaption;
end;
Saludos, Tony