如何改变TEdit,TComboBox控件Enabled:=False时字体颜色（不用控件）

Question

如题。谢啦。

Answer 1

你可以将控件放在PANEL上，然后改变PANEL的ENABLED属性（这时从表面上看控件的ENABLED属性跟着改变），同时改变控件的颜色属性！！

Answer 2

to zou5655:不好意思，这个我已经知道了，不知还有没有其他方法。

Answer 3

只有先把EnableWindow屏蔽掉再说

Answer 4

//覆盖原来的Text就ok了.
procedure TForm1.Button1Click(Sender: TObject);
var
   EC : Tcanvas;
begin
   try
   Ec := Tcanvas.Create;
   Ec.Handle  := Getdc(Edit1.Handle);
   Ec.Font.Color := clred;
   Ec.TextOut(0,0,Edit1.Text);
   finally
   Ec.free;
   end;
end;