1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
|
// 15 july 2014
package ui
import (
"fmt"
"syscall"
)
type widgetbase struct {
hwnd uintptr
}
var emptystr = syscall.StringToUTF16Ptr("")
func newWidget(class *uint16, style uintptr, extstyle uintptr) *widgetbase {
hwnd, err := f_CreateWindowExW(
extstyle,
class, emptystr,
style | c_WS_CHILD | c_WS_VISIBLE,
c_CW_USEDEFAULT, c_CW_USEDEFAULT,
// c_CW_USEDEFAULT, c_CW_USEDEFAULT,
100,100,
// the following has the consequence of making the control message-only at first
// this shouldn't cause any problems... hopefully not
// but see the msgwndproc() for caveat info
// also don't use low control IDs as they will conflict with dialog boxes (IDCANCEL, etc.)
msgwin, 100, hInstance, nil)
if hwnd == hNULL {
panic(fmt.Errorf("creating control of class %q failed: %v", class, err))
}
return &widgetbase{
hwnd: hwnd,
}
}
// these few methods are embedded by all the various Controls since they all will do the same thing
func (w *widgetbase) unparent() {
res, err := f_SetParent(w.hwnd, msgwin)
if res == hNULL { // result type is HWND
panic(fmt.Errorf("error unparenting control: %v", err))
}
}
func (w *widgetbase) parent(win *window) {
res, err := f_SetParent(w.hwnd, win.hwnd)
if res == hNULL { // result type is HWND
panic(fmt.Errorf("error parenting control: %v", err))
}
}
// don't embed these as exported; let each Control decide if it should
func (w *widgetbase) text() *Request {
c := make(chan interface{})
return &Request{
op: func() {
c <- getWindowText(w.hwnd)
},
resp: c,
}
}
func (w *widgetbase) settext(text string, results ...t_LRESULT) *Request {
c := make(chan interface{})
return &Request{
op: func() {
setWindowText(w.hwnd, text, append([]t_LRESULT{c_FALSE}, results...))
c <- struct{}{}
},
resp: c,
}
}
type button struct {
*widgetbase
}
var buttonclass = syscall.StringToUTF16Ptr("BUTTON")
func newButton(text string) *Request {
c := make(chan interface{})
return &Request{
op: func() {
w := newWidget(buttonclass,
c_BS_PUSHBUTTON | c_WS_TABSTOP,
0)
setWindowText(w.hwnd, text, []t_LRESULT{c_FALSE})
c <- &button{
widgetbase: w,
}
},
resp: c,
}
}
func (b *button) OnClicked(e func(c Doer)) *Request {
// TODO
return nil
}
func (b *button) Text() *Request {
return b.text()
}
func (b *button) SetText(text string) *Request {
return b.settext(text)
}
|
