ui/win32/text.c

Mon, 08 Dec 2025 16:21:24 +0100

author
Olaf Wintermann <olaf.wintermann@gmail.com>
date
Mon, 08 Dec 2025 16:21:24 +0100
changeset 980
39cb60b6a81b
parent 940
105bccb3dc66
permissions
-rw-r--r--

fix win32 build

873
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
1 /*
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
2 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
3 *
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
4 * Copyright 2025 Olaf Wintermann. All rights reserved.
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
5 *
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
6 * Redistribution and use in source and binary forms, with or without
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
7 * modification, are permitted provided that the following conditions are met:
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
8 *
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
9 * 1. Redistributions of source code must retain the above copyright
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
10 * notice, this list of conditions and the following disclaimer.
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
11 *
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
12 * 2. Redistributions in binary form must reproduce the above copyright
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
13 * notice, this list of conditions and the following disclaimer in the
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
14 * documentation and/or other materials provided with the distribution.
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
15 *
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
16 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
17 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
19 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
20 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
21 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
22 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
23 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
24 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
78853bfc47cf add textfield (win32)
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
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
26 * POSSIBILITY OF SUCH DAMAGE.
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
27 */
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
28
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
29 #include "text.h"
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
30
940
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
31 static W32WidgetClass textarea_widget_class = {
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
32 .eventproc = ui_textarea_eventproc,
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
33 .enable = w32_widget_default_enable,
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
34 .show = w32_widget_default_show,
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
35 .get_preferred_size = ui_textarea_get_preferred_size,
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
36 .destroy = w32_widget_default_destroy
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
37 };
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
38
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
39 UIWIDGET ui_textarea_create(UiObject *obj, UiTextAreaArgs *args) {
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
40 HINSTANCE hInstance = GetModuleHandle(NULL);
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
41 UiContainerPrivate *container = ui_obj_container(obj);
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
42 HWND parent = ui_container_get_parent(container);
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
43 UiLayout layout = UI_ARGS2LAYOUT(args);
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
44
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
45 int width = args->width >= 0 ? args->width : 100;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
46 int height = args->height >= 0 ? args->height : 100;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
47
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
48 HWND hwnd = CreateWindowEx(
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
49 0,
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
50 "EDIT",
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
51 "",
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
52 WS_CHILD | WS_VISIBLE | WS_BORDER | ES_LEFT | ES_MULTILINE | ES_AUTOVSCROLL | ES_AUTOHSCROLL | ES_WANTRETURN | WS_VSCROLL,
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
53 0, 0, width, height,
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
54 parent,
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
55 (HMENU)0,
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
56 hInstance,
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
57 NULL);
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
58 ui_win32_set_ui_font(hwnd);
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
59
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
60 W32Widget *widget = w32_widget_create(&textarea_widget_class, hwnd, sizeof(UiTextArea));
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
61 ui_container_add(container, widget, &layout);
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
62
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
63 UiTextArea *textarea = (UiTextArea*)widget;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
64 textarea->width = width;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
65 textarea->widget.var = uic_widget_var(obj->ctx, obj->ctx, args->value, args->varname, UI_VAR_TEXT);
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
66 textarea->widget.callback = args->onchange;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
67 textarea->widget.callbackdata = args->onchangedata;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
68
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
69 if (textarea->widget.var) {
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
70 UiText *t = textarea->widget.var->value;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
71
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
72 if (t->value.ptr) {
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
73 // TODO: set textarea string
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
74 }
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
75 t->obj = widget;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
76 t->save = ui_textarea_save;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
77 t->destroy = ui_textarea_destroy;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
78 t->restore = ui_textarea_restore;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
79 t->get = ui_textarea_get;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
80 t->set = ui_textarea_set;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
81 t->getsubstr = ui_textarea_getsubstr;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
82 t->insert = ui_textarea_insert;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
83 t->setposition = ui_textarea_setposition;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
84 t->position = ui_textarea_position;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
85 t->setselection = ui_textarea_setselection;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
86 t->selection = ui_textarea_selection;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
87 t->length = ui_textarea_length;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
88 t->remove = ui_textarea_remove;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
89 }
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
90
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
91 return widget;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
92 }
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
93
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
94 W32Size ui_textarea_get_preferred_size(W32Widget *widget) {
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
95 W32Size size;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
96 UiTextArea *textarea = (UiTextArea*)widget;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
97 size.width = textarea->width;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
98 size.height = textarea->height;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
99 return size;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
100 }
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
101
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
102 int ui_textarea_eventproc(W32Widget *widget, HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) {
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
103 return 0;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
104 }
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
105
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
106 void ui_textarea_save(UiText *text) {
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
107
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
108 }
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
109
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
110 void ui_textarea_destroy(UiText *text) {
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
111
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
112 }
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
113
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
114 void ui_textarea_restore(UiText *text) {
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
115
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
116 }
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
117
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
118 void ui_textarea_set(UiText *text, const char *str) {
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
119
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
120 }
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
121
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
122 char* ui_textarea_get(UiText *text) {
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
123 return NULL;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
124 }
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
125
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
126 char* ui_textarea_getsubstr(UiText *text, int begin, int end) {
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
127 return NULL;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
128 }
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
129
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
130 void ui_textarea_insert(UiText *text, int pos, char *str) {
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
131
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
132 }
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
133
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
134 void ui_textarea_setposition(UiText *text, int pos) {
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
135
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
136 }
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
137
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
138 int ui_textarea_position(UiText *text) {
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
139 return 0;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
140 }
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
141
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
142 void ui_textarea_setselection(UiText *text, int begin, int end) {
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
143
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
144 }
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
145
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
146 void ui_textarea_selection(UiText *text, int *begin, int *end) {
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
147
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
148 }
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
149
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
150 int ui_textarea_length(UiText *text) {
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
151 return 0;
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
152 }
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
153
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
154 void ui_textarea_remove(UiText *text, int begin, int end) {
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
155
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
156 }
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
157
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
158 /* ----------------------------- TextField ----------------------------- */
105bccb3dc66 add textarea
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 938
diff changeset
159
880
9c99ff36513f add container event proc (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 879
diff changeset
160 static W32WidgetClass textfield_widget_class = {
873
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
161 .eventproc = ui_textfield_eventproc,
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
162 .enable = w32_widget_default_enable,
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
163 .show = w32_widget_default_show,
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
164 .get_preferred_size = ui_textfield_get_preferred_size,
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
165 .destroy = w32_widget_default_destroy
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
166 };
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
167
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
168 UIWIDGET ui_textfield_create(UiObject *obj, UiTextFieldArgs *args) {
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
169 HINSTANCE hInstance = GetModuleHandle(NULL);
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
170 UiContainerPrivate *container = ui_obj_container(obj);
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
171 HWND parent = ui_container_get_parent(container);
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
172 UiLayout layout = UI_ARGS2LAYOUT(args);
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
173
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
174 int width = args->width >= 0 ? args->width : 100;
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
175
881
e0bbf466915f fix textfield style (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 880
diff changeset
176 HWND hwnd = CreateWindowEx(
e0bbf466915f fix textfield style (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 880
diff changeset
177 WS_EX_CLIENTEDGE,
873
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
178 "EDIT",
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
179 "",
881
e0bbf466915f fix textfield style (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 880
diff changeset
180 WS_VISIBLE | WS_CHILD | ES_LEFT | ES_AUTOHSCROLL,
873
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
181 0, 0, width, 25,
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
182 parent,
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
183 (HMENU)0,
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
184 hInstance,
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
185 NULL);
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
186 ui_win32_set_ui_font(hwnd);
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
187
880
9c99ff36513f add container event proc (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 879
diff changeset
188 W32Widget *widget = w32_widget_create(&textfield_widget_class, hwnd, sizeof(UiTextField));
873
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
189 ui_container_add(container, widget, &layout);
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
190
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
191 UiTextField *textfield = (UiTextField*)widget;
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
192 textfield->width = width;
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
193 textfield->widget.var = uic_widget_var(obj->ctx, obj->ctx, args->value, args->varname, UI_VAR_STRING);
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
194 textfield->widget.callback = args->onchange;
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
195 textfield->widget.callbackdata = args->onchangedata;
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
196
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
197 if (textfield->widget.var) {
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
198 UiString *s = textfield->widget.var->value;
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
199
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
200 if (s->value.ptr) {
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
201 // TODO: set textfield string
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
202 }
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
203 s->obj = widget;
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
204 s->get = ui_textfield_get;
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
205 s->set = ui_textfield_set;
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
206 }
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
207
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
208 return widget;
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
209 }
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
210
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
211 W32Size ui_textfield_get_preferred_size(W32Widget *widget) {
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
212 UiTextField *textfield = (UiTextField *)widget;
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
213 return (W32Size){ .width = textfield->width, .height = 32};
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
214 }
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
215
938
be4c88ded783 change w32 eventproc signature + fix grid repaint bug (Win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 881
diff changeset
216 int ui_textfield_eventproc(W32Widget *widget, HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) {
be4c88ded783 change w32 eventproc signature + fix grid repaint bug (Win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 881
diff changeset
217 return 0;
873
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
218 }
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
219
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
220 char* ui_textfield_get(UiString *s) {
879
d3acaa5fc3d8 implement the textfield get/set functions (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 873
diff changeset
221 UiTextField *textfield = s->obj;
d3acaa5fc3d8 implement the textfield get/set functions (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 873
diff changeset
222
d3acaa5fc3d8 implement the textfield get/set functions (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 873
diff changeset
223 if (s->value.free) {
d3acaa5fc3d8 implement the textfield get/set functions (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 873
diff changeset
224 s->value.free(s->value.ptr);
d3acaa5fc3d8 implement the textfield get/set functions (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 873
diff changeset
225 }
d3acaa5fc3d8 implement the textfield get/set functions (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 873
diff changeset
226
d3acaa5fc3d8 implement the textfield get/set functions (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 873
diff changeset
227 int len = GetWindowTextLength(textfield->widget.widget.hwnd);
d3acaa5fc3d8 implement the textfield get/set functions (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 873
diff changeset
228 s->value.ptr = calloc(len+1, 1);
d3acaa5fc3d8 implement the textfield get/set functions (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 873
diff changeset
229 GetWindowText(textfield->widget.widget.hwnd, s->value.ptr, len+1);
d3acaa5fc3d8 implement the textfield get/set functions (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 873
diff changeset
230
d3acaa5fc3d8 implement the textfield get/set functions (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 873
diff changeset
231 return s->value.ptr;
873
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
232 }
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
233
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
234 void ui_textfield_set(UiString *s, const char *value) {
879
d3acaa5fc3d8 implement the textfield get/set functions (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 873
diff changeset
235 UiTextField *textfield = s->obj;
d3acaa5fc3d8 implement the textfield get/set functions (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 873
diff changeset
236 if (s->value.free) {
d3acaa5fc3d8 implement the textfield get/set functions (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 873
diff changeset
237 s->value.free(s->value.ptr);
d3acaa5fc3d8 implement the textfield get/set functions (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 873
diff changeset
238 }
d3acaa5fc3d8 implement the textfield get/set functions (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 873
diff changeset
239 s->value.ptr = NULL;
d3acaa5fc3d8 implement the textfield get/set functions (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 873
diff changeset
240 SetWindowText(textfield->widget.widget.hwnd, value);
873
78853bfc47cf add textfield (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
241 }

mercurial