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;