Added scrollbar for native windows edit_box, patch attached.

Joel
diff --git a/shoes/native/windows.c b/shoes/native/windows.c
index 1c0361f..43f5f18 100644
--- a/shoes/native/windows.c
+++ b/shoes/native/windows.c
@@ -1316,7 +1316,7 @@ shoes_native_edit_box(VALUE self, shoes_canvas *canvas, shoes_place *place, VALU
 {
   int cid = SHOES_CONTROL1 + RARRAY_LEN(canvas->slot->controls);
   SHOES_CONTROL_REF ref = CreateWindowEx(WS_EX_TRANSPARENT, TEXT("EDIT"), NULL,
-    WS_TABSTOP | WS_VISIBLE | WS_CHILD | WS_BORDER | ES_LEFT |
+    WS_TABSTOP | WS_VISIBLE | WS_CHILD | WS_BORDER | WS_VSCROLL | ES_LEFT |
     ES_MULTILINE | ES_AUTOVSCROLL | ES_WANTRETURN | ES_NOHIDESEL,
     place->ix + place->dx, place->iy + place->dy, place->iw, place->ih,
     canvas->slot->window, (HMENU)cid, 

Reply via email to