让窗体标题栏文字右对齐

字体大小: 中小 标准 ->行高大小: 标准 中 大 
重载CreateParams即可。

procedure TForm2.CreateParams(var para: TCreateParams);

begin

inherited;

Para.ExStyle:=Para.ExStyle+$1000;

end;

此文章由 http://www.ositren.com 收集整理 ,地址为: http://www.ositren.com/htmls/68166.html