[Resolvido] Pesquisa com EDIT

[Fiamenghi 0]

Pessoal, tenho dois edits, preciso que ao digitar o cod do cliente no edit1 apareca o nome do cliente no edit2, ja tentei de varias formas e nao consegui.

espero que me ajudem. valew.

[universog3 0]

tá usando qual BD?

[Fiamenghi 0]

tá usando qual BD?

 

Usando Firebird 2.1

[universog3 0]

nem lembro como funfa viu...

 

você usa o table e o DataSource? no datamodule pra fazer a conexão??

 

tu tem que criar uma consulta SQL e pegar o resultado e postar no outro edit...

 

passa os componentes q você usa pra fazer a conexão que vou tentar fazer aqui..

[Fiamenghi 0]

nem lembro como funfa viu...

 

você usa o table e o DataSource? no datamodule pra fazer a conexão??

 

tu tem que criar uma consulta SQL e pegar o resultado e postar no outro edit...

 

passa os componentes q você usa pra fazer a conexão que vou tentar fazer aqui..

 

Uso componentes nessa sequencia:

 

SQLConnection -> TSQLQuery -> TDataSetProvider -> TClientDataSet -> DataSource

 

* acredito que deve ser usado o evento OnExit do edit1

[Faccruz 0]

 

nem lembro como funfa viu...

 

você usa o table e o DataSource? no datamodule pra fazer a conexão??

 

tu tem que criar uma consulta SQL e pegar o resultado e postar no outro edit...

 

passa os componentes q você usa pra fazer a conexão que vou tentar fazer aqui..

 

Uso componentes nessa sequencia:

 

SQLConnection -> TSQLQuery -> TDataSetProvider -> TClientDataSet -> DataSource

 

* acredito que deve ser usado o evento OnExit do edit1

 

Pega o que foi digitado no Edit1 e joga no filter do DataSource

 

E o resultado você joga no Edit2

 

Algo do tipo:

 

DS.Filter := 'CodigoCliente = ' + QuotedStr(Edit1.Text);
DS.Filtered := true;

Edit2.Text := Ds.DataSet.FieldByName('NomeCliente').Value;

[Jhony ZaM 1]

Ae carinha beleza?

 

Seguinte voce pode usar de maneira muitoooo facil ou se bater um pouco.

 

Se você usar uma tabela liga ao DataSource voce pode colocar um DbEdit e ao selecionar um campo aparecera o Id e o NOme de usario respectivo.

 

Pois bem essa eh mais simples.

 

Tbm da de faser assim:

 

você coloca no Sql um where por id utilizando um parametro e passa no No OnExit do Edit1;

Where id = :Parametro //Isso dentro do sql

No OnExit do edit1 voce passa assim

 

cdsExemplo.Close;
qryExemplo.ParamByName(Parametro).Value:= edit1.text;
Edit2.text:= cdsEXEMPLO.FieldByname('NOME').Asstring;
cdsExemplo.Open;

Desculpas pelas letras e se tive errado alguma coisa mais eh keto sem delphi aki porem tentando compartilhar.

 

Kalker coisa posta ai

 

 

BY ZAM

[Fiamenghi 0]

Ae carinha beleza?

 

Seguinte voce pode usar de maneira muitoooo facil ou se bater um pouco.

 

Se você usar uma tabela liga ao DataSource voce pode colocar um DbEdit e ao selecionar um campo aparecera o Id e o NOme de usario respectivo.

 

Pois bem essa eh mais simples.

 

Tbm da de faser assim:

 

você coloca no Sql um where por id utilizando um parametro e passa no No OnExit do Edit1;

Where id = :Parametro //Isso dentro do sql

No OnExit do edit1 voce passa assim

 

cdsExemplo.Close;
qryExemplo.ParamByName(Parametro).Value:= edit1.text;
Edit2.text:= cdsEXEMPLO.FieldByname('NOME').Asstring;
cdsExemplo.Open;

Desculpas pelas letras e se tive errado alguma coisa mais eh keto sem delphi aki porem tentando compartilhar.

 

Kalker coisa posta ai

 

 

BY ZAM

 

Valew kara, deu certinho!!!

 

obrigado.