XProfan

Deutsch

Andreas
Koch

Hallo zusammen,

gerade versuche ich mich ein wenig an Toolbars und habe dazu eine Frage.
Bei mir tritt folgendes Problem auf: wenn ich dem Static& in meinem Beispielquellcode eine Toolbar hinzufüge, reagieren die Buttons der Toolbar zwar, aber ich habe keine Möglichkeit sie abzufragen, weil %menuitem nicht beschrieben wird.
Kompilieren Markieren Separieren

Window 0,0-%MaxX,%maxy
var Static&=Control("STATIC","",$5400110E,0,0, (@Width(%hwnd)*0.58),(@Height(%hwnd)*0.5),%hwnd,0,%HINSTANCE)
var toolbar&=Create("Toolbar",Static&,0,0,2,600,2)
Toolbar("AddTextButton", Toolbar&, 1, 600,"+" ,"")
Toolbar("AddTextButton", Toolbar&, 1, 601,"-" ,"")
Toolbar("AddTextButton", Toolbar&, 2, 602,"+" ,"")
Toolbar("AddTextButton", Toolbar&, 2, 603,"-" ,"")

WhileNot %key=27

    WaitInput
    SetText %hwnd, Str$(%MenuItem)

EndWhile

Muss das der Toolbar übergeordnete Fenster einen bestimmten Stil haben oder muss ich die Buttons irgendwie anders abfragen?

Schönen Gruß und ein frohes neues Jahr.

Andreas Koch

XProfan X2
Win7 Enterprise, SP1, Xeon X5670 @ 2.93GHz

08.01.2013 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

« Dieser Beitrag wurde als Lösung gekennzeichnet. »

Andreas
Miethe

DOKTOR XPROFAN EHRENHALBER

Ist schon alles richtig so.
Du musst nur die Meldungen an Dein Hauptfenster umleiten.
Dafür gibt es eine spezielle Toolbar-Message.
Kompilieren Markieren Separieren

Sendmessage(Toolbar&,1061,%hwnd,0)'~TB_SETPARENT

XProfan X2
Gruss
Andreas
________ ________ ________ ________ _
Profan 3.3 - XProfanX2
Win 95,98,ME,2000,XP,Vista - Win 7 32 / 64 Bit
ASUS X93S - Intel Core I7-NVIDIA GForce 540M 8GB Arbeitsspeicher
Homepage : [...]