Major code restructure to allow Cocoa to work correctly. Cocoa requires that the application loop run on the very first OS thread created, not just an any ordinary thread. To support this, your code must now be run by the UI init code. Windows and Unix builds still work fine; Mac OS X fails for reasons I now have to debug.

1 files changed, 128 insertions, 0 deletions

diff --git a/test/main.go b/test/main.go
new file mode 100644
index 0000000..1984e58
--- /dev/null
+++ b/test/main.go
@@ -0,0 +1,128 @@
+// 11 february 2014
+package main
+
+import (
+	"fmt"
+	. ".."
+)
+
+func gridWindow() (*Window, error) {
+	w := NewWindow("Grid Test", 400, 400)
+	b00 := NewButton("0,0")
+	b01 := NewButton("0,1")
+	b02 := NewButton("0,2")
+	l11 := NewListbox(true, "1,1")
+	b12 := NewButton("1,2")
+	l20 := NewLabel("2,0")
+	c21 := NewCheckbox("2,1")
+	l22 := NewLabel("2,2")
+	g := NewGrid(3,
+		b00, b01, b02,
+		Space(), l11, b12,
+		l20, c21, l22)
+	g.SetFilling(1, 2)
+	g.SetStretchy(1, 1)
+	return w, w.Open(g)
+}
+
+func myMain() {
+	w := NewWindow("Main Window", 320, 240)
+	w.Closing = Event()
+	b := NewButton("Click Me")
+	b2 := NewButton("Or Me")
+	s2 := NewStack(Horizontal, b, b2)
+	c := NewCheckbox("Check Me")
+	cb1 := NewEditableCombobox("You can edit me!", "Yes you can!", "Yes you will!")
+	cb2 := NewCombobox("You can't edit me!", "No you can't!", "No you won't!")
+	e := NewLineEdit("Enter text here too")
+	l := NewLabel("This is a label")
+	b3 := NewButton("List Info")
+	s3 := NewStack(Horizontal, l, b3)
+	s3.SetStretchy(0)
+//	s3.SetStretchy(1)
+	pbar := NewProgressBar()
+	prog := 0
+	incButton := NewButton("Inc")
+	decButton := NewButton("Dec")
+	sincdec := NewStack(Horizontal, incButton, decButton)
+	password := NewPasswordEdit()
+	s0 := NewStack(Vertical, s2, c, cb1, cb2, e, s3, pbar, sincdec, Space(), password)
+	s0.SetStretchy(8)
+	lb1 := NewListbox(true, "Select One", "Or More", "To Continue")
+	lb2 := NewListbox(false, "Select", "Only", "One", "Please")
+	i := 0
+	doAdjustments := func() {
+		cb1.Append("append")
+		cb2.InsertBefore(fmt.Sprintf("before %d", i), 1)
+		lb1.InsertBefore(fmt.Sprintf("%d", i), 2)
+		lb2.Append("Please")
+		i++
+	}
+	doAdjustments()
+	s1 := NewStack(Vertical, lb2, lb1)
+	s1.SetStretchy(0)
+	s1.SetStretchy(1)
+	s := NewStack(Horizontal, s1, s0)
+	s.SetStretchy(0)
+	s.SetStretchy(1)
+	err := w.Open(s)
+	if err != nil {
+		panic(err)
+	}
+	gw, err := gridWindow()
+	if err != nil {
+		panic(err)
+	}
+
+mainloop:
+	for {
+		select {
+		case <-w.Closing:
+			break mainloop
+		case <-b.Clicked:
+			err = w.SetTitle(fmt.Sprintf("%v | %s | %s | %s | %s",
+				c.Checked(),
+				cb1.Selection(),
+				cb2.Selection(),
+				e.Text(),
+				password.Text()))
+			if err != nil {
+				panic(err)
+			}
+			doAdjustments()
+		case <-b2.Clicked:
+			cb1.Delete(1)
+			cb2.Delete(2)
+			lb1.Delete(3)
+			lb2.Delete(4)
+		case <-b3.Clicked:
+			MsgBox("List Info",
+				"cb1: %d %q\ncb2: %d %q\nlb1: %d %q\nlb2: %d %q",
+				cb1.SelectedIndex(), cb1.Selection(),
+				cb2.SelectedIndex(), cb2.Selection(),
+				lb1.SelectedIndices(), lb1.Selection(),
+				lb2.SelectedIndices(), lb2.Selection())
+		case <-incButton.Clicked:
+			prog++
+			if prog > 100 {
+				prog = 100
+			}
+			pbar.SetProgress(prog)
+		case <-decButton.Clicked:
+			prog--
+			if prog < 0 {
+				prog = 0
+			}
+			pbar.SetProgress(prog)
+		}
+	}
+	gw.Hide()
+	w.Hide()
+}
+
+func main() {
+	err := Go(myMain)
+	if err != nil {
+		panic(err)
+	}
+}