show command list while using text tool.

This commit is contained in:
visionmercer 2026-05-29 10:10:01 +02:00
commit 4126beddc2

View file

@ -187,8 +187,8 @@ do
canvas canvas
if showtoolbox then toolbox if showtoolbox then toolbox
if showcolorpicker then colorpicker if showcolorpicker then colorpicker
if showcommands then commandlist
if state.tool = 12 then drawTextToolPanel if state.tool = 12 then drawTextToolPanel
if showcommands then commandlist
_limit 30 _limit 30
_display _display
loop loop
@ -221,6 +221,12 @@ sub drawTextToolPanel
dim x as integer: x = _width - panelWidth dim x as integer: x = _width - panelWidth
static showFontList as integer ' Tracks the expanding drop-down list state static showFontList as integer ' Tracks the expanding drop-down list state
if showcommands then
x = _width - panelWidth - 250
else
x = _width - panelWidth
end if
' Draw the side panel background card block ' Draw the side panel background card block
line (x, 0)-(_width - 1, _height - 1), backgroundcolor1, bf line (x, 0)-(_width - 1, _height - 1), backgroundcolor1, bf
line (x, 0)-(x, _height - 1), backgroundcolor2 line (x, 0)-(x, _height - 1), backgroundcolor2