// 6 april 2015 #include "uipriv_windows.h" typedef struct uiSingleHWNDControl uiSingleHWNDControl; struct uiSingleHWNDControl { uiControl control; HWND hwnd; BOOL (*onWM_COMMAND)(uiControl *, WPARAM, LPARAM, void *, LRESULT *); BOOL (*onWM_NOTIFY)(uiControl *, WPARAM, LPARAM, void *, LRESULT *); void (*onWM_DESTROY)(uiControl *, void *); void *onCommandNotifyDestroyData; void (*preferredSize)(uiControl *, int, int, LONG, intmax_t *, intmax_t *); void *data; uintptr_t parent; }; #define S(c) ((uiSingleHWNDControl *) (c)) static void singleDestroy(uiControl *c) { if (DestroyWindow(S(c)->hwnd) == 0) logLastError("error destroying control in singleDestroy()"); // the uiSingleHWNDControl is destroyed in the subclass procedure } static uintptr_t singleHandle(uiControl *c) { return (uintptr_t) (S(c)->hwnd); } static void singleSetParent(uiControl *c, uintptr_t parent) { uiSingleHWNDControl *s = S(c); s->parent = parent; if (SetParent(s->hwnd, (HWND) (s->parent)) == NULL) logLastError("error setting control parent in singleSetParent()"); updateParent(s->parent); } static void singleRemoveParent(uiControl *c) { uiSingleHWNDControl *s = S(c); uintptr_t oldparent; oldparent = s->parent; s->parent = 0; if (SetParent(s->hwnd, initialParent) == NULL) logLastError("error removing control parent in singleSetParent()"); updateParent(oldparent); } static uiSize singlePreferredSize(uiControl *c, uiSizing *d) { uiSize size; (*(S(c)->preferredSize))(c, d->baseX, d->baseY, d->internalLeading, &(size.width), &(size.height)); return size; } static void singleResize(uiControl *c, intmax_t x, intmax_t y, intmax_t width, intmax_t height, uiSizing *d) { if (MoveWindow(S(c)->hwnd, x, y, width, height, TRUE) == 0) logLastError("error moving control in singleResize()"); } static LRESULT CALLBACK singleSubclassProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam, UINT_PTR uIdSubclass, DWORD_PTR dwRefData) { uiSingleHWNDControl *c = (uiSingleHWNDControl *) dwRefData; LRESULT lResult; switch (uMsg) { case msgCOMMAND: if ((*(c->onWM_COMMAND))((uiControl *) c, wParam, lParam, c->onCommandNotifyDestroyData, &lResult) != FALSE) return lResult; break; case msgNOTIFY: if ((*(c->onWM_NOTIFY))((uiControl *) c, wParam, lParam, c->onCommandNotifyDestroyData, &lResult) != FALSE) return lResult; break; case WM_DESTROY: (*(c->onWM_DESTROY))((uiControl *) c, c->onCommandNotifyDestroyData); uiFree(c); break; case WM_NCDESTROY: if ((*fv_RemoveWindowSubclass)(hwnd, singleSubclassProc, uIdSubclass) == FALSE) logLastError("error removing Windows control subclass in singleSubclassProc()"); break; } return (*fv_DefSubclassProc)(hwnd, uMsg, wParam, lParam); } uiControl *uiWindowsNewControl(uiWindowsNewControlParams *p) { uiSingleHWNDControl *c; c = uiNew(uiSingleHWNDControl); c->hwnd = CreateWindowExW(p->dwExStyle, p->lpClassName, p->lpWindowName, p->dwStyle | WS_CHILD | WS_VISIBLE, 0, 0, 100, 100, // TODO specify control IDs properly initialParent, NULL, p->hInstance, NULL); if (c->hwnd == NULL) logLastError("error creating control in uiWindowsNewControl()"); c->control.destroy = singleDestroy; c->control.handle = singleHandle; c->control.setParent = singleSetParent; c->control.removeParent = singleRemoveParent; c->control.preferredSize = singlePreferredSize; c->control.resize = singleResize; c->onWM_COMMAND = p->onWM_COMMAND; c->onWM_NOTIFY = p->onWM_NOTIFY; c->onWM_DESTROY = p->onWM_DESTROY; c->onCommandNotifyDestroyData = p->onCommandNotifyDestroyData; c->preferredSize = p->preferredSize; c->data = p->data; if ((*fv_SetWindowSubclass)(c->hwnd, singleSubclassProc, 0, (DWORD_PTR) c) == FALSE) logLastError("error subclassing Windows control in uiWindowsNewControl()"); return (uiControl *) c; } void *uiWindowsControlData(uiControl *c) { return S(c)->data; } char *uiWindowsControlText(uiControl *c) { WCHAR *wtext; char *text; wtext = windowText(S(c)->hwnd); text = toUTF8(wtext); uiFree(wtext); return text; } void uiWindowsControlSetText(uiControl *c, const char *text) { WCHAR *wtext; wtext = toUTF16(text); if (SetWindowTextW(S(c)->hwnd, wtext) == 0) logLastError("error setting control text in uiWindowsControlSetText()"); uiFree(wtext); }