Img {svWidgets}R Documentation

Manipulate image resources for the GUIs

Description

Mechanism provided here is very simple and allows for automatic loading of image resources from any package subdirectory. Currently, only Tk images loaded from GIF files are supported... but more formats will be added in the future.

Usage

  ImgGet(image)
  ImgNames()
  ImgType(image, warn = TRUE)
  tkImgAdd(file, type = "gif")
  tkImgDel(image)
  tkImgReadPackage(package, subdir = "gui", type = "gif")

Arguments

image Name of an image
warn Do we issue a warning if the type of image is not recognized?
file Image file from where to download the resource
type Type of image. Currently, only 'gif' is supported.
package Name of a package from where to load image resources
subdir Subdirectory in the package where the graphical resources are stored. By default, it is the "gui" subdirectory.

Details

These functions care about (un)loading image resources. A list of these resources is maintained in '.gui.Imgs' located in the TempEnv environment.

Value

tkImgAdd() and ImgGet() return the handle to the newly created image. ImgNames() return the list of all images registered in .gui.Imgs.

Author(s)

Philippe Grosjean

See Also

WinNames

Examples

  ## Not run: 
    ## These cannot be run by examples() but should be OK when pasted
    ## into an interactive R session with the tcltk package loaded

        ImgNames()
        tkImgAdd(file.path(.path.package(package = "svWidgets")[1], "gui", "logoSciViews.gif"))
        ImgNames()
        ImgType("$Tk.logoSciViews")
        # Place that logo in a Tk window
        timg <- tkWinAdd("timg", title = "A Tk window with image", pos ="-40+20")
        labImg <- tklabel(timg, image = ImgGet("$Tk.logoSciViews"), bg = "white")
        tkpack(labImg)
        # When the image resource is deleted, it is not displayed any more, but there is no error
        tkImgDel("$Tk.logoSciViews")
        ImgNames()
        tkWinDelete("timg")
        # To read all image resources at once (place this in .Lib.first())
        tkImgReadPackage("svWidgets")
        ImgNames()
  ## End(Not run)

[Package svWidgets version 0.9-5 Index]