libui/zOLD_windows/multilineentry.cpp

153 lines
3.7 KiB
C++

// 8 april 2015
#include "uipriv_windows.hpp"
// TODO there's alpha darkening of text going on in read-only ones; something is up in our parent logic
struct uiMultilineEntry {
uiWindowsControl c;
HWND hwnd;
void (*onChanged)(uiMultilineEntry *, void *);
void *onChangedData;
BOOL inhibitChanged;
};
static BOOL onWM_COMMAND(uiControl *c, HWND hwnd, WORD code, LRESULT *lResult)
{
uiMultilineEntry *e = uiMultilineEntry(c);
if (code != EN_CHANGE)
return FALSE;
if (e->inhibitChanged)
return FALSE;
(*(e->onChanged))(e, e->onChangedData);
*lResult = 0;
return TRUE;
}
static void uiMultilineEntryDestroy(uiControl *c)
{
uiMultilineEntry *e = uiMultilineEntry(c);
uiWindowsUnregisterWM_COMMANDHandler(e->hwnd);
uiWindowsEnsureDestroyWindow(e->hwnd);
uiFreeControl(uiControl(e));
}
uiWindowsControlAllDefaultsExceptDestroy(uiMultilineEntry)
// from http://msdn.microsoft.com/en-us/library/windows/desktop/dn742486.aspx#sizingandspacing
#define entryWidth 107 /* this is actually the shorter progress bar width, but Microsoft only indicates as wide as necessary */
// LONGTERM change this for multiline text boxes (longterm because how?)
#define entryHeight 14
static void uiMultilineEntryMinimumSize(uiWindowsControl *c, int *width, int *height)
{
uiMultilineEntry *e = uiMultilineEntry(c);
uiWindowsSizing sizing;
int x, y;
x = entryWidth;
y = entryHeight;
uiWindowsGetSizing(e->hwnd, &sizing);
uiWindowsSizingDlgUnitsToPixels(&sizing, &x, &y);
*width = x;
*height = y;
}
static void defaultOnChanged(uiMultilineEntry *e, void *data)
{
// do nothing
}
char *uiMultilineEntryText(uiMultilineEntry *e)
{
char *out;
out = uiWindowsWindowText(e->hwnd);
CRLFtoLF(out);
return out;
}
void uiMultilineEntrySetText(uiMultilineEntry *e, const char *text)
{
char *crlf;
// doing this raises an EN_CHANGED
e->inhibitChanged = TRUE;
crlf = LFtoCRLF(text);
uiWindowsSetWindowText(e->hwnd, crlf);
uiprivFree(crlf);
e->inhibitChanged = FALSE;
// don't queue the control for resize; entry sizes are independent of their contents
}
void uiMultilineEntryAppend(uiMultilineEntry *e, const char *text)
{
LRESULT n;
char *crlf;
WCHAR *wtext;
// doing this raises an EN_CHANGED
e->inhibitChanged = TRUE;
// TODO preserve selection? caret? what if caret used to be at end?
// TODO scroll to bottom?
n = SendMessageW(e->hwnd, WM_GETTEXTLENGTH, 0, 0);
SendMessageW(e->hwnd, EM_SETSEL, n, n);
crlf = LFtoCRLF(text);
wtext = toUTF16(crlf);
uiprivFree(crlf);
SendMessageW(e->hwnd, EM_REPLACESEL, FALSE, (LPARAM) wtext);
uiprivFree(wtext);
e->inhibitChanged = FALSE;
}
void uiMultilineEntryOnChanged(uiMultilineEntry *e, void (*f)(uiMultilineEntry *, void *), void *data)
{
e->onChanged = f;
e->onChangedData = data;
}
int uiMultilineEntryReadOnly(uiMultilineEntry *e)
{
return (getStyle(e->hwnd) & ES_READONLY) != 0;
}
void uiMultilineEntrySetReadOnly(uiMultilineEntry *e, int readonly)
{
WPARAM ro;
ro = (WPARAM) FALSE;
if (readonly)
ro = (WPARAM) TRUE;
if (SendMessage(e->hwnd, EM_SETREADONLY, ro, 0) == 0)
logLastError(L"error making uiMultilineEntry read-only");
}
static uiMultilineEntry *finishMultilineEntry(DWORD style)
{
uiMultilineEntry *e;
uiWindowsNewControl(uiMultilineEntry, e);
e->hwnd = uiWindowsEnsureCreateControlHWND(WS_EX_CLIENTEDGE,
L"edit", L"",
ES_AUTOVSCROLL | ES_LEFT | ES_MULTILINE | ES_NOHIDESEL | ES_WANTRETURN | WS_TABSTOP | WS_VSCROLL | style,
hInstance, NULL,
TRUE);
uiWindowsRegisterWM_COMMANDHandler(e->hwnd, onWM_COMMAND, uiControl(e));
uiMultilineEntryOnChanged(e, defaultOnChanged, NULL);
return e;
}
uiMultilineEntry *uiNewMultilineEntry(void)
{
return finishMultilineEntry(0);
}
uiMultilineEntry *uiNewNonWrappingMultilineEntry(void)
{
return finishMultilineEntry(WS_HSCROLL | ES_AUTOHSCROLL);
}