...
Unit : cxCheckBox para tipos Logicos(Boolean), tipo da propriedade TcxCheckBoxProperties;
Unit : cxTextEdit para tipos Texto(String), tipo da propriedade TcxTextEditProperties;
Unit : cxCalc para tipos Inteiro(Integer) e Numero (Float,Double), tipo da propriedade TcxCalcEditProperties;
Unit : cxCalendarpara tipos DataHora e Data, tipo da propriedade TcxDateEditProperties;
Unit : cxMaskEdittipos Hora, tipo da propriedade TcxMaskEditProperties;
Unit : cxButtonEdit para tipos ButtonEdit, tipo da propriedade TcxButtonEditProperties;
Unit : cxDropDownEdit para tipos Combo(Lista), tipo da propriedade TcxComboBoxProperties;
Exemplo
Colunas criadas dinamicamente:
| Code Block | ||
|---|---|---|
| ||
Uses
Graphics, Controls, StdCtrls, CxGridCol, Menus, DB,
cxTextEdit,
cxCheckBox,
cxCalc,
cxCalendar,
cxMaskEdit,
cxButtonEdit,
cxDropDownEdit;
var
Coluna1 : TcxGridColuna;
Coluna2 : TcxGridColuna;
Coluna3 : TcxGridColuna;
Coluna4 : TcxGridColuna;
Coluna5 : TcxGridColuna;
Coluna6 : TcxGridColuna;
Coluna7 : TcxGridColuna;
CheckProp : TcxCheckBoxProperties;
EditProp : TcxTextEditProperties;
CalEditProp : TcxCalcEditProperties;
DateEditProp : TcxDateEditProperties;
MaskEditProp : TcxMaskEditProperties;
ButtonEditProp : TcxButtonEditProperties;
ComboBoxProp : TcxComboBoxProperties;
begin
Coluna1 := TcxGridColuna.Create(FCustoParcela.ViewFormaPagamento, 'Boolean', 'Boolean', 0, 'FormaPgto');
CheckProp := TcxCheckBoxProperties(Coluna1.Coluna.Properties);
Coluna2 := TcxGridColuna.Create(FCustoParcela.ViewFormaPagamento, 'Texto', 'Texto', 5, 'FormaPgto');
EditProp := TcxTextEditProperties(Coluna2.Coluna.Properties);
Coluna3 := TcxGridColuna.Create(FCustoParcela.ViewFormaPagamento, 'Inteiro', 'Inteiro', 5, 'FormaPgto');
CalEditProp := TcxCalcEditProperties(Coluna3.Coluna.Properties);
Coluna4 := TcxGridColuna.Create(FCustoParcela.ViewFormaPagamento, 'DataHora', 'DATAHORA', 5, 'FormaPgto');
DateEditProp := TcxDateEditProperties(Coluna4.Coluna.Properties);
Coluna5 := TcxGridColuna.Create(FCustoParcela.ViewFormaPagamento, 'Hora', 'HORA', 5, 'FormaPgto');
MaskEditProp := TcxMaskEditProperties(Coluna5.Coluna.Properties);
Coluna6 := TcxGridColuna.Create(FCustoParcela.ViewFormaPagamento, 'EditBotao', 'BUTTONEDIT', 5, 'FormaPgto');
ButtonEditProp := TcxButtonEditProperties(Coluna6.Coluna.Properties);
Coluna7 := TcxGridColuna.Create(FCustoParcela.ViewFormaPagamento, 'Combo', 'COMBO', 5, 'FormaPgto');
ComboBoxProp := TcxComboBoxProperties(Coluna7.Coluna.Properties);
// Exemplo de outras propriedasdes que podem ser acessadas
Coluna7.Coluna.HeaderHint := 'Mouse sobre a coluna';
Coluna7.Coluna.VisibleForCustomization := False;
Coluna7.Coluna.Options.Moving := False;
end; |
Colunas já existentes no form:
Code Block language pas Uses Graphics, Controls, StdCtrls, CxGridCol,Menus, DB, cxTextEdit; var EditProp : TcxTextEditProperties; begin EditProp := TcxTextEditProperties(FNomeDoForm.ViewExemploCOLUNA.Properties); EditProp.OnChange := 'Teste'; EditProp.CharCase := ecUpperCase; end;