Código Delphi [-] ADOconequipos.SQL.Add('select * from equipos where ucase(Equipos) like ''*' + UpperCase(Codequipo.Text) + '*'' ');
ADOconequipos.SQL.Add('select * from equipos where ucase(Equipos) like ''*' + UpperCase(Codequipo.Text) + '*'' ');