Fórum Busca em campo Dbmemo #193029
05/11/2003
0
Eu gostaria de fazer + ou - assim:
if ComboBox2.Text=´Por Nome´then begin
Query1.SQL.Clear;
a:=´Select * From Teste ´;
b:=´Where Nome Like:Consulta ´;
c:=´Order By Nome´;
Query1.SQL.Add(a+b+c);
Query1.Params[0].AsString;
Query1.ParamByName(´Consulta´).AsString:=´´+´¬´+Edit2.Text+´¬´;
Query1.Close;
Query1.Open
Porém meu campo é dbmemo e não consigo criar um índice para fazer um sistema de busca dentro do dbmemo, nem sei se é possível criar índice.
if ComboBox2.Text=´Por Nome´then begin
Query1.SQL.Clear;
a:=´Select * From Teste ´;
b:=´Where Nome Like:Consulta ´;
c:=´Order By Nome´;
Query1.SQL.Add(a+b+c);
Query1.Params[0].AsString;
Query1.ParamByName(´Consulta´).AsString:=´´+´¬´+Edit2.Text+´¬´;
Query1.Close;
Query1.Open
Porém meu campo é dbmemo e não consigo criar um índice para fazer um sistema de busca dentro do dbmemo, nem sei se é possível criar índice.
Norotico
Curtir tópico
+ 0
Responder
Posts
05/11/2003
Sam
Amigão creio que o caminho seja esse mesmo, mas vc utiliza o método ´PRA QUE FACILITAR SE A GENTE PODE COMPLICAR´, he he he brincadeira, eu faço assim colocando as clausulas diretamente sem utilizar PARAMETROS:
Qry.Sql.clear
Qry.Sql.Add(´Select * from teste´);
Qry.Sql.Add(´Where (CampoMemo Like ´¬´+EditConsulta.text+´¬´)´);
Qry.Active := true;
Abraços !!!
Qry.Sql.clear
Qry.Sql.Add(´Select * from teste´);
Qry.Sql.Add(´Where (CampoMemo Like ´¬´+EditConsulta.text+´¬´)´);
Qry.Active := true;
Abraços !!!
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)