<< Graphics`FilledPlot`
FilledPlot [ Sin[x],{x,0,Pi}];

