Hi,
We are trying to write control messages (errors, warnings, ...) to a tktable
while the program is running. Until now we only managed to write all the
messages at once at the end of execution. How can we refresh the window in
order to show the tclArray content?
--------------------------------------------------------
...
options(show.error.messages = FALSE, warn=1)
base <- try(suppressWarnings(DesenhoRegisto(regiao,ano,trimestre)))
if (class(base) == "try-error")
{
msg <- paste("Desenho de registo:",as.character(base),sep=" ")
msg <- sub("\n","",msg)
return(list(tabela=NULL,msg=msg))
}
msg <- "Desenho de Registo...Ok"
print(msg)
tclArray1[[1,0]]<<-as.tclObj(msg, drop=TRUE)
tkactivate(table1, "1,1")
tksee(table1, "1,1")
message("testing")
aloj <- data.frame(base[2])
base <- data.frame(base[1])
base <- try(suppressWarnings(VariaveisAuxiliares(base,ano,trimestre)))
if (class(base) == "try-error")
{
msg <- paste("Variáveis auxiliares:",as.character(base),sep=" ")
msg <- sub("\n","",msg)
return(list(tabela=NULL,msg=msg))
}
msg <- "Variáveis Auxiliares...Ok"
tkinsert(table1,"rows","end",1)
tclArray1[[2,0]]<<-as.tclObj(msg, drop=TRUE)
tkactivate(table1, "2,1")
tksee(table1, "2,1")
...
--------------------------------------------------------
Thank you all,
SRPD
_________________________________________________________________
[[alternative HTML version deleted]]
_______________________________________________
R-packages mailing list
r-packa...@r-project.org
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
