search for: tkmark

...wrote the following programme to save the file, but when i save the file, i do not find the file save, please help me, in order to continue my projet. this is the programme: tt <- tktoplevel() txt <- tktext(tt) tkwm.title(tt,"Saisi des modalités") #intitule la fenêtre tkgrid(txt) tkmark.set(txt,"insert","0.0") topMenu <- tkmenu(tt) tkconfigure(tt,menu=topMenu) cascade =function () {fileName=tclvalue(tkgetSaveFile(initialfile="modalite.txt",filetypes="{{JPEG Files} {.jpg .jpeg}} {{PDF File} {.pdf}} {{Text File} {.txt}} {{All files} *}"))...

...tviewer <- tktext(editor, font = "courier", width = 66, height = 20, yscrollcommand = function(...)tkset(scr2,...)) scr2 <- tkscrollbar(editor, repeatinterval = 5, command = function(...)tkyview(txtviewer,...)) tkgrid(txtviewer, scr2) tkgrid.configure(scr2, sticky = "ns") tkmark.set(txtviewer,"insert","0.0") tkinsert(txtviewer,"end","This is some stuff") DeleteSelection <- function() { fruitIndex <- as.integer(tkcurselection(mlb)) tkdelete(mlb,fruitIndex) } DeleteSelection.but <- tkbutton(editor,text="Delete&qu...

...et, "entrycget", ...) tkfind <- function(widget, ...) tcl(widget, "find", ...) tkflash <- function(widget, ...) tcl(widget, "flash", ...) tkfraction <- function(widget, ...) tcl(widget, "fraction", ...) @@ -535,11 +534,11 @@ tkmark.unset <- function(widget, ...) tcl(widget, "mark", "unset", ...) tkmove <- function(widget, ...) tcl(widget, "move", ...) tknearest <- function(widget, ...) tcl(widget, "nearest", ...) +tkpostcascade <- function(widget, ...)...