Fixed up borders for currently implemented controls on Windows.
This commit is contained in:
parent
5a70accb2f
commit
3c34f22373
|
@ -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,
|
||||
|
|
|
@ -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))
|
||||
|
|
Loading…
Reference in New Issue