pesquisa ADOQuery e bd access - Ignorar acentos

Delphi

17/06/2015

Bom dia! Tenho uma pesquisa como adoquery e bd Access porém quando eu pesquiso uma palavra por eX; ANTÔNIO, se eu pesquisar sem o acento ANTONIO, o sistema não filtra e eu gostaria que nessa pesquisa ignorasse o acento, que quando eu digitar ANTONIO saia como acento e sem acento,

procedure TFrmPrincipal.Edit4Change(Sender: TObject);
Begin
if not Dm.ADOQuery1.Active then
Dm.ADOQuery1.Open;

if Radiobutton1.Checked = true then
begin
with dm do

begin
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('SELECT * ');
ADOQuery1.SQL.Add('FROM caut ');
ADOQuery1.SQL.Add('WHERE ( TITULAR ) LIKE (' + '''' + '%' + Edit4.Text + '%' + '''' +')');
ADOQuery1.SQL.Add('ORDER BY TITULAR');
ADOQuery1.Open;


end;
end;
Paulo

Paulo

Curtidas 0

Respostas

Dorivan Sousa

Dorivan Sousa

17/06/2015

nao sei bem como funciona isso no access, eu utilizo mais o firebird... no caso do firebird tem o charset e o collate que pode definir como será a ordenação e comparacao de strings... nao sei se tem isso no access ou se pode configurar no ADO...


tenta algo assim
SELECT * FROM dbo.Municipios WHERE nome LIKE ''SAO %'' COLLATE SQL_Latin1_General_CP1_CI_AI

/* COLLATE SQL_Latin1_General_CP1_CI_AI:
   -> Serve para ignorar acentos e letras maiúsculas/minúsculas.
   -> Existem COLLATEs que ignoram apenas os acentos, ou apenas as maiúsculas e minúsculas. Mas para ambos, é usado esse
*/


nao sei se funciona pra MDB ja q o codigo me parece ser pra Sql Server
GOSTEI 0
POSTAR