martin/aqhomecontrol
Public Access
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

gui: more work on dialogs.

Browse Source
This commit is contained in:
Martin Preuss
2026-05-08 12:20:43 +02:00
parent b0d9c46d87
commit d149c5667f
3 changed files with 67 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

51
avr/modules/lcd2/gui/base/dialog.asm
View File

@@ -70,8 +70,20 @@ Dialog_Init_ret:
Dialog_AddDefaultButtons:
bigcall MainWindow_GetContentWidget ; r19:r18=content window
brcc Dialog_AddDefaultButtons_ret
mov xl, r18 ; use content window as parent
mov xh, r19
ldi r16, 0 ; OPTS
ldi r17, (WIDGET_PACK_END<<WIDGET_PACK_HSELF0_BIT) | (WIDGET_PACK_END<<WIDGET_PACK_VSELF0_BIT) ; PACK
push zl
push zh
ldi zl, LOW(Dialog_ButtonsConfig*2)
ldi zh, HIGH(Dialog_ButtonsConfig*2)
bigcall CWidget_Create
pop zh
pop zl
ret
; create HLayout
push yl
@@ -188,6 +200,45 @@ Dialog_OnAbort:
; ***************************************************************************
; data in FLASH
Dialog_ButtonsConfig:
.db CWIDGETCFG_MAINWIDGET_TYPE_HLAYOUT, 0 ; TYPE, FLAGS
.dw (Dialog_HLayoutStyle*2) ; STYLE
.db HLAYOUT_MODE_EXPAND, 0 ; PARAM1, PARAM2
; ok button
.db CWIDGETCFG_WIDGET_TYPE_TEXTBUTTON, 0 ; TYPE, FLAGS
.db DIALOG_SEL_OKBUTTON, 0 ; SELECTOR, RESERVED
.db (1<<WIDGET_OPTS_BORDER_BIT), \
(WIDGET_PACK_END<<WIDGET_PACK_HSELF0_BIT) | \
(WIDGET_PACK_END<<WIDGET_PACK_VSELF0_BIT) | \
(WIDGET_PACK_CENTER<<WIDGET_PACK_HCONTENT0_BIT) | \
(WIDGET_PACK_CENTER<<WIDGET_PACK_VCONTENT0_BIT) ; OPTS, PACK
.dw (DefaultStyle_SpacyButton*2) ; STYLE
.dw RESSOURCE_TXT_DIALOGOK ; PARAM1, PARAM2 (text ressource)
.db DIALOG_SEL_OKBUTTON, BUTTON_MODE_NORMAL ; PARAM3, PARAM4
.dw 0, 0 ; MINVAL, MAXVAL
; abort button
.db CWIDGETCFG_WIDGET_TYPE_TEXTBUTTON, 0 ; TYPE, FLAGS
.db DIALOG_SEL_ABORTBUTTON, 0 ; SELECTOR, RESERVED
.db (1<<WIDGET_OPTS_BORDER_BIT), \
(WIDGET_PACK_END<<WIDGET_PACK_HSELF0_BIT) | \
(WIDGET_PACK_END<<WIDGET_PACK_VSELF0_BIT) | \
(WIDGET_PACK_CENTER<<WIDGET_PACK_HCONTENT0_BIT) | \
(WIDGET_PACK_CENTER<<WIDGET_PACK_VCONTENT0_BIT) ; OPTS, PACK
.dw (DefaultStyle_SpacyButton*2) ; STYLE
.dw RESSOURCE_TXT_DIALOGABORT ; PARAM1, PARAM2 (text ressource)
.db DIALOG_SEL_ABORTBUTTON, BUTTON_MODE_NORMAL ; PARAM3, PARAM4
.dw 0, 0 ; MINVAL, MAXVAL
; end of configuration
.dw 0
; @end
; ---------------------------------------------------------------------------
; @data Dialog_HLayoutStyle