Como fazer o IBQuery busca tanto maiuscula quanto minuscula?
Como fazer o IBQuery, usando um Edit, fazer buscas sem fazer distinção entre letras maiusculas e minusculas?
Eu tó usando esse codigo:
DM1.IBQueryMS.Close;
DM1.IBQueryMS.SQL.Clear;
DM1.IBQueryMS.SQL.Add(´Select * From Batman Where Selo = :S´);
DM1.IBQueryMS.SQL.Add(´Order by Data´);
DM1.IBQueryMS.ParambyName(´S´).AsString:=ComboboxlS.Text;
DM1.IBQueryMS.Open;
Eu tó usando esse codigo:
DM1.IBQueryMS.Close;
DM1.IBQueryMS.SQL.Clear;
DM1.IBQueryMS.SQL.Add(´Select * From Batman Where Selo = :S´);
DM1.IBQueryMS.SQL.Add(´Order by Data´);
DM1.IBQueryMS.ParambyName(´S´).AsString:=ComboboxlS.Text;
DM1.IBQueryMS.Open;
Dark Knight
Curtidas 0
Respostas
Einstein
09/04/2003
select * from CadCliente
where upper(nome) like ´Eins¬´
o upper converte o conteudo do campo Nome para Maiúsculo.
espero ter ajudao.
Einstein XAvier
where upper(nome) like ´Eins¬´
o upper converte o conteudo do campo Nome para Maiúsculo.
espero ter ajudao.
Einstein XAvier
GOSTEI 0
Anonymous
09/04/2003
Basta Converter o campo da Tabela que se deseja Comparar e a String q sera Procurada para Maiusculas.
No IB usa-se UPPER e no Delphi UpperCase.
Assim vai funcionar.
DM1.IBQueryMS.Close;
DM1.IBQueryMS.SQL.Clear;
DM1.IBQueryMS.SQL.Add(´Select * From Batman Where Upper(Selo) = :S´);
DM1.IBQueryMS.SQL.Add(´Order by Data´);
DM1.IBQueryMS.ParambyName(´S´).AsString:=UpperCase(ComboboxlS.Text);
DM1.IBQueryMS.Open;
No IB usa-se UPPER e no Delphi UpperCase.
Assim vai funcionar.
DM1.IBQueryMS.Close;
DM1.IBQueryMS.SQL.Clear;
DM1.IBQueryMS.SQL.Add(´Select * From Batman Where Upper(Selo) = :S´);
DM1.IBQueryMS.SQL.Add(´Order by Data´);
DM1.IBQueryMS.ParambyName(´S´).AsString:=UpperCase(ComboboxlS.Text);
DM1.IBQueryMS.Open;
GOSTEI 0