Problema para completar Mask quando puxo dados de um dbgrid
bom pessoal estou eu aqui novamente para tentar tirara duvidas
mas vamos la
é o seguinte eu tenho uma tela de cadastro e na mesma tela uso para fazer pesquisa tenho um botão pesquisar e quando clico nele abra um outro Form com todos os clientes ja abertos no dbgrid mas quando eu puxo determinado cliente pro form de cadastro os campos que não Dbedit não puxam junto ou seja as Mascara e o combobox que coloquei não estão sendo preenchidos oque faço para conseguir preencher eles nesta ocasião?
mas vamos la
é o seguinte eu tenho uma tela de cadastro e na mesma tela uso para fazer pesquisa tenho um botão pesquisar e quando clico nele abra um outro Form com todos os clientes ja abertos no dbgrid mas quando eu puxo determinado cliente pro form de cadastro os campos que não Dbedit não puxam junto ou seja as Mascara e o combobox que coloquei não estão sendo preenchidos oque faço para conseguir preencher eles nesta ocasião?
Jeovanne
Curtidas 0
Respostas
Itepi
12/12/2007
Porque você não utiliza DBComboBox, e um DBEdit e coloca a mascara no campo não no DBEdit?
GOSTEI 0
Jeovanne
12/12/2007
como faço para colocar o mascara no campo DBedit?
GOSTEI 0
Itepi
12/12/2007
Qdo vc da um duplo clique uma Query ou num ClientDataSet e depois clica em Add all fields, os campos aparecem certo? se vc selecionar o que você quer colocar a mascara nas propriedades dele vai ter EditMask...é só colocar a mascara la!!
GOSTEI 0
Jeovanne
12/12/2007
cara é o seguinte eu não achei o campo editmask achei apenas o campo EditFormat seria a mesma coisa????
GOSTEI 0
Kenio_c
12/12/2007
O Nome do campos e DisplayFormat
mas vc pode faze usando KeyPress do DBEdit
//Edição de mascara de Telefone Resid
if Key <> #8 then
Begin
if Length(DBEtelefone_resid.Text) = 0 then
begin
DBEtelefone_resid.Text := DBEtelefone_resid.Text + ´(´;
DBEtelefone_resid.SelStart := 2;
end;
if Length(DBEtelefone_resid.Text) = 3 then
begin
DBEtelefone_resid.Text := DBEtelefone_resid.Text + ´) ´;
DBEtelefone_resid.SelStart := 5;
end;
if Length(DBEtelefone_resid.Text) = 9 then
begin
DBEtelefone_resid.Text := DBEtelefone_resid.Text + ´-´;
DBEtelefone_resid.SelStart := 10;
end;
end;
é assim q mascaro o telefone o usuario vai digitando e vai aparecendo ´(´ e ´-´
mas vc pode faze usando KeyPress do DBEdit
//Edição de mascara de Telefone Resid
if Key <> #8 then
Begin
if Length(DBEtelefone_resid.Text) = 0 then
begin
DBEtelefone_resid.Text := DBEtelefone_resid.Text + ´(´;
DBEtelefone_resid.SelStart := 2;
end;
if Length(DBEtelefone_resid.Text) = 3 then
begin
DBEtelefone_resid.Text := DBEtelefone_resid.Text + ´) ´;
DBEtelefone_resid.SelStart := 5;
end;
if Length(DBEtelefone_resid.Text) = 9 then
begin
DBEtelefone_resid.Text := DBEtelefone_resid.Text + ´-´;
DBEtelefone_resid.SelStart := 10;
end;
end;
é assim q mascaro o telefone o usuario vai digitando e vai aparecendo ´(´ e ´-´
GOSTEI 0
Jeovanne
12/12/2007
itepi valew pela força deu certim e kenio _c não usei o seu não mas poderar me ser util
mutio obrigado
até a proxima galera
mutio obrigado
até a proxima galera
GOSTEI 0