jyapayne/Nim
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

development of graphics module

Browse source
This commit is contained in:
Andreas Rumpf 2010-02-19 08:34:07 +01:00
commit 64da2f1681
7 changed files with 508 additions and 272 deletions
Download patch file Download diff file Expand all files Collapse all files

12
tools/nimrepl.nim
View file

@ -1,4 +1,4 @@
import glib2, gtk2, gdk2, osproc, dialogs
import glib2, gtk2, gdk2, osproc, dialogs, strutils
type
output = tuple[compiler, app: string]
@ -55,17 +55,19 @@ proc FileSaveClicked(menuitem: PGtkMenuItem, userdata: pgpointer) =
proc inputKeyPressed(widget: PGtkWidget, event: PGdkEventKey, userdata: pgpointer): bool =
if event.keyval == 65505:
if ($gdk_keyval_name(event.keyval)).tolower() == "shift_l":
# SHIFT is pressed
shiftPressed = True
return False
proc inputKeyReleased(widget: PGtkWidget, event: PGdkEventKey, userdata: pgpointer): bool =
if event.keyval == 65505:
echo(gdk_keyval_name(event.keyval))
if ($gdk_keyval_name(event.keyval)).tolower() == "shift_l":
# SHIFT is released
shiftPressed = False
if event.keyval == 65293:
if ($gdk_keyval_name(event.keyval)).tolower() == "return":
echo($gdk_keyval_name(event.keyval), "Shift_L")
# Enter pressed
if shiftPressed == False:
var startIter: TGtkTextIter
@ -157,4 +159,4 @@ proc initControls() =
gtk_nimrod_init()
initControls()
gtk_main()
gtk_main()