摘要:
procedure TForm1.StringGrid1ApplyStyleLookup(Sender: TObject); var Header: THeader; HeaderItem: THeaderItem; I: Integer; begin Header := THeader((Send 阅读全文
posted @ 2020-11-02 14:42
dqi1999
阅读(320)
评论(0)
推荐(0)
摘要:
FMX StringGrid根据内容自适应列宽 1 // maxrow,默认只排序前面100行以内的数据 2 // maxwidth,默认单字段显示的最大宽度 3 function GetColMaxDataLength(ASGrid: TStringGrid;maxrow:Integer=100; 阅读全文
posted @ 2020-11-02 10:56
dqi1999
阅读(468)
评论(0)
推荐(0)

浙公网安备 33010602011771号