ui/win32/button.c

Thu, 09 Oct 2025 18:49:19 +0200

author
Olaf Wintermann <olaf.wintermann@gmail.com>
date
Thu, 09 Oct 2025 18:49:19 +0200
changeset 825
1bac7e45712b
parent 817
d09817e6e6a4
child 841
651cf2c59dd9
permissions
-rw-r--r--

implement button onclick event (win32)

665
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
1 /*
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
2 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
3 *
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
4 * Copyright 2025 Olaf Wintermann. All rights reserved.
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
5 *
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
6 * Redistribution and use in source and binary forms, with or without
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
7 * modification, are permitted provided that the following conditions are met:
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
8 *
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
9 * 1. Redistributions of source code must retain the above copyright
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
10 * notice, this list of conditions and the following disclaimer.
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
11 *
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
12 * 2. Redistributions in binary form must reproduce the above copyright
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
13 * notice, this list of conditions and the following disclaimer in the
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
14 * documentation and/or other materials provided with the distribution.
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
15 *
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
16 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
17 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
19 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
20 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
21 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
22 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
23 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
24 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
73689d24080c add missing include
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
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
26 * POSSIBILITY OF SUCH DAMAGE.
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
27 */
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
28
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
29 #include "button.h"
814
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
30 #include "widget.h"
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
31
825
1bac7e45712b implement button onclick event (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 817
diff changeset
32 #include <stdio.h>
1bac7e45712b implement button onclick event (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 817
diff changeset
33 #include <stdlib.h>
1bac7e45712b implement button onclick event (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 817
diff changeset
34
814
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
35 static W32WidgetClass button_widget_class = {
825
1bac7e45712b implement button onclick event (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 817
diff changeset
36 .eventproc = ui_button_eventproc,
814
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
37 .enable = w32_widget_default_enable,
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
38 .show = w32_widget_default_show,
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
39 .get_preferred_size = ui_button_get_preferred_size,
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
40 .destroy = w32_widget_default_destroy
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
41 };
665
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
42
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
43 UIWIDGET ui_button_create(UiObject *obj, UiButtonArgs *args) {
814
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
44 HINSTANCE hInstance = GetModuleHandle(NULL);
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
45 UiContainerPrivate *container = ui_obj_container(obj);
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
46 HWND parent = ui_container_get_parent(container);
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
47 UiLayout layout = UI_ARGS2LAYOUT(args);
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
48
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
49 HWND hwnd = CreateWindow(
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
50 "BUTTON",
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
51 args->label,
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
52 WS_VISIBLE | WS_CHILD | BS_DEFPUSHBUTTON,
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
53 0, 0, 100, 30,
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
54 parent,
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
55 (HMENU)0,
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
56 hInstance,
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
57 NULL);
817
d09817e6e6a4 use a modern font (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 815
diff changeset
58 ui_win32_set_ui_font(hwnd);
814
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
59
825
1bac7e45712b implement button onclick event (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 817
diff changeset
60 W32Widget *widget = w32_widget_create(&button_widget_class, hwnd, sizeof(UiWidget));
814
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
61 ui_container_add(container, widget, &layout);
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
62
825
1bac7e45712b implement button onclick event (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 817
diff changeset
63 UiWidget *btn = (UiWidget*)widget;
1bac7e45712b implement button onclick event (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 817
diff changeset
64 btn->obj = obj;
1bac7e45712b implement button onclick event (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 817
diff changeset
65 btn->callback = args->onclick;
1bac7e45712b implement button onclick event (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 817
diff changeset
66 btn->callbackdata = args->onclickdata;
1bac7e45712b implement button onclick event (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 817
diff changeset
67
814
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
68 return widget;
665
73689d24080c add missing include
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
69 }
814
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
70
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
71 W32Size ui_button_get_preferred_size(W32Widget *widget) {
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
72 W32Size size;
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
73 size.width = 100;
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
74 size.height = 30;
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
75 return size;
bcb3c7d486f3 add container base (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 665
diff changeset
76 }
825
1bac7e45712b implement button onclick event (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 817
diff changeset
77
1bac7e45712b implement button onclick event (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 817
diff changeset
78 void ui_button_eventproc(W32Widget *widget, HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) {
1bac7e45712b implement button onclick event (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 817
diff changeset
79 UiWidget *w = (UiWidget*)widget;
1bac7e45712b implement button onclick event (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 817
diff changeset
80
1bac7e45712b implement button onclick event (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 817
diff changeset
81 UiEvent e;
1bac7e45712b implement button onclick event (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 817
diff changeset
82 e.obj = w->obj;
1bac7e45712b implement button onclick event (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 817
diff changeset
83 e.document = e.obj->ctx->document;
1bac7e45712b implement button onclick event (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 817
diff changeset
84 e.window = e.obj->window;
1bac7e45712b implement button onclick event (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 817
diff changeset
85 e.eventdata = NULL;
1bac7e45712b implement button onclick event (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 817
diff changeset
86 e.eventdatatype = 0;
1bac7e45712b implement button onclick event (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 817
diff changeset
87 e.intval = 0;
1bac7e45712b implement button onclick event (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 817
diff changeset
88 e.set = ui_get_setop();
1bac7e45712b implement button onclick event (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 817
diff changeset
89
1bac7e45712b implement button onclick event (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 817
diff changeset
90 if (w->callback) {
1bac7e45712b implement button onclick event (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 817
diff changeset
91 w->callback(&e, w->callbackdata);
1bac7e45712b implement button onclick event (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 817
diff changeset
92 }
1bac7e45712b implement button onclick event (win32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents: 817
diff changeset
93 }

mercurial