informacaoweed Aprendiz
Registrado: Terça-Feira, 1 de Outubro de 2013 Mensagens: 268 Localização: Porto Alegre / RS
|
Enviada: Sex Mar 17, 2017 11:53 am Assunto: TcxColumn.DisplayFormat (DevExpress) Formatação |
|
|
Bom dia a todos!
Eu uso a TcxGrid da DevExpress.
No objeto TcxGridDBColumn tenho a propriedade TcxGridDBColumn.Properties.DisplayFormat do tipo String onde, em tese, eu posso informar uma máscara para a exibição do dado na grade.
As máscaras normais que usamos não estão funcionando para esta propriedade;
Porém, sei que esta propriedade serve para isto, porque funciona para os meus campos de moeda e percentuais:
Código: |
{Observação: Constantes para as máscaras:
Mask_Placa = '!LLL-9999;0; '; //Máscara para PLACA veicular
Mask_Renavam = '!99.999.999-9;0; '; //Máscara para RENAVAM veicular
Mask_Numero_Real = '0.00;'; //número com ponto flutuante de dois dígitos
Mask_Moeda_Real = 'R$ ,0.00;-R$ ,0.00'; //Máscara para VALORES em MOEDA REAL
Mask_Percentual = '0.00 ,%;'; //Máscara para PERCENTUAL
//o bloco abaixo obtém o efeito desejado:
tdNumeroReal:
begin
Coluna.PropertiesClass := TcxCurrencyEditProperties;
TcxCurrencyEditProperties(Coluna.Properties).DisplayFormat := Mask_Numero_Real;//'0.00;';
Coluna.Properties.Alignment.Horz := taRightJustify;
end;
tdPercentual:
begin
Coluna.PropertiesClass := TcxCurrencyEditProperties;
TcxCurrencyEditProperties(Coluna.Properties).DisplayFormat := Mask_Percentual;//'0.00 ,%;';
Coluna.Properties.Alignment.Horz := taRightJustify;
end;
//o bloco abaixo não altera a forma de exibição
tdPlaca:
begin
{Coluna.PropertiesClass := TcxTextEditProperties;
//TcxTextEditProperties(Coluna.Properties).DisplayFormat := Mask_Placa;//'LLL-9999;';
//TcxTextEditProperties(Coluna.Properties).DisplayFormat := 'LLL-9999;';//'AAA-9999';//'AAA-0000';//'LLL-9999;1;_';
//TcxTextEditProperties(Coluna.Properties).EditFormat := 'LLL-9999';//Mask_Placa;
TcxTextEditProperties(Coluna.Properties).DisplayFormat := 'LLL-0000;';
TcxTextEditProperties(Coluna.Properties).Alignment.Horz := taCenter;}
Coluna.PropertiesClass := TcxMaskEditProperties;
//TcxMaskEditProperties(Coluna.Properties).DisplayFormat := 'LLL-0000;';
//TcxMaskEditProperties(Coluna.Properties).DisplayFormat := 'LLL-9999;';//'AAA-9999';//'AAA-0000';//'LLL-9999;1;_';
//TcxMaskEditProperties(Coluna.Properties).EditFormat := 'LLL-9999';//Mask_Placa;
TcxMaskEditProperties(Coluna.Properties).DisplayFormat := Mask_Placa;//'LLL-9999;';
TcxMaskEditProperties(Coluna.Properties).Alignment.Horz := taCenter;
end;
tdRenavam:
begin
{Coluna.PropertiesClass := TcxTextEditProperties;
//TcxTextEditProperties(Coluna.Properties).DisplayFormat := Mask_Renavam;
//TcxTextEditProperties(Coluna.Properties).DisplayFormat := '99.999.999-9';
//TcxTextEditProperties(Coluna.Properties).DisplayFormat := '00.000.000-0;';
TcxTextEditProperties(Coluna.Properties).DisplayFormat := '99.999.999-9;';
TcxTextEditProperties(Coluna.Properties).Alignment.Horz := taCenter;}
Coluna.PropertiesClass := TcxMaskEditProperties;
TcxMaskEditProperties(Coluna.Properties).DisplayFormat := Mask_Renavam;
//TcxMaskEditProperties(Coluna.Properties).DisplayFormat := '99.999.999-9';
//TcxMaskEditProperties(Coluna.Properties).DisplayFormat := '00.000.000-0;';
//TcxMaskEditProperties(Coluna.Properties).DisplayFormat := '99.999.999-9;';
TcxMaskEditProperties(Coluna.Properties).Alignment.Horz := taCenter;
end;
|
Já tentei tudo o que me passou pela cabeça, as tentativas estão comentadas no código acima. Se alguém tiver uma luz eu agradeço _________________ Aguarde... nossa Evolução está sendo processada. |
|