Implemented filled backgrounds

This commit is contained in:
Josef Heinen 2016-01-09 14:05:02 +01:00
parent 81b59f9bc9
commit e5a864a760

View File

@ -86,6 +86,13 @@ function gr_display(plt::Plot{GRPackage})
GR.setviewport(viewport[1], viewport[2], viewport[3], viewport[4]) GR.setviewport(viewport[1], viewport[2], viewport[3], viewport[4])
GR.setwindow(xmin, xmax, ymin, ymax) GR.setwindow(xmin, xmax, ymin, ymax)
if haskey(d, :background_color)
GR.savestate()
GR.setfillintstyle(GR.INTSTYLE_SOLID)
GR.setfillcolorind(gr_getcolorind(d[:background_color]))
GR.fillrect(xmin, xmax, ymin, ymax)
GR.restorestate()
end
GR.setscale(scale) GR.setscale(scale)
charheight = 0.03 * (viewport[4] - viewport[3]) charheight = 0.03 * (viewport[4] - viewport[3])
@ -125,6 +132,7 @@ function gr_display(plt::Plot{GRPackage})
GR.settextalign(GR.TEXT_HALIGN_LEFT, GR.TEXT_VALIGN_HALF) GR.settextalign(GR.TEXT_HALIGN_LEFT, GR.TEXT_VALIGN_HALF)
for p in plt.seriesargs for p in plt.seriesargs
#haskey(p, :fillrange) && println("TODO: fill between")
if p[:linetype] == :path if p[:linetype] == :path
haskey(p, :linecolor) && GR.setlinecolorind(gr_getcolorind(p[:linecolor])) haskey(p, :linecolor) && GR.setlinecolorind(gr_getcolorind(p[:linecolor]))
haskey(p, :linestyle) && GR.setlinetype(gr_linetype[p[:linestyle]]) haskey(p, :linestyle) && GR.setlinetype(gr_linetype[p[:linestyle]])