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;

上一篇:跨主机网络概述 - 每天5分钟玩转 Docker 容器技术(48)


下一篇:python 中的列表解析和生成表达式 - 转