cxGrid动态设置单元格对齐方式

cxGrid动态设置单元格对齐方式

2013年10月08日 00:52:49 踏雪无痕 阅读数：2150更多

个人分类： cxGrid

 

判断：

//uses cxTextEdit
cxGrid1DBTableView1Column.PropertiesClass = TcxTextEditProperties; 
//uses cxCalendar
cxGrid1DBTableView1Column.PropertiesClass = TcxDateEditProperties; 
//uses 
cxGrid1DBTableView1Column.PropertiesClass = TcxCalcEditProperties;
//uses cxCheckBox
cxGrid1DBTableView1Column.PropertiesClass = TcxCheckboxProperties;

//uses cxCurrency
cxGrid1DBTableView1Column.PropertiesClass = TcxCurrencyEditProperties;

等效

cxGrid1DBTableView1Column.Properties is TcxTextEditProperties;
cxGrid1DBTableView1Column.Properties is TcxDateEditProperties;
cxGrid1DBTableView1Column.Properties is TcxCalcEditProperties;
cxGrid1DBTableView1Column.Properties is TcxCheckboxProperties;

转换成某类型访问：
cxGrid1DBTableView1Column.Properties  as TcxTextEditProperties
cxGrid1DBTableView1Column.Properties  as TcxDateEditProperties;
cxGrid1DBTableView1Column.Properties  as TcxCalcEditProperties;

赋值：

uses cxLabel, cxEdit;

Columns[I].PropertiesClass := TcxLabelProperties; //必须uses cxLabel,
          Columns[I].Properties.Alignment.Horz := taLeftJustify;
          Columns[I].Properties.Alignment.Vert := taVCenter;   //必须uses  cxEdit;

等效

with TcxLabelProperties(Columns[I].PropertiesClass) do //必须uses cxLabel,
            begin
              Alignment.Horz := taLeftJustify;
              Alignment.Vert := taVCenter; //必须uses  cxEdit;
            end;

  TcxCurrencyEditProperties(<aColumn>.Properties).DisplayFormat := '$,0.00;($,0.00)'

推荐判断一下：

if not Assigned(Columns[I].Properties) then
                  Columns[I].PropertiesClass := TcxTextEditProperties;