Displaying 1 result from an estimated 1 matches for "loglabel".
Did you mean:
log_label
2007 May 30
0
checking for "viability" of a GUI component
...ts that are supposed to use the GUI.
create.log.win <- function(inputtext){
if(exists(is.null("logwin"))) {return} else {
logwin <<- tktoplevel()
logtext <<- tktext(logwin, bg="white")
tkwm.title(logwin," Log Window")
loglabel <- tklabel(logwin, text="Logging Analaysis Information")
tkgrid(loglabel)
tkgrid(logtext)
if (is.matrix(inputtext)) {
for (i in 1:nrow(inputtext))
tkinsert(logtext, "end",paste(paste(inputtext[i,],collapse="
"),"\n"...