Search code examples
rtabsiconsgwidgets

How to assign icons to `gnotebook()` tabs?

I am using gWidgets2 to create a tabbed GUI, and I would like each tab to have an associated icon (image).

Consider: 

require(gWidgets2)
w <- gwindow("notebook example", visible=T)
nb <- gnotebook(container=w)
gbutton("Refresh", label="Refresh", container=nb) ## note label argument
gbutton("Info", label="Info", container=nb)

How can I assign the refresh icon next to the label of the 1st tab? And the info icon to the 2nd tab?

Solution

  • With latest GIT of gWidgets2RGtk2 you can simply do: 

    nb$add_tab_icon(1, "refresh")
nb$add_tab_icon(2, "info")