Fórum Duvida SQL com mais de 18000 registro #248179

{******** CODIGO ABAIXO FAZ A PESQUISA NO CAMPO *******}
begin
dm.SQLConexao.Close;
dm.SQLConexao.SQL.Clear;
dm.SQLConexao.SQL.Add(´Select * From Mescla ´);
dm.SQLConexao.SQL.Add(´Where COD_INST Like ´+chr(39)+´¬´+BUS_Cod_inst.Text+´¬´+chr(39));
dm.SQLConexao.SQL.Add(´Order By UF,MUNICIPI,PAG´);
dm.SQLConexao.Open;
end;
{------------------------------------------------------------------------------}

procedure TFPesqPlani.ComboBox1Click(Sender: TObject);
begin
dm.SQLConexao.Close;
dm.SQLConexao.SQL.Clear;
dm.SQLConexao.SQL.Add(´Select * From Mescla ´);
dm.SQLConexao.SQL.Add(´Where MUNICIPI Like ´+chr(39)+´¬´+Combobox1.Text+´¬´+chr(39));
dm.SQLConexao.SQL.Add(´Order By UF,MUNICIPI,PAG´);
dm.SQLConexao.Open
end;
{------------------------------------------------------------------------------}

procedure TFPesqPlani.BT_FecharClick(Sender: TObject);
begin
FPesqPlani.Close;
BUS_Cod_inst.Clear;
BUS_Razao.Clear;
BUS_Endereco.Clear;
dm.SQLConexao.Close;
dm.SQLConexao.SQL.Clear;
dm.SQLConexao.SQL.Add(´Select * From Mescla ´);
dm.SQLConexao.SQL.Add(´Order By UF,MUNICIPI,PAG´);
dm.SQLConexao.Open;
end;
{------------------------------------------------------------------------------}