diff options
| author | Pietro Gagliardi <[email protected]> | 2014-10-16 14:18:58 -0400 |
|---|---|---|
| committer | Pietro Gagliardi <[email protected]> | 2014-10-16 14:18:58 -0400 |
| commit | f607b428a36f65735ef4b1518addc2bb5718a976 (patch) | |
| tree | f205c1a52c4645ea535d9e83f7a183906ac6cbb5 | |
| parent | c1443855d5cf0e974486ac8ce610991c6628bc5f (diff) | |
Actually we don't need to do anything to Tab right nwo...
| -rw-r--r-- | newctrl/tab_windows.c | 112 |
1 files changed, 0 insertions, 112 deletions
diff --git a/newctrl/tab_windows.c b/newctrl/tab_windows.c deleted file mode 100644 index fe51003..0000000 --- a/newctrl/tab_windows.c +++ /dev/null @@ -1,112 +0,0 @@ -// 25 july 2014 - -#include "winapi_windows.h" -#include "_cgo_export.h" - -// provided for cgo's benefit -LPWSTR xWC_TABCONTROL = WC_TABCONTROL; - -static LRESULT CALLBACK tabSubProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam, UINT_PTR id, DWORD_PTR data) -{ - NMHDR *nmhdr = (NMHDR *) lParam; - LRESULT r; - LRESULT lResult; - - // TODO add to Group - if (sharedWndProc(hwnd, uMsg, wParam, lParam, &lResult)) - return lResult; - switch (uMsg) { - case msgNOTIFY: - switch (nmhdr->code) { - case TCN_SELCHANGING: - r = SendMessageW(hwnd, TCM_GETCURSEL, 0, 0); - if (r == (LRESULT) -1) // no tab currently selected - return FALSE; - tabChanging((void *) data, r); - return FALSE; // allow change - case TCN_SELCHANGE: - tabChanged((void *) data, SendMessageW(hwnd, TCM_GETCURSEL, 0, 0)); - return 0; - } - return (*fv_DefSubclassProc)(hwnd, uMsg, wParam, lParam); - case msgTabCurrentTabHasChildren: - return (LRESULT) tabTabHasChildren((void *) data, SendMessageW(hwnd, TCM_GETCURSEL, 0, 0)); - case WM_NCDESTROY: - if ((*fv_RemoveWindowSubclass)(hwnd, tabSubProc, id) == FALSE) - xpanic("error removing Tab subclass (which was for its own event handler)", GetLastError()); - return (*fv_DefSubclassProc)(hwnd, uMsg, wParam, lParam); - default: - return (*fv_DefSubclassProc)(hwnd, uMsg, wParam, lParam); - } - xmissedmsg("Tab", "tabSubProc()", uMsg); - return 0; // unreached -} - -void setTabSubclass(HWND hwnd, void *data) -{ - if ((*fv_SetWindowSubclass)(hwnd, tabSubProc, 0, (DWORD_PTR) data) == FALSE) - xpanic("error subclassing Tab to give it its own event handler", GetLastError()); -} - -void tabAppend(HWND hwnd, LPWSTR name) -{ - TCITEM item; - LRESULT n; - - ZeroMemory(&item, sizeof (TCITEM)); - item.mask = TCIF_TEXT; - item.pszText = name; - // MSDN's example code uses the first invalid index directly for this - n = SendMessageW(hwnd, TCM_GETITEMCOUNT, 0, 0); - if (SendMessageW(hwnd, TCM_INSERTITEM, (WPARAM) n, (LPARAM) (&item)) == (LRESULT) -1) - xpanic("error adding tab to Tab", GetLastError()); -} - -void tabGetContentRect(HWND hwnd, RECT *r) -{ - // not &r; already a pointer (thanks MindChild in irc.efnet.net/#winprog for spotting my failure) - SendMessageW(hwnd, TCM_ADJUSTRECT, FALSE, (LPARAM) r); -} - -// theoretically we don't need to iterate over every tab for this, but let's do it just to be safe -LONG tabGetTabHeight(HWND hwnd) -{ - RECT r; - LRESULT i, n; - LONG tallest; - - n = SendMessageW(hwnd, TCM_GETITEMCOUNT, 0, 0); - // if there are no tabs, then the control just draws a box over the full window rect, reserving no space for tabs; this is handled with the next line - tallest = 0; - for (i = 0; i < n; i++) { - if (SendMessageW(hwnd, TCM_GETITEMRECT, (WPARAM) i, (LPARAM) (&r)) == FALSE) - xpanic("error getting tab height for Tab.preferredSize()", GetLastError()); - if (tallest < (r.bottom - r.top)) - tallest = r.bottom - r.top; - } - return tallest; -} - -void tabEnterChildren(HWND hwnd) -{ - DWORD style, xstyle; - - style = (DWORD) GetWindowLongPtrW(hwnd, GWL_STYLE); - xstyle = (DWORD) GetWindowLongPtrW(hwnd, GWL_EXSTYLE); - style &= ~((DWORD) WS_TABSTOP); - xstyle |= WS_EX_CONTROLPARENT; - SetWindowLongPtrW(hwnd, GWL_STYLE, (LONG_PTR) style); - SetWindowLongPtrW(hwnd, GWL_EXSTYLE, (LONG_PTR) xstyle); -} - -void tabLeaveChildren(HWND hwnd) -{ - DWORD style, xstyle; - - style = (DWORD) GetWindowLongPtrW(hwnd, GWL_STYLE); - xstyle = (DWORD) GetWindowLongPtrW(hwnd, GWL_EXSTYLE); - style |= WS_TABSTOP; - xstyle &= ~((DWORD) WS_EX_CONTROLPARENT); - SetWindowLongPtrW(hwnd, GWL_STYLE, (LONG_PTR) style); - SetWindowLongPtrW(hwnd, GWL_EXSTYLE, (LONG_PTR) xstyle); -} |
