Fórum Tem como checa o qual o tipo do campo de um grid #158989
09/05/2003
0
Estou tentando fazer um funçao que pesquisa em uma tabela por qualquer coluna que estiver em um grid, não sei se tem algum componente pronto para issso.
Na função que estou fazendo estou com dificuldade de colacar a
mascara no campo de pesquisa.
Estou tentando checa o tipo do campo para poder colocar a mascara
no campo de pesquisa.
Exemplo:
Se for uma coluna de data no Grid gostaria que O EDIT de pesquisa fica-se com o Mascara ( / / ) de data.
Na função que estou fazendo estou com dificuldade de colacar a
mascara no campo de pesquisa.
Estou tentando checa o tipo do campo para poder colocar a mascara
no campo de pesquisa.
Exemplo:
Se for uma coluna de data no Grid gostaria que O EDIT de pesquisa fica-se com o Mascara ( / / ) de data.
J@ck
Curtir tópico
+ 0
Responder
Posts
09/05/2003
Carlos_28
private
ColSelecionada: TColumn;
ListWidthColumn: TStringList;
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm.GridMainTitleClick(Column: TColumn);
BEGIN
ColSelecionada := Column;
Case ColSelecionada.Field.DataType of
ftInteger: txtFiltro.EditMask := ´!999999;1; ´;
ftString : txtFiltro.EditMask := ´´;
ftDateTime : txtFiltro.EditMask := ´!99/99/9999;1; ´;
end;
END;
end;
ColSelecionada: TColumn;
ListWidthColumn: TStringList;
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm.GridMainTitleClick(Column: TColumn);
BEGIN
ColSelecionada := Column;
Case ColSelecionada.Field.DataType of
ftInteger: txtFiltro.EditMask := ´!999999;1; ´;
ftString : txtFiltro.EditMask := ´´;
ftDateTime : txtFiltro.EditMask := ´!99/99/9999;1; ´;
end;
END;
end;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)