[juriberuiz]

Carnal, gracias, lo que pusiste en el post 4281 me funciono, gracias

Código Delphi [-]
        MdlDatos.QPedidos.SQL.Clear;
        MdlDatos.QPedidos.SQL.Add('select * from pedidos');
        MdlDatos.QPedidos.SQL.Add('where fechapedido>=:fecha1 and fechapedido<=:fecha2');
        MdlDatos.QPedidos.Parameters.ParamByName('fecha1').Value:=DateTimePicker1.DateTime;
        MdlDatos.QPedidos.Parameters.ParamByName('fecha2').Value:=DateTimePicker2.DateTime;

        if RadioGroup1.ItemIndex = 0 then
        begin
                MdlDatos.QPedidos.SQL.Add('and status=''Pendiente''');
        end
        else if RadioGroup1.ItemIndex = 1 then
        begin
                MdlDatos.QPedidos.SQL.Add('and status=''Entregado''');
        end;
        MdlDatos.QPedidos.Active:=True;