关于AlphaControls 的问题
请教大家
项目中使用了 AlphaControls 6.44 ,里面用了一个TPanel,这个panel的字体我设置为红色,结果颜色设置好后运行程序没有变化,应该是 AlphaControls 影响了显示,我想单独设置 该panel的颜色不受皮肤的影响,该如何设置?
[解决办法]
Form1的OnPaint事件,Panel1.Font.Color := clRed;
[解决办法]
AlphaControls自带的panel控件有OnPaint事件,并附带一个Canvas给使用者了,可以很方便地处理
procedure TForm1.TsPanel1Paint(Sender: TObject; Canvas: TCanvas);
begin
Canvas.Brush.Color := clRed;
Canvas.Rectangle(TsPanel1.ClientRect);
end;