Update of /cvsroot/eas-dev/clip-ui/drivers
In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv6918/drivers
Modified Files:
driver-gtk.prg
Log Message:
- Window now support spacing and padding in form
- Pass both id and text for UIChoice
- getValues() method ignore named buttons
- UIChoice support setValue/getValue as array { text, id }
Index: driver-gtk.prg
===================================================================
RCS file: /cvsroot/eas-dev/clip-ui/drivers/driver-gtk.prg,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- driver-gtk.prg 6 Jun 2006 07:24:02 -0000 1.3
+++ driver-gtk.prg 18 Oct 2006 08:49:59 -0000 1.4
@@ -1314,7 +1314,7 @@
case "UIRadioButton"
val := gtk_ToggleButtonGetActive( o )
- case "UISlider"
+ case "UISlider"
a := gtk_ScaleGetAdjustment(o)
gtk_AdjustmentGetValue(a, @val)
|
