Image Popup Menu -> checkmark on image

[jacdelad]

Before filing an error report: Is it normal for the "checkbox" to be on the icon of an item within an ImagePopupMenu?

Code: Select all

UsePNGImageDecoder()
OpenWindow(0,0,0,400,300,"Test",#PB_Window_ScreenCentered|#PB_Window_SystemMenu)
CreatePopupImageMenu(0)
MenuItem(1,"Test1",ImageID(CatchImage(#PB_Any,?Image)))
MenuItem(2,"Test2",ImageID(CatchImage(#PB_Any,?Image)))
SetMenuItemState(0,1,1)

Repeat
  Select WaitWindowEvent()
    Case #PB_Event_LeftClick
      DisplayPopupMenu(0,WindowID(0))
    Case #PB_Event_CloseWindow
      Break
  EndSelect
ForEver

DataSection
  Image:
    Data.q $0A1A0A0D474E5089,$524448490D000000,$1000000010000000,$FFF31F0000000608,$4144490203000061,$7490039254DA7854,$FF31BEC3CF461447,$AB63976DB6DB15B5,$C6DB6DB6DB629610,$E9D0F33D8C599ADA,$5D2BE7BCD3AEE938,$AFD8607FDF6B38F6,$DF27F4DD0ED47F45,$AFEE7A3F5CFE870B,$0D0FB29B066B854D,$C8F0FFCC6B7D7F47,$DFCEFFEEB26EDD7C,$5D8FF75EAB606D07,$7630B895B43B6C2F,$7AB4F8857F2A78B2,$2F958C5DBCC5F89B,$A5BC42C513E9D317,$1E8EF0B3B9E032B6,$060775C7C3005FFD,$9DC5739988E1F9F6,$2F393EE263C507A5,$399217C5338BCF10,$B859854789A8A171,$FC37D5150F871443,$5BEA2E9112D75BAF,$7B8DE8D5B8626C67,$193DE6B770DCF605,$E171546323F12CF0,$ADD150784D2F05A6,$A3BB5CB8930BD12F,$03171A2B55EC7B6A,$EB5AE06EFB8D28A8,$8F2307E4B7EB1D80,$907297E3F4A9569F,$5619A14A33C82436,$38F6DF1409B1682A,$B1BABCCD4F49C089,$0D7781B31C7572EA,$A9BA51AA4D144F74,$442568F85D0897A7,$6125EBA42B6AAE3B,$761BD1F8AB415898,$6F437523D5E6E4F3,$7828AFC4DBCDBF5B,$1363D4125203C369,$2512026C86C2FC01,$34519580D160A788,$DA8EA9B7513315AD,$F828EB310BAE12D1,$02102B3C81810D01,$03C9619448458AEA,$B5A1A5A835E60371,$6CB949D0E9456B0D,$00BF8A60CA7030C7,$9A803560924A02CA,$25942CF9072E408D,$5B11996062B3054E,$F6D6268CF9F41737,$1B4901C8258A1416
    Data.q $6608D1F82A182AB4,$245402C508A64157,$3C2B4C25E5A53A2D,$8233D357C66256A5,$B10A31202664050D,$AC4FEA7A408F8801,$32055C9022C42F19,$CB0658EC9D5CE9CC,$E67C1E2E32AC7FF6,$B07284592DCAD33D,$09C98A4A4965243C,$21878814A6E438C9,$D24593D24D6F5921,$23DD4A7E1013C79F,$AF1DCAD1A5C7F07D,$2ABD4D90CD6457BF,$D2166A43CCC869A5,$6B0DC965418C9033,$8E68FB98B8F39335,$935CB3C2F4BEE992,$C95EF7A2F359002A,$55BC1A49B3FCF0BD,$60A8415B9A0DD8F6,$959B776540F4E0EA,$977D49A6E7B19952,$F6450076FF8FD9BB,$589F97773D6F0033,$1B6DFB69CA1F7CEA,$475C23A017D3AE08,$29E3380A97D1B1D4,$28CAEA44371136F8,$FFCEEBD6785EB7CB,$FAE978DC1F1EFE02,$1572DAC06C0FE40D,$337A966EDB11ABA2,$33F5B6FCF1D5D3E2,$F30007AB23EFBA0A,$005BBE4B64F0760F,$AE444E4549000000
    Data.b $42,$60,$82
EndDataSection

Windows 10, x64, PureBasic 6.03 ASM

[spikey]

Menu bars do the same thing - I know the IDE contains code to suppress these combinations. I haven't got any other applications installed which combine these behaviours to compare to - which leads me to suspect this might be the reason why I don't.

[Fred]

Usually you don't put an image with a checkbox. We could enforce this to ignore the image if the check box is activated.

[jacdelad]

Thanks for the answers. I'd like to have both if possible. I'll look through the APIs.

[spikey]

You could prefix, or postfix, the check mark to the menu item text:

Code: Select all

UsePNGImageDecoder()
OpenWindow(0,0,0,400,300,"Test",#PB_Window_ScreenCentered|#PB_Window_SystemMenu)
CreatePopupImageMenu(0)
MenuItem(1, Chr(10004) + " Test1" ,ImageID(CatchImage(#PB_Any,?Image)))
MenuItem(2,"Test2 " + Chr(10004),ImageID(CatchImage(#PB_Any,?Image)))
; SetMenuItemState(0,1,1)

Repeat
  Select WaitWindowEvent()
    Case #PB_Event_LeftClick
      DisplayPopupMenu(0,WindowID(0))
    Case #PB_Event_CloseWindow
      Break
  EndSelect
ForEver

DataSection
  Image:
    Data.q $0A1A0A0D474E5089,$524448490D000000,$1000000010000000,$FFF31F0000000608,$4144490203000061,$7490039254DA7854,$FF31BEC3CF461447,$AB63976DB6DB15B5,$C6DB6DB6DB629610,$E9D0F33D8C599ADA,$5D2BE7BCD3AEE938,$AFD8607FDF6B38F6,$DF27F4DD0ED47F45,$AFEE7A3F5CFE870B,$0D0FB29B066B854D,$C8F0FFCC6B7D7F47,$DFCEFFEEB26EDD7C,$5D8FF75EAB606D07,$7630B895B43B6C2F,$7AB4F8857F2A78B2,$2F958C5DBCC5F89B,$A5BC42C513E9D317,$1E8EF0B3B9E032B6,$060775C7C3005FFD,$9DC5739988E1F9F6,$2F393EE263C507A5,$399217C5338BCF10,$B859854789A8A171,$FC37D5150F871443,$5BEA2E9112D75BAF,$7B8DE8D5B8626C67,$193DE6B770DCF605,$E171546323F12CF0,$ADD150784D2F05A6,$A3BB5CB8930BD12F,$03171A2B55EC7B6A,$EB5AE06EFB8D28A8,$8F2307E4B7EB1D80,$907297E3F4A9569F,$5619A14A33C82436,$38F6DF1409B1682A,$B1BABCCD4F49C089,$0D7781B31C7572EA,$A9BA51AA4D144F74,$442568F85D0897A7,$6125EBA42B6AAE3B,$761BD1F8AB415898,$6F437523D5E6E4F3,$7828AFC4DBCDBF5B,$1363D4125203C369,$2512026C86C2FC01,$34519580D160A788,$DA8EA9B7513315AD,$F828EB310BAE12D1,$02102B3C81810D01,$03C9619448458AEA,$B5A1A5A835E60371,$6CB949D0E9456B0D,$00BF8A60CA7030C7,$9A803560924A02CA,$25942CF9072E408D,$5B11996062B3054E,$F6D6268CF9F41737,$1B4901C8258A1416
    Data.q $6608D1F82A182AB4,$245402C508A64157,$3C2B4C25E5A53A2D,$8233D357C66256A5,$B10A31202664050D,$AC4FEA7A408F8801,$32055C9022C42F19,$CB0658EC9D5CE9CC,$E67C1E2E32AC7FF6,$B07284592DCAD33D,$09C98A4A4965243C,$21878814A6E438C9,$D24593D24D6F5921,$23DD4A7E1013C79F,$AF1DCAD1A5C7F07D,$2ABD4D90CD6457BF,$D2166A43CCC869A5,$6B0DC965418C9033,$8E68FB98B8F39335,$935CB3C2F4BEE992,$C95EF7A2F359002A,$55BC1A49B3FCF0BD,$60A8415B9A0DD8F6,$959B776540F4E0EA,$977D49A6E7B19952,$F6450076FF8FD9BB,$589F97773D6F0033,$1B6DFB69CA1F7CEA,$475C23A017D3AE08,$29E3380A97D1B1D4,$28CAEA44371136F8,$FFCEEBD6785EB7CB,$FAE978DC1F1EFE02,$1572DAC06C0FE40D,$337A966EDB11ABA2,$33F5B6FCF1D5D3E2,$F30007AB23EFBA0A,$005BBE4B64F0760F,$AE444E4549000000
    Data.b $42,$60,$82
EndDataSection

[jacdelad]

That's a great idea. Thanks!