更改文字大小StringGrid

如何stringgrid标题更改文字大小？更改文字大小StringGrid

2012-07-11 user1517933

考虑接受的答案['这种方式']（http://meta.stackexchange.com/a/5235）如果它解决了你的问题。无论如何，欢迎来到StackOverflow！ – TLama 2012-07-11 20:42:37

你可以写类似这样的OnApplyStyleLookup事件处理程序：

procedure TForm1.StringGrid1ApplyStyleLookup(Sender: TObject); 
var 
    Header: THeader; 
    I: Integer; 
begin 
    Header := THeader((Sender as TStringGrid).FindStyleResource('header')); 
    if Assigned(Header) then 
    begin 
    for I := 0 to Header.Count - 1 do 
     with Header.Items[I].Font do 
     begin 
     Size := 32; 
     Style := [TFontStyle.fsBold]; 
     end; 
    Header.Height := 48; 
    end; 
    TStringGrid(Sender).Realign; 
end;

来源

2012-07-11 14:42:59

感谢您的回答。这对我有很大的帮助 – user1517933 2012-07-11 19:57:47

如何在公司的RAD Studio XE3在StringGrid改变字体大小 - FM2 Firemonkey 2不firemonkey 1

来源

2012-09-17 06:37:36 user1581036

你应该问这是一个单独的问题。 – 2012-09-17 08:18:39

更改文字大小StringGrid

回答

相关问题