Fórum Consulta em sql - funciona mais eu quero mais #197747

Com a seguinte função eu consigo filtrar todos os clientes de um respectivo bairro:
-------------------------------------------------------------------------------
procedure TForm_principal.SpeedButton1Click(Sender: TObject);
var bairro:string;
begin
bairro:=edit1.Text;
with form_principal.table1 do
begin
form_principal.Query1.SQL.Clear;
form_principal.Query1.SQL.Add(´select * from cliente where bairro= :pzonal´);
form_principal.Query1.ParamByName(´pzonal´).AsString := (bairro);
form_principal.Query1.Prepare;
form_principal.Query1.Open;
form2.QuickRep1.Preview;
end;
end;
--------------------------------------------------------------------------------

Ok! ai funciona perfeitamente, o que eu quero a mais e na mesma função não filtrar apenas os bairros mas tambem o que forem clientes de pessoa física ou juridica: ou seja vou buscar todos os clientes do bairro X que forem pessoas fisicas ou juridicas.

Como ficaria o código asima??