cuando paso lo parametros como me lo suguieres...
Código Delphi
[-]procedure TFrmRepdeCobr.BtHacereporteClick(Sender: TObject);
var
fecfin,fecini:TDateTime;
codcobstr:String;
begin
With logicanegocio do
begin
codcobstr:=IntToStr(Coddecobr);
CDSREpxCobYrango.Close;
case Tpickrepcobr.ItemIndex of
0:begin
If Coddecobr=0 then
begin
ShowMessage('No ha escogido el cobrador ');
EdCodCobr.SetFocus;
end;
CDSREpxCobYrango.Params.ParamByName('Fdesde').value:=trunc(TPFechini.Datetime);
CDSREpxCobYrango.Params.ParamByName('Fhasta').value:=trunc(TPFechfinal.Datetime);
CDSREpxCobYrango.Params.ParamByName('Cod_cobrador').value:=Coddecobr;
end;
end;
CDSREpxCobYrango.open; CDSREpxCobYrango.DisableControls;
end;
end;
TPFechini y TPFechfinal son de pickdates...
En la linea que indico da el siguiente error..
Invalid variant type conversion
tienes alguna idea por que..?