Consulta SQL con Zeos

[gmontes]

yo trabajo con zeos y firebird y esto hago

Close;

    DMSIU.cdsMedicos.Active:=false;
    SQL.Clear;
    SQL.Add('SELECT * FROM Medicos WHERE 1=1');
    case rdgBuscar.ItemIndex of
     0:SQL.Add(' AND nombre LIKE ''%'+txtNombreBusq.Text+'%''');
     1:SQL.Add(' AND rfc STARTING '''+txtRfcBusq.Text+'''');
    end;
    case rdgOrden.ItemIndex of
     0:SQL.Add(' ORDER By nombre');
     1:SQL.Add(' ORDER BY RFC');
    end;
    Open;
    DMSIU.cdsMedicos.Active:=true;

otro ejemplo es

Close;
     SQL.Clear;
     DMSIU.cdsFac.Active:=false;
     sql.add('select f.clavef, f.documento, f.remision, c.nombre, f.fechae, f.paciente, f.estatus, f.importet, f.condicion, f.sustitu, f.sdoc, fechacan');
     sql.add('from facturas f, clientes c where f.tipo =''F'' and SUBSTRING(f.documento from 1 for 1) = ''A'' and f.clavec = c.clavec and '+sCampo+' Like ''%'+Edit1.Text+'%'' ORDER BY f.documento DESC');
     Open;

algunos pasos de parametros estan muy a fuerzas, pero no me he tomado el timpo de corregir eso