IndexName
OLa Pessoal!
Estou com um problema aqui gostaria que alguem pude-se me ajudar.
Eu tenho um form de Consulta de Cidades dai eu tenho um DBGrid que ja esta granando normal só que embaixo do DBGrid eu tenho um edt queria programar pra quando eu clico dentro dele a primeira letra ja vai aparecendo dentro do DBGrid.
O nome do meu data module é DM.
O nome do meu ClientDataSet é cdsCidade.
O nome do form de cadastro de cidade é frmCadCidade.
O nome do edt é edtBuscIncle.
O nome do botão de confirma é btnConfirma
procedure TfrmConsulCidades.edtBusIncleChange(Sender: TObject);
begin
BEGIN
frmCadCidade.cdsCidade.IndexName := ´CIDADE´;
if edtBusIncle.Text <> ´´ then
frmCadCidade.btnConfirma.FindChildControl([edtBusIncle.text]);
end;
end;
Tente ai Me Ajudar.
Obrigado!
Estou com um problema aqui gostaria que alguem pude-se me ajudar.
Eu tenho um form de Consulta de Cidades dai eu tenho um DBGrid que ja esta granando normal só que embaixo do DBGrid eu tenho um edt queria programar pra quando eu clico dentro dele a primeira letra ja vai aparecendo dentro do DBGrid.
O nome do meu data module é DM.
O nome do meu ClientDataSet é cdsCidade.
O nome do form de cadastro de cidade é frmCadCidade.
O nome do edt é edtBuscIncle.
O nome do botão de confirma é btnConfirma
procedure TfrmConsulCidades.edtBusIncleChange(Sender: TObject);
begin
BEGIN
frmCadCidade.cdsCidade.IndexName := ´CIDADE´;
if edtBusIncle.Text <> ´´ then
frmCadCidade.btnConfirma.FindChildControl([edtBusIncle.text]);
end;
end;
Tente ai Me Ajudar.
Obrigado!
Rodlima
Curtidas 0
Respostas
Mahdak
25/04/2008
amigo se é que entendi sua duvida voce gostaria que automaticamente fosse aparecendo do dbgrid o que voce fosse digitando no edit, estou certo? se sim, basta voce mudar de componente. ao inves de TEdit, use um TDBEdit que o que voce quer vai acontecer sem precisar de codigo algum.
só tome algumas precaussoes como por exemplo linkar o edit e o dbgrid ao mesmo dataset....
flwww
só tome algumas precaussoes como por exemplo linkar o edit e o dbgrid ao mesmo dataset....
flwww
GOSTEI 0
Rodlima
25/04/2008
amigo se é que entendi sua duvida voce gostaria que automaticamente fosse aparecendo do dbgrid o que voce fosse digitando no edit, estou certo? se sim, basta voce mudar de componente. ao inves de TEdit, use um TDBEdit que o que voce quer vai acontecer sem precisar de codigo algum.
só tome algumas precaussoes como por exemplo linkar o edit e o dbgrid ao mesmo dataset....
flwww
Caro Amigo eu troquei o TEdit pelo TDBedit só que eu estou usando o seguinte código:
procedure TfrmConsulCidades.DBEdit1Change(Sender: TObject);
DM.cdsCidade.IndexName := ´CIDADE´;
if DBEdit1.Text <> ´´ then
frmCadCidade.btnLocalizar.FindChildControl([DBEdit1.text]);
O nome do meu data module é DM.
O nome do meu ClientDataSet é cdsCidade.
O nome do form de cadastro de cidade é frmCadCidade.
O nome do DBEdit é DBEdit1
O nome do botão de confirma é btnConfirma
antes eu estava usando esse aqui:
procedure TfrmConsulCidades.edtBusIncleChange(Sender: TObject);
BEGIN
frmCadCidade.cdsCidade.IndexName := ´CIDADE´;
if edtBusIncle.Text <> ´´ then
frmCadCidade.btnConfirma.FindChildControl([edtBusIncle.text]);
end;
GOSTEI 0