ui/qt/text.cpp

9 days ago

author
Olaf Wintermann <olaf.wintermann@gmail.com>
date
Sun, 30 Mar 2025 12:00:26 +0200 (9 days ago)
changeset 535
ede57f5b6178
parent 528
fb1dca7d83da
permissions
-rw-r--r--

add QT implementation for menubars, sub-menus and simple menu items

56
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
1 /*
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
2 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
3 *
528
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
4 * Copyright 2025 Olaf Wintermann. All rights reserved.
56
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
5 *
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
6 * Redistribution and use in source and binary forms, with or without
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
7 * modification, are permitted provided that the following conditions are met:
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
8 *
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
9 * 1. Redistributions of source code must retain the above copyright
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
10 * notice, this list of conditions and the following disclaimer.
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
11 *
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
12 * 2. Redistributions in binary form must reproduce the above copyright
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
13 * notice, this list of conditions and the following disclaimer in the
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
14 * documentation and/or other materials provided with the distribution.
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
15 *
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
16 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
17 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
19 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
20 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
21 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
22 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
23 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
24 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
87e3a5dc66dd added text widget (Qt)
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
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
26 * POSSIBILITY OF SUCH DAMAGE.
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
27 */
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
28
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
29 #include "text.h"
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
30 #include "container.h"
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
31
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
32 #include "../common/context.h"
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
33 #include "../common/document.h"
87e3a5dc66dd added text widget (Qt)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
34
528
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
35 /*
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
36 * Gets or creates a QTextDocument for the UiText value and initializes it
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
37 * with the UiText string value
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
38 */
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
39 static QTextDocument* get_or_create_doc(UiText *value) {
527
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
40 QTextDocument *document = nullptr;
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
41 if(value->data1) {
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
42 document = (QTextDocument*)value->data1;
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
43 } else {
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
44 document = new QTextDocument();
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
45 if(value->value.ptr) {
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
46 QString str = QString::fromUtf8(value->value.ptr);
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
47 document->setPlainText(str);
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
48 }
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
49 }
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
50
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
51 if(value->value.free) {
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
52 value->value.free(value->value.ptr);
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
53 }
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
54 value->value.ptr = NULL;
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
55 value->value.free = NULL;
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
56
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
57 return document;
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
58 }
523
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
59
527
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
60 UIWIDGET ui_textarea_create(UiObject *obj, UiTextAreaArgs args) {
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
61 UiContainerPrivate *ctn = ui_obj_container(obj);
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
62 UI_APPLY_LAYOUT(ctn->layout, args);
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
63
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
64 QTextEdit *textarea = new QTextEdit();
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
65 ctn->add(textarea, true);
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
66
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
67 QTextDocument *document = nullptr;
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
68
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
69 UiVar* var = uic_widget_var(obj->ctx, obj->ctx, args.value, args.varname, UI_VAR_STRING);
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
70 if(var) {
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
71 UiText *value = (UiText*)var->value;
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
72
528
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
73 document = get_or_create_doc(value);
527
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
74
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
75 value->save = ui_textarea_save;
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
76 value->restore = ui_textarea_restore;
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
77 value->destroy = ui_textarea_text_destroy;
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
78 value->get = ui_textarea_get;
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
79 value->set = ui_textarea_set;
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
80 value->getsubstr = ui_textarea_getsubstr;
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
81 value->insert = ui_textarea_insert;
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
82 value->setposition = ui_textarea_setposition;
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
83 value->position = ui_textarea_position;
528
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
84 value->setselection = ui_textarea_setselection;
527
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
85 value->selection = ui_textarea_selection;
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
86 value->length = ui_textarea_length;
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
87 value->remove = ui_textarea_remove;
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
88 value->obj = textarea;
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
89 value->data1 = document;
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
90 } else {
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
91 document = new QTextDocument();
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
92 }
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
93
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
94 textarea->setDocument(document);
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
95
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
96 return textarea;
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
97 }
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
98
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
99 void ui_textarea_save(UiText *text) {
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
100 // NOOP
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
101 }
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
102
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
103 void ui_textarea_restore(UiText *text) {
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
104 QTextEdit *textarea = (QTextEdit*)text->obj;
528
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
105 QTextDocument *document = get_or_create_doc(text);
527
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
106 textarea->setDocument(document);
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
107 }
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
108
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
109 void ui_textarea_text_destroy(UiText *text) {
528
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
110 QTextDocument *document = (QTextDocument*)text->data1;
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
111 if(document) {
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
112 delete document;
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
113 }
527
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
114 }
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
115
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
116 char* ui_textarea_get(UiText *text) {
528
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
117 // clean previous value
527
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
118 if(text->value.free) {
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
119 text->value.free(text->value.ptr);
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
120 }
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
121
528
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
122 // get string
527
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
123 QTextDocument *doc = (QTextDocument*)text->data1;
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
124 QString str = doc->toPlainText();
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
125 QByteArray array = str.toUtf8();
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
126 const char *cstr = array.constData();
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
127
528
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
128 // store a copy of the string in the UiText value
527
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
129 text->value.ptr = strdup(cstr);
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
130 text->value.free = free;
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
131 return text->value.ptr;
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
132 }
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
133
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
134 void ui_textarea_set(UiText *text, const char *str) {
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
135 if(text->value.free) {
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
136 text->value.free(text->value.ptr);
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
137 }
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
138 text->value.ptr = NULL;
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
139 text->value.free = NULL;
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
140
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
141 QTextDocument *doc = (QTextDocument*)text->data1;
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
142 QString qstr = QString::fromUtf8(str);
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
143 doc->setPlainText(qstr);
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
144 }
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
145
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
146 char* ui_textarea_getsubstr(UiText *text, int begin, int end) {
528
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
147 QTextDocument *doc = (QTextDocument*)text->data1;
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
148 QTextCursor cursor(doc);
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
149 cursor.setPosition(begin, QTextCursor::MoveAnchor);
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
150 cursor.setPosition(end, QTextCursor::KeepAnchor);
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
151 QString str = cursor.selectedText();
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
152 QByteArray bytes = str.toUtf8();
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
153 const char *cstr = bytes.constData();
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
154 return cstr ? strdup(cstr) : NULL;
527
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
155 }
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
156
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
157 void ui_textarea_insert(UiText *text, int pos, char *str) {
528
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
158 QTextDocument *doc = (QTextDocument*)text->data1;
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
159 QTextCursor cursor(doc);
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
160 cursor.setPosition(pos);
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
161 cursor.insertText(str);
527
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
162 }
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
163
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
164 void ui_textarea_setposition(UiText *text, int pos) {
528
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
165 QTextEdit *textview = (QTextEdit*)text->obj;
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
166 QTextCursor cursor = textview->textCursor();
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
167 cursor.setPosition(pos);
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
168 textview->setTextCursor(cursor);
527
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
169 }
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
170
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
171 int ui_textarea_position(UiText *text) {
528
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
172 QTextEdit *textview = (QTextEdit*)text->obj;
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
173 QTextCursor cursor = textview->textCursor();
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
174 return cursor.position();
527
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
175 }
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
176
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
177 void ui_textarea_selection(UiText *text, int *begin, int *end) {
528
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
178 QTextEdit *textview = (QTextEdit*)text->obj;
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
179 QTextCursor cursor = textview->textCursor();
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
180 if(cursor.hasSelection()) {
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
181 if(begin) {
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
182 *begin = cursor.selectionStart();
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
183 }
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
184 if(end) {
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
185 *end = cursor.selectionEnd();
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
186 }
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
187 }
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
188 }
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
189
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
190 void ui_textarea_setselection(UiText *text, int begin, int end) {
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
191 QTextEdit *textview = (QTextEdit*)text->obj;
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
192 QTextCursor cursor = textview->textCursor();
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
193 cursor.setPosition(begin, QTextCursor::MoveAnchor);
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
194 cursor.setPosition(end, QTextCursor::KeepAnchor);
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
195 textview->setTextCursor(cursor);
527
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
196 }
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
197
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
198 int ui_textarea_length(UiText *text) {
528
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
199 QTextDocument *doc = (QTextDocument*)text->data1;
fb1dca7d83da implement remaining textarea functions (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 527
diff changeset
200 return doc->characterCount();
527
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
201 }
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
202
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
203 void ui_textarea_remove(UiText *text, int begin, int end) {
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
204 // TODO
7273a78e8e5b add textarea (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 524
diff changeset
205 }
523
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
206
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
207 /* ------------------------------ TextField ------------------------------ */
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
208
524
ce7a198b54b0 implement passwordfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 523
diff changeset
209 static UIWIDGET create_textfield(UiObject *obj, UiTextFieldArgs args, bool password, bool frameless) {
523
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
210 UiContainerPrivate *ctn = ui_obj_container(obj);
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
211 UI_APPLY_LAYOUT(ctn->layout, args);
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
212
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
213 QLineEdit *textfield = new QLineEdit();
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
214 ctn->add(textfield, false);
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
215
524
ce7a198b54b0 implement passwordfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 523
diff changeset
216 if(password) {
ce7a198b54b0 implement passwordfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 523
diff changeset
217 textfield->setEchoMode(QLineEdit::Password);
ce7a198b54b0 implement passwordfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 523
diff changeset
218 }
ce7a198b54b0 implement passwordfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 523
diff changeset
219
523
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
220 UiVar* var = uic_widget_var(obj->ctx, obj->ctx, args.value, args.varname, UI_VAR_STRING);
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
221 if(var) {
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
222 UiString *value = (UiString*)var->value;
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
223 if(value->value.ptr) {
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
224 QString str = QString::fromUtf8(value->value.ptr);
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
225 textfield->setText(str);
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
226 if(value->value.free) {
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
227 value->value.free(value->value.ptr);
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
228 }
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
229 value->value.ptr = NULL;
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
230 }
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
231
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
232 value->set = ui_textfield_set;
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
233 value->get = ui_textfield_get;
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
234 value->obj = textfield;
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
235 }
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
236
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
237 return textfield;
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
238 }
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
239
524
ce7a198b54b0 implement passwordfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 523
diff changeset
240 UIWIDGET ui_textfield_create(UiObject *obj, UiTextFieldArgs args) {
ce7a198b54b0 implement passwordfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 523
diff changeset
241 return create_textfield(obj, args, false, false);
ce7a198b54b0 implement passwordfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 523
diff changeset
242 }
ce7a198b54b0 implement passwordfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 523
diff changeset
243
ce7a198b54b0 implement passwordfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 523
diff changeset
244 UIWIDGET ui_frameless_textfield_create(UiObject* obj, UiTextFieldArgs args) {
ce7a198b54b0 implement passwordfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 523
diff changeset
245 return create_textfield(obj, args, false, true);
ce7a198b54b0 implement passwordfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 523
diff changeset
246 }
ce7a198b54b0 implement passwordfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 523
diff changeset
247
ce7a198b54b0 implement passwordfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 523
diff changeset
248 UIWIDGET ui_passwordfield_create(UiObject* obj, UiTextFieldArgs args) {
ce7a198b54b0 implement passwordfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 523
diff changeset
249 return create_textfield(obj, args, true, false);
ce7a198b54b0 implement passwordfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 523
diff changeset
250 }
ce7a198b54b0 implement passwordfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 523
diff changeset
251
523
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
252 char* ui_textfield_get(UiString *str) {
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
253 QLineEdit *textfield = (QLineEdit*)str->obj;
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
254 QString qstr = textfield->text();
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
255
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
256 if(str->value.free) {
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
257 str->value.free(str->value.ptr);
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
258 }
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
259 QByteArray array = qstr.toUtf8();
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
260 const char *cstr = array.constData();
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
261 str->value.ptr = strdup(cstr);
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
262 str->value.free = free;
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
263
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
264 return str->value.ptr;
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
265 }
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
266
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
267 void ui_textfield_set(UiString *str, const char *value) {
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
268 QLineEdit *textfield = (QLineEdit*)str->obj;
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
269 QString qstr = QString::fromUtf8(value);
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
270 textfield->setText(qstr);
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
271
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
272 if(str->value.free) {
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
273 str->value.free(str->value.ptr);
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
274 }
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
275 str->value.ptr = NULL;
0797c87a2c02 add textfield (QT)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 516
diff changeset
276 }

mercurial