ui/win32/text.c

Sun, 07 Dec 2025 20:00:33 +0100

author
Olaf Wintermann <olaf.wintermann@gmail.com>
date
Sun, 07 Dec 2025 20:00:33 +0100
changeset 114
3da24640513a
parent 113
dde28a806552
permissions
-rw-r--r--

fix settings dialog doesn't open when there is no .dav/config.xml file

113
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
1 /*
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
2 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
3 *
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
4 * Copyright 2025 Olaf Wintermann. All rights reserved.
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
5 *
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
6 * Redistribution and use in source and binary forms, with or without
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
7 * modification, are permitted provided that the following conditions are met:
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
8 *
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
9 * 1. Redistributions of source code must retain the above copyright
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
10 * notice, this list of conditions and the following disclaimer.
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
11 *
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
12 * 2. Redistributions in binary form must reproduce the above copyright
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
13 * notice, this list of conditions and the following disclaimer in the
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
14 * documentation and/or other materials provided with the distribution.
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
15 *
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
16 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
17 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
19 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
20 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
21 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
22 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
23 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
24 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
25 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
26 * POSSIBILITY OF SUCH DAMAGE.
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
27 */
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
28
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
29 #include "text.h"
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
30
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
31 static W32WidgetClass textfield_widget_class = {
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
32 .eventproc = ui_textfield_eventproc,
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
33 .enable = w32_widget_default_enable,
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
34 .show = w32_widget_default_show,
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
35 .get_preferred_size = ui_textfield_get_preferred_size,
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
36 .destroy = w32_widget_default_destroy
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
37 };
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
38
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
39 UIWIDGET ui_textfield_create(UiObject *obj, UiTextFieldArgs *args) {
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
40 HINSTANCE hInstance = GetModuleHandle(NULL);
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
41 UiContainerPrivate *container = ui_obj_container(obj);
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
42 HWND parent = ui_container_get_parent(container);
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
43 UiLayout layout = UI_ARGS2LAYOUT(args);
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
44
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
45 int width = args->width >= 0 ? args->width : 100;
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
46
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
47 HWND hwnd = CreateWindowEx(
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
48 WS_EX_CLIENTEDGE,
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
49 "EDIT",
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
50 "",
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
51 WS_VISIBLE | WS_CHILD | ES_LEFT | ES_AUTOHSCROLL,
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
52 0, 0, width, 25,
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
53 parent,
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
54 (HMENU)0,
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
55 hInstance,
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
56 NULL);
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
57 ui_win32_set_ui_font(hwnd);
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
58
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
59 W32Widget *widget = w32_widget_create(&textfield_widget_class, hwnd, sizeof(UiTextField));
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
60 ui_container_add(container, widget, &layout);
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
61
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
62 UiTextField *textfield = (UiTextField*)widget;
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
63 textfield->width = width;
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
64 textfield->widget.var = uic_widget_var(obj->ctx, obj->ctx, args->value, args->varname, UI_VAR_STRING);
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
65 textfield->widget.callback = args->onchange;
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
66 textfield->widget.callbackdata = args->onchangedata;
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
67
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
68 if (textfield->widget.var) {
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
69 UiString *s = textfield->widget.var->value;
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
70
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
71 if (s->value.ptr) {
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
72 // TODO: set textfield string
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
73 }
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
74 s->obj = widget;
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
75 s->get = ui_textfield_get;
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
76 s->set = ui_textfield_set;
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
77 }
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
78
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
79 return widget;
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
80 }
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
81
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
82 W32Size ui_textfield_get_preferred_size(W32Widget *widget) {
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
83 UiTextField *textfield = (UiTextField *)widget;
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
84 return (W32Size){ .width = textfield->width, .height = 32};
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
85 }
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
86
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
87 void ui_textfield_eventproc(W32Widget *widget, HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) {
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
88
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
89 }
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
90
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
91 char* ui_textfield_get(UiString *s) {
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
92 UiTextField *textfield = s->obj;
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
93
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
94 if (s->value.free) {
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
95 s->value.free(s->value.ptr);
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
96 }
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
97
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
98 int len = GetWindowTextLength(textfield->widget.widget.hwnd);
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
99 s->value.ptr = calloc(len+1, 1);
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
100 GetWindowText(textfield->widget.widget.hwnd, s->value.ptr, len+1);
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
101
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
102 return s->value.ptr;
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
103 }
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
104
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
105 void ui_textfield_set(UiString *s, const char *value) {
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
106 UiTextField *textfield = s->obj;
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
107 if (s->value.free) {
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
108 s->value.free(s->value.ptr);
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
109 }
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
110 s->value.ptr = NULL;
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
111 SetWindowText(textfield->widget.widget.hwnd, value);
dde28a806552 update ucx
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
112 }

mercurial