、cxgrid適応表と列の幅および脚注を高めます
iについて:= 0 ado_lxr_cx.FieldCountに- 1ない
開始
//如果是を数字、则注脚求合
場合(ADO_lxr_cx.Fields [i]がTNumericFieldである)を
始める
cxGrid1DBTableView1.GetColumnByFieldName(ADO_lxr_cx.Fields [I] .FieldName)。 Summary.FooterFormat:= '#、0.00';
cxGrid1DBTableView1.GetColumnByFieldName([I] .FieldName ADO_lxr_cx.Fields).Summary.FooterKind:= skSum。
終わり ;
//自适应列宽
cxGrid1DBTableView1.Columns [I] .ApplyBestFit()。
終わり;