FindNearest no IBTable

05/07/2004

0

Alguém sabe se existe um comando similar ao FindNearest do componente Table? Estou usando Delphi 5 e Interbase. Utilizo IBTable.

Valeu a foça!!

JR.


Jrjoliv2003

Jrjoliv2003

Responder

Posts

05/07/2004

Reginaldo174

para cria pesquisas utilize o componente IBquery com ele vc pode fazer

IBQuery1.locate(´nomedocampo´,edit1.text,[lopartialkey, locaseinsensitive]);

Espero ter ajudado.


Responder

06/07/2004

Jrjoliv2003

Fiz isso:

data.IBTRep.Locate(´nomealuno´,edit1.text,[lopartialkey, locaseinsensitive]);

Só que quando vou compilar da erro com a mensagem de não identificado em relação essas duas palavras :lopartialkey, locaseinsensitive.

Sabe o que devo fazer?


Valeu a força!!!

JR.


Responder

06/07/2004

Rômulo Barros

Adicione a Unit [color=red:e25cbed491]DB[/color:e25cbed491] na Cláusula Uses de seu Formulário.


:(


Responder

06/07/2004

Jrjoliv2003

Que Unit DB é essa? Estou utlizando Delphi 5.

Valeu a força!!

JR. :roll:


Responder

06/07/2004

Otto

acrescente a palavra [color=blue:34650f7fba]DB[/color:34650f7fba] la em cima na seção [color=blue:34650f7fba]uses[/color:34650f7fba]


:wink:


Responder

07/07/2004

Jrjoliv2003

Valeu!!!

Funcionou!!!

JR.


Responder

08/07/2004

Jrjoliv2003

Beleza!!! A primeira parte funciona com o LOCATE.

Só que ele localiza apenas apontando e não filtrando.
E aponta o primeiro que encontra. Os dados estão em uma DbGrid.

Resumindo o que quero fazer em uma outra situação:
Tenho um combobox com alguns nomes (representam os campos da tabela).
Escolho o campo. No edit ao lado começo a digitar letras e a tabela
vai sendo filtrada conforme a digitação.

Se puder me ajudar...

Valeu a força!!!

JR.


Responder

09/07/2004

Rômulo Barros

Evento OnKeyPressDoEdit
Begin
   Query.Close;
   Query.Sql.Clear;
   Query.Sql.Add(´Select * From Tabela´);
   Query.Sql.Add(´Where ´ + ComboBox.Text + ´ = ´ + ´Like ¬´ + Edit.Text + ´¬´);
   Query.Open;
End;



Responder

09/07/2004

Jrjoliv2003

OK!!

Uma Dúvida!!

Essa Query eu coloco no DataModule, especifico o Banco de dados e deixo ela vazia, sem comandos SQL?

Valeu a força!!!

JR.


Responder

09/07/2004

Rômulo Barros

Aí amigo, é com você. Particularmente, trago em minhas consultas apenas um registro. Mas, no seu caso, alimentea com o seguinte SQL:

Select * From Tabela

Quando tudo tiver funcionando perfeitamente, tome as providências cabíveis. :roll:


Responder

09/07/2004

Jrjoliv2003

Beleza!!

Vou fazer à tarde e hoje a noite. Respondo assim q tiver um resultado!!

Muito Obrigado pela força.

JR.


Responder

09/07/2004

Jrjoliv2003

O primeiro teste é com esse código. Na hora da execução, qunado digito uma letra ele dá erro por causa do (¬). Não sei o que está errado. Se puder ajudar..


Código é um pocuo grande:

data.ibqrep.Close;
data.ibqrep.Sql.Clear;
data.ibqrep.Sql.Add(´select REP_NUMERO, MAT_NOME, REP_DT,´); data.ibqrep.Sql.Add(´REP_HINI, REP_HFIM, MOD_NOME, REP_TIPO, REP_SALNUMERO,´);
data.ibqrep.Sql.Add(´Fun1.FUN_NOME, REP_OBS, Fun2.FUN_NOME, REP_DTCAD, REP_VALOR´);
data.ibqrep.Sql.Add(´from REPOSICAO, Matricula, Modulos, Funcionarios Fun1,´);
data.ibqrep.Sql.Add(´Funcionarios Fun2 where (MAT_MATRI= REP_MATALUNO) and´);
data.ibqrep.Sql.Add(´(MOD_NUMERO=REP_MODULO) and (Fun1.FUN_MATRI = REP_PROFESSOR)´);
data.ibqrep.Sql.Add(´and (REP_FUNMATRI = Fun2.FUN_MATRI)´);
data.ibqrep.Sql.Add(´and ´ + ComboBox1.Text + ´ LIKE ´ + Edit1.Text + ´¬´);
data.ibqrep.Open;

Valeu a força!!

JR.


Responder

10/07/2004

Jrjoliv2003

Mudei de :
data.ibqrep.Sql.Add(´and ´ + ComboBox1.Text + ´ LIKE ´ + Edit1.Text
+ ´¬´);

Para:
data.ibqrep.Sql.Add(´and ´ + ComboBox1.Text + ´ LIKE ´´¬´ + Edit1.Text
+ ´¬´´´);

(Repare nas aspas)

Beleza!! Começou a funcionar.
Só que a filtragem não está coerente!!
Por exemplo:
Tenho os nomes:

Amarildo
Cecília
Camila

Se digito c (minúsculo) não a acontece nada;
Se digito ca (mínúsculo) ele filtra aparecendo somente Cecília e não Camila;
Se dígito ama (mínúsculo) ele filtra aparecendo o nome Camila e não Amarildo;
O nome Amarildo aparece se digitar 3 letras e a primeria em minúscula;


Se digito alguma letra maiúscula não parece nada;
Gostaria que ao digitar a primeira ele já filtrasse.

O que devo fazer?

Valeu a força!!!

JR.


Responder

11/07/2004

Jrjoliv2003

Ninguém tem uma idéia?

Tá funcionando só que a filtragm não está adequada!!

Valeu!!

JR. :?


Responder

12/07/2004

Rômulo Barros

Mude para:

data.ibqrep.Sql.Add(´and Upper(´ + ComboBox1.Text +´) LIKE ´´¬´ + UpperCase(Edit1.Text)
+ ´¬´´´); 


:wink: Upper e UpperCase // Convertem para maiúsculo


Responder

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar