2012-08-22 57 views
1

我正在处理其他人的代码,他们正在构建TcxGrid时未通过可视化编辑器。我将导出该网格为Excel,所以我需要将列类型设置为TcxSpinEdit(内容都是数字)。在运行时构建TcxGrid时将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; 

回答

2
uses 
    cxSpinEdit; 

... 
    Stolpec.PropertiesClass := TcxSpinEditProperties; 
    TcxSpinEditProperties(Stolpec.Properties).MaxValue:= 10; 
... 
+0

如果你要导出网格到Excel您可以使用过程ExportToExcel从单元cxGridExportLink – Ravaut123

+0

感谢。我已经使用ExportGridToExcel(),但问题在于几个数字列最终被写成excel中的文本,然后用户需要在能够进行计算之前对其进行更改。 – asg2012

+0

在Procedure ExportToExcel中,我将AUseNativeFormat设置为true。并且可以将Stolpec.Databinding.ValueType设置为整数或其他数值类型 – Ravaut123

相关问题