我正在处理其他人的代码,他们正在构建一个TcxGrid,而无需通过可视化编辑器。我将该网格导出为excel,因此我需要将列类型设置为TcxSpinEdit(内容都是数字)。
如何设置属性?我尝试使用PropertyClass和PropertyClassName但它们都不起作用(我仍然在excel中得到“数字为文本”警告)。
这是相关部分:
var
Stolpec: TcxGridDBColumn;
[...]
if CheckBoxStevilkoMultiTime.Checked then
begin
Stolpec := cxGrid1DBTableView3.CreateColumn;
Stolpec.DataBinding.FieldName := 'STVLK_INI_C';
Stolpec.Width := larghCol;
Stolpec.FooterAlignmentHorz := taRightJustify;
Stolpec.GroupSummaryAlignment := taRightJustify;
Stolpec.Name := 'cxGrid1DBTableView3' + Colonna.DataBinding.FieldName;
TcxGridDBTableSummaryItem(cxGrid1DBTableView3.DataController.Summary.DefaultGroupSummaryItems[5]).Column := Stolpec;
TcxGridDBTableSummaryItem(cxGrid1DBTableView3.DataController.Summary.DefaultGroupSummaryItems[5]).Position := posIndx;
Stolpec.Caption := 'Stevilko';
Stolpec.Options.Editing := False;
end;
答案 0 :(得分:2)
uses
cxSpinEdit;
...
Stolpec.PropertiesClass := TcxSpinEditProperties;
TcxSpinEditProperties(Stolpec.Properties).MaxValue:= 10;
...