http://forum.codejock.com/ Copyright (c) 2006-2013 Web Wiz Forums - All Rights Reserved. Wed, 13 May 2026 00:20:02 +0000 Sat, 28 May 2022 12:21:27 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 12.04 360 forum.codejock.com/RSS_post_feed.asp?TID=24291 http://forum.codejock.com/forum_images/codejock-logo.gif http://forum.codejock.com/ http://forum.codejock.com/forum_posts.asp?TID=24291&PID=78440&title=freeze-popup-menu#78440 Author: doktor.pj
Subject: 24291
Posted: 28 May 2022 at 12:21pm

I've created a menu that works for a few problems

- if I move from item to item in the menu, it is a matter of time when the menu (application) freezes. Sometimes after switching to another popup menu, the previous menu will remain displayed until I return to it.See. attachment uploads/7161/menu.zip

- Clicking on individual panels does not work in the status barHere is an example code:

DEFINE CLASS classStatBar AS session OLEPUBLIC
    IMPLEMENTS IStatusBarEvents IN "CODEJOCK.COMMANDBARS.20.3.0"

    PROCEDURE IStatusBarEvents_MouseDown(Button AS INTEGER, Shift AS INTEGER, x AS Number, y AS Number) AS VOID
        * add user code here
        MESSAGEBOX(STR(Button)+STR(Shift),64,"IStatusBarEvents_MouseDown")
    ENDPROC

    PROCEDURE IStatusBarEvents_MouseUp(Button AS INTEGER, Shift AS INTEGER, x AS Number, y AS Number) AS VOID
        * add user code here
        MESSAGEBOX(STR(Button)+STR(Shift)+STR(_screen.active_pane),64,"IStatusBarEvents_MouseUp")
    ENDPROC

    PROCEDURE IStatusBarEvents_PaneDblClick(Pane AS VARIANT) AS VOID
        * add user code here
        MESSAGEBOX(pane.id,64,"PaneDblClick (statusbar.prg)")
    ENDPROC

    PROCEDURE IStatusBarEvents_PaneClick(Pane AS VARIANT) AS VOID
        * add user code here
        MESSAGEBOX(_screen.active_pane, 64, "IStatusBarEvents_PaneClick")
    ENDPROC

    PROCEDURE IStatusBarEvents_SwitchPaneClick(Pane AS VARIANT, Switch AS Number) AS VOID
        * add user code here
    ENDPROC

    PROCEDURE IStatusBarEvents_SliderPaneClick(Pane AS VARIANT, Command AS VARIANT, Pos AS Number) AS VOID
        * add user code here
    ENDPROC
ENDDEFINE

Development environment: Visual foxpro 9.0

]]> Sat, 28 May 2022 12:21:27 +0000 http://forum.codejock.com/forum_posts.asp?TID=24291&PID=78440&title=freeze-popup-menu#78440