[microbiano]

y que error te manda o que parametro te marca que no esta definido?

en que linea?

creo que el error esta en:

Código Delphi [-]
With DataModule4.Query4 do
   begin
    Close;
    SQL.Clear;
    SQL.Add('Select cultivos.desccultv,plsiembra.plsiembra from cultivos,plsiembra where plsiembra.pid_mes=:mes');
    parameters.ParamByName('mes').AsInteger:=id_mes;
    Open;
   end;