support for cstringArray/seq[string]

This commit is contained in:
Stefan Salewski 2019-06-29 21:23:08 +02:00
commit 5c31092dc6
7 changed files with 518 additions and 259 deletions

View file

@ -807,9 +807,7 @@ proc appActivate(app: Application) =
button.label = "Save"
window.add(button)
button.setActionName("win.save")
var h: cstringArray = allocCstringArray(["<Control><Shift>S"])
setAccelsForAction(app, "win.save", h)
deallocCStringArray(h)
setAccelsForAction(app, "win.save", "<Control><Shift>S")
showAll(window)
proc main =
@ -935,9 +933,7 @@ proc appActivate(app: Application) =
# parameter type mismatch (parameter type s, target type NULL)
button.setDetailedActionName("win.justify::center")
#button.setActionName("app.quit") # for a stateless action
var h: cstringArray = allocCstringArray(["<Control><Shift>R"]) # ugly
setAccelsForAction(app, "win.justify::right", h)
deallocCStringArray(h)
setAccelsForAction(app, "win.justify::right", "<Control><Shift>R")
window.add(button)
showAll(window)