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

View File

@ -134,8 +134,8 @@ var editclass = toUTF16("EDIT")
func startNewTextField(style C.DWORD) *textField {
w := newWidget(editclass,
style | C.ES_AUTOHSCROLL | C.ES_LEFT | C.ES_NOHIDESEL | C.WS_BORDER | C.WS_TABSTOP,
C.WS_EX_CLIENTEDGE) // shows visual style-themed edit control borders (TODO get credit from old source)
style | C.ES_AUTOHSCROLL | C.ES_LEFT | C.ES_NOHIDESEL | C.WS_TABSTOP,
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)
return &textField{
widgetbase: w,

View File

@ -19,7 +19,7 @@ func finishNewTable(b *tablebase, ty reflect.Type) Table {
t := &table{
widgetbase: newWidget(C.xWC_LISTVIEW,
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,
}
C.setTableSubclass(t.hwnd, unsafe.Pointer(&t))