File: gtkex2.nim

package info (click to toggle)
nim 0.19.4-1
  • links: PTS, VCS
  • area: main
  • in suites: buster
  • size: 462,356 kB
  • sloc: sh: 11,089; ansic: 4,699; makefile: 706; python: 309; sql: 297; asm: 141; xml: 13
file content (22 lines) | stat: -rw-r--r-- 426 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 

import
  glib2, gtk2

proc destroy(widget: PWidget, data: Pgpointer){.cdecl.} =
  main_quit()

var
  window: PWidget
  button: PWidget

nim_init()
window = window_new(WINDOW_TOPLEVEL)
button = button_new("Click me")
set_border_width(PContainer(window), 5)
add(PContainer(window), button)
discard signal_connect(window, "destroy",
                           SIGNAL_FUNC(gtkex2.destroy), nil)
show(button)
show(window)
main()