[*]Profan

Italia

E.T.

so wie auf einem per cls oder Window x,y geöffnetem Fenster, potuto Trackmenu auf mit @Create("Window",... oder @Create("Dialog",... erzeugten Fenster funktionieren ???

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...

29.11.2010 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione

« Dieser Beitrag wurde als Lösung gekennzeichnet. »

Sowas?
Kompilieren Markieren Separieren

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

29.11.2010 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione

Schauma dis täts doch:
Kompilieren Markieren Separieren

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

29.11.2010 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione

E.T.

Hab aber kein Hauptfenster, brauche den Dialog, bevor das %HWnd erstellt wird

.
Auf dem Dialog liegt ein Button, und wenn dieser geklickt wird, will ich das 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...

29.11.2010 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione

Sowas?
Kompilieren Markieren Separieren

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

29.11.2010 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione

E.T.

So gehts, und da ich 'nen Button abfrage (statt der rechten Maustaste) brauch ich noch nichtmal irgendwelche 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...

29.11.2010 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione