localização

Delphi

30/05/2003

if edit1.Text=´´ then exit;
dm.nf.Locate(´fornecedor´,edit1.text,[lopartialkey]);

Estou usando o codigo acima para permitir ao usuario localizar os dados por fornecedor. Mas observei que os dados iguais não são agrupados. Como posso fazer para que isso aconteça?


Luc2403

Luc2403

Curtidas 0

Respostas

Edineidaniel

Edineidaniel

30/05/2003

Se tratando de mostrar dados, acho melhor usar uma função sql:

do tipo: No Evento OnChange do Edit.

Query1.active := false;
Query1.sql.clear;
Query1.sql.add(´select * from tb_Professor where Nom_prof like ´´ + Edit1.Text + ´¬´´);
Query1.active:= true;


Isso funciona.. BLZ

T+
Edinei


GOSTEI 0
Luc2403

Luc2403

30/05/2003

ienide. Perguntas.

Devo colocar um ADOQuery no Dada module ou em algum outro lugar?
No codigo que vc enviou, devo colocar o nome da tabela e o nome do campo aonde?




Se tratando de mostrar dados, acho melhor usar uma função sql: do tipo: No Evento OnChange do Edit. Query1.active := false; Query1.sql.clear; Query1.sql.add(´select * from tb_Professor where Nom_prof like ´´ + Edit1.Text + ´¬´´); Query1.active:= true; Isso funciona.. BLZ T+ Edinei



GOSTEI 0
Sandra

Sandra

30/05/2003

ienide. Perguntas. Devo colocar um ADOQuery no Dada module ou em algum outro lugar? No codigo que vc enviou, devo colocar o nome da tabela e o nome do campo aonde? [quote:c92041ab58=´ienide´]Se tratando de mostrar dados, acho melhor usar uma função sql: do tipo: No Evento OnChange do Edit. Query1.active := false; Query1.sql.clear; Query1.sql.add(´select * from tb_Professor where Nom_prof like ´´ + Edit1.Text + ´¬´´); Query1.active:= true; Isso funciona.. BLZ T+ Edinei
[/quote:c92041ab58]

O ideal é colocar no DataModule. Não se esqueça de adicionar a unit ao formulário: menu File > Use unit e escolha a unit do DataModule...

No exemplo do [b:c92041ab58]ienide[/b:c92041ab58], tb_Professor é a tabela (caso esteja no DataModule, coloque [b:c92041ab58]nome do seu datamodule[/b:c92041ab58].nome da sua tabela. E [b:c92041ab58]Nome_prof[/b:c92041ab58] é o nome do campo.

Entendeu??


:wink: :lol:


GOSTEI 0
Luc2403

Luc2403

30/05/2003

Está dando erro:

Project Controle.exe raised exception class EOleException with message ´Nao foi possivel encontrar o arquivo ´C:\Utilitarios\Projetos\Controle\dm.mdb. Process stopped.´

O que eu faço

[quote:083d7a03ea=´luc2403´]ienide. Perguntas. Devo colocar um ADOQuery no Dada module ou em algum outro lugar? No codigo que vc enviou, devo colocar o nome da tabela e o nome do campo aonde? [quote:083d7a03ea=´ienide´]Se tratando de mostrar dados, acho melhor usar uma função sql: do tipo: No Evento OnChange do Edit. Query1.active := false; Query1.sql.clear; Query1.sql.add(´select * from tb_Professor where Nom_prof like ´´ + Edit1.Text + ´¬´´); Query1.active:= true; Isso funciona.. BLZ T+ Edinei
[/quote:083d7a03ea]

O ideal é colocar no DataModule. Não se esqueça de adicionar a unit ao formulário: menu File > Use unit e escolha a unit do DataModule...

No exemplo do [b:083d7a03ea]ienide[/b:083d7a03ea], tb_Professor é a tabela (caso esteja no DataModule, coloque [b:083d7a03ea]nome do seu datamodule[/b:083d7a03ea].nome da sua tabela. E [b:083d7a03ea]Nome_prof[/b:083d7a03ea] é o nome do campo.

Entendeu??


:wink: :lol:[/quote:083d7a03ea]


GOSTEI 0
POSTAR