Clarion v11.1.13855 Easy Multitag

questions
1

I have recently upgraded clarion from v11.0.0.13505 to v11.111385.

There is a bug in Easy Multi Tag that no longer recognizes when the user clicks on the tag checkbox.
I have reported this to Ingasoft a long time ago but have never received a reply.
Even their own example program does not work.
I am hoping they see this post!

The workaround someone posted was…

In the Browse Window Control Added to Source code Embed on Control Events New Selection Priority 5000

! 6/9/21 Work around for tagging not working after clarion v11.1 Build 13758
IF (?Browse:1{PROPLIST:MouseDownRow} > 0)
    CASE ?Browse:1{PROPLIST:MouseDownField}
    OF 1
        ThisWindow.Update
        IF MultiTag:1.IsSelected()
            MultiTag:1.UnTag
        ELSE
            MultiTag:1.Tag
        END
    END
END

This works ok, BUT if the user uses their mouse wheel then the program goes into a never ending loop.

PLEASE Ingasoft fix the problem!

2

Try below which I found does work on v11.111385.
It has one additional line of code ?Browse:1{PROPLIST:MouseDownField} = 0
which prevents the looping on the mouse wheel.

By the way there is a Source Code Edition (EMT SCE) of Easy MultiTag.
I am currently using the standard edition which I agree needs to be corrected by IngaSoft.

IF (?Browse:1{PROPLIST:MouseDownRow} > 0)
    CASE ?Browse:1{PROPLIST:MouseDownField}
    OF 1
	    ?Browse:1{PROPLIST:MouseDownField} = 0
        ThisWindow.Update
        IF MultiTag:1.IsSelected()
            MultiTag:1.UnTag
        ELSE
            MultiTag:1.Tag
        END
    END
END
3

Albert, much appreciated!
Thank you!!