interesting
/
andlabs-ui
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Fixed up borders for currently implemented controls on Windows.

This commit is contained in:
Pietro Gagliardi 2014-07-28 22:16:45 -04:00
parent 5a70accb2f
commit 3c34f22373
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
redo/controls_windows.go
View File

@ -134,8 +134,8 @@ var editclass = toUTF16("EDIT")
func startNewTextField(style C.DWORD) *textField { func startNewTextField(style C.DWORD) *textField {
w := newWidget(editclass, w := newWidget(editclass,
style | C.ES_AUTOHSCROLL | C.ES_LEFT | C.ES_NOHIDESEL | C.WS_BORDER | C.WS_TABSTOP, style | C.ES_AUTOHSCROLL | C.ES_LEFT | C.ES_NOHIDESEL | C.WS_TABSTOP,
C.WS_EX_CLIENTEDGE) // shows visual style-themed edit control borders (TODO get credit from old source) C.WS_EX_CLIENTEDGE) // WS_EX_CLIENTEDGE without WS_BORDER will show the canonical visual styles border (thanks to MindChild in irc.efnet.net/#winprog)
C.controlSetControlFont(w.hwnd) C.controlSetControlFont(w.hwnd)
return &textField{ return &textField{
widgetbase: w, widgetbase: w,

2
redo/table_windows.go
View File

@ -19,7 +19,7 @@ func finishNewTable(b *tablebase, ty reflect.Type) Table {
t := &table{ t := &table{
widgetbase: newWidget(C.xWC_LISTVIEW, widgetbase: newWidget(C.xWC_LISTVIEW,
C.LVS_REPORT | C.LVS_OWNERDATA | C.LVS_NOSORTHEADER | C.LVS_SHOWSELALWAYS | C.WS_HSCROLL | C.WS_VSCROLL, C.LVS_REPORT | C.LVS_OWNERDATA | C.LVS_NOSORTHEADER | C.LVS_SHOWSELALWAYS | C.WS_HSCROLL | C.WS_VSCROLL,
0), // TODO WS_EX_CLIENTEDGE? C.WS_EX_CLIENTEDGE), // WS_EX_CLIENTEDGE without WS_BORDER will show the canonical visual styles border (thanks to MindChild in irc.efnet.net/#winprog)
tablebase: b, tablebase: b,
} }
C.setTableSubclass(t.hwnd, unsafe.Pointer(&t)) C.setTableSubclass(t.hwnd, unsafe.Pointer(&t))