如何在delphi的字符串网格中增加单元格文本的大小？

Question

我使用的是一个字符串网格，它有五列，我想在第三列的文字字体大小中如何做到这一点？

 while not SQLQuery.Eof do
  begin

    StringGrid1.Cells[0,rowCount] := SQLQuery.FieldByName('ELEMENTNAME').AsString ;
    StringGrid1.Cells[1,rowCount] := SQLQuery.FieldByName('ELEMENTTYPE').AsString ;
    StringGrid1.Cells[2,rowCount] := SQLQuery.FieldByName('ELEMENTSTRING').AsString ;
    StringGrid1.Cells[3,rowCount] := SQLQuery.FieldByName('BLOCKNAME').AsString ;
    StringGrid1.Cells[4,rowCount] := SQLQuery.FieldByName('ATTRIBUTES').AsString;

    rowCount := rowCount + 1;
    StringGrid1.RowCount := StringGrid1.RowCount + 1;
    SQLQuery.Next;
  end;

Answer 1

这是一个很老的例子，但我怀疑没有太多改变http://www.delphipages.com/forum/showthread.php?t=142691