[*]Profan

English

E.T.

so How on one by cls or Window x,y geöffnetem Window, could Trackmenu on with @Create("Window",... or @Create("Dialog",... begot Window functions ???

Grüße aus Sachsen... Mario
WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte...

11/29/10 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

« this Posting watts as Solution marked. »

Something like?
Compile Mark Separation

windowStyle 2048
cls
userMessages 123,16// wm_contextMenu,wm_close
var w&=create("dialog",%hWnd,"Huhu",10,10,100,100)

while 1

    waitinput

    select %uMessage

        caseof 123

        createMenu
        appendMenu 100,"oi"

        select trackMenu()

            caseof 100 : break

        endSelect

        caseof 16

        break

    endSelect

wend

11/29/10 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Schauma dis täts still:
Compile Mark Separation

cls
userMessages 123// wm_contextMenu
var w&=create("dialog",%hWnd,"Huhu",10,10,100,100)

while 1

    waitinput

    if %uMessage=123

        createMenu
        appendMenu 100,"oi"
        trackMenu()

    endif

wend

11/29/10 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

E.T.

Have but no Mainwindow, need whom dialog, before the %HWnd prepares becomes

.
on the dialog lying one Button, and if this clicked becomes, I will the Trackmenü...

Grüße aus Sachsen... Mario
WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte...

11/29/10 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Something like?
Compile Mark Separation

windowStyle 2048
cls
userMessages 123,16// wm_contextMenu,wm_close
var w&=create("dialog",%hWnd,"Huhu",10,10,100,100)

while 1

    waitinput

    select %uMessage

        caseof 123

        createMenu
        appendMenu 100,"oi"

        select trackMenu()

            caseof 100 : break

        endSelect

        caseof 16

        break

    endSelect

wend

11/29/10 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

E.T.

so GEHTS, and I 'nen Button request (instead of the rechten Mouse button) custom I yet not even any Messages "verbiegen".

Grüße aus Sachsen... Mario
WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte...

11/29/10 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote