gui: fixed ValueLabel to also use WIDGET_VALUE_CURRENTVALUE

This commit is contained in:
Martin Preuss
2026-05-09 01:59:47 +02:00
parent 35a45e5cb2
commit 21b6a992ff
4 changed files with 27 additions and 26 deletions

View File

@@ -240,7 +240,7 @@ hSpinnerSendValue:
ldd xh, Y+HSPINNER_OFFS_CURVALUE_HI
mov yl, r18
mov yh, r19
bigcall ValueLabel_SetValue ; (any, !Y)
bigcall Widget_SetCurrentValue ; (any, !Y)
pop yh
pop yl

View File

@@ -22,10 +22,6 @@
.equ VLABEL_SIZE = VLABEL_OFFS_BEGIN+4
.equ VLABEL_VALUE = WIDGET_VALUE_NEXTFREE+0
.equ VLABEL_VALUE_NEXTFREE = WIDGET_VALUE_NEXTFREE+1
; ***************************************************************************
; code
@@ -97,19 +93,6 @@ ValueLabel_Init:
; ---------------------------------------------------------------------------
; @routine ValueLabel_SetValue @global
;
; @param Y address of widget
; @param X new value
ValueLabel_SetValue:
ldi r17, VLABEL_VALUE
bigjmp Widget_SetValue ; (any, !Y)
; @end
; ---------------------------------------------------------------------------
; @routine ValueLabel_OnSetValue @global
;
@@ -132,6 +115,24 @@ ValueLabel_OnSetValue:
; ---------------------------------------------------------------------------
; @routine ValueLabel_OnGetValue @global
;
; @param Y address of widget
; @param X new value
; @return CFLAG set if signal handled
; @return r19:r18 value
; @clobbers r17
ValueLabel_OnGetValue:
ldd r18, Y+VLABEL_OFFS_VALUE_LO
ldd r19, Y+VLABEL_OFFS_VALUE_HI
sec
ret
; @end
; ---------------------------------------------------------------------------
; @routine ValueLabel_OnDraw @global
;
@@ -285,7 +286,8 @@ ValueLabel_DefaultSignalmap:
.dw Widget_DefaultSignalmap*2 ; next table to use
; entries
.db 0, WIDGET_SIGNAL_DRAW, LOW(ValueLabel_OnDraw), HIGH(ValueLabel_OnDraw)
.db VLABEL_VALUE, WIDGET_SIGNAL_SETVALUE, LOW(ValueLabel_OnSetValue), HIGH(ValueLabel_OnSetValue)
.db WIDGET_VALUE_CURRENTVALUE, WIDGET_SIGNAL_SETVALUE, LOW(ValueLabel_OnSetValue), HIGH(ValueLabel_OnSetValue)
.db WIDGET_VALUE_CURRENTVALUE, WIDGET_SIGNAL_GETVALUE, LOW(ValueLabel_OnGetValue), HIGH(ValueLabel_OnGetValue)
.db WIDGET_VALUE_DEFAULT_WIDTH, WIDGET_SIGNAL_GETVALUE, LOW(ValueLabel_OnGetDefaultWidth), HIGH(ValueLabel_OnGetDefaultWidth)
.db WIDGET_VALUE_DEFAULT_HEIGHT, WIDGET_SIGNAL_GETVALUE, LOW(ValueLabel_OnGetDefaultHeight), HIGH(ValueLabel_OnGetDefaultHeight)