XProfan

Deutsch

Hallo Sebastian...

Wie hast du das mit den IDs der Buttons geregelt? Ich habe etwas Probleme die mit %MENUITEM abzufragen...

Gruß

Andreas

29.10.2006 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Das zeigt mir TNT als ID an. Mache ich evtl. da was falsch?

Id2.gif	107 kB

Kurzbeschreibung:	ID eines SKControl Buttons

Hochgeladen:	29.10.2006

Ladeanzahl:
		Herunterladen

29.10.2006 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Sebastian
König

[quote:a3022a28b8]Das zeigt mir TNT als ID an. Mache ich evtl. da was falsch?[/quote:a3022a28b8]Nein, die ID ist tatsächlich immer 0... Ich dachte, das wäre kein Problem, da zur Abfrage in (X)Profan ja normalerweise das Handle benutzt wird.

Du kannst aber bei Bedaf mit SetWindowLong() selbst IDs setzen. Das Problem bei einer automatischen Vergabe von IDs wäre halt, dass es womöglich Überschneidungen mit normalen Controls geben würde...

MfG

Sebastian

Windows XP, XProfan/Profan² 4.5 bis 11
Profan2Cpp-Homepage: [...]

Alte Profan²-Seite: [...]

29.10.2006 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Ich kanns ja nochmal probieren - aber wenn ich mich recht erinnere, hat genau das bei mir nicht geklappt - ich schau noch mal und liefere Quelltext, wenns Probleme gibt.

29.10.2006 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

So, hier ist Code. Was mache ich falsch?
Kompilieren Markieren Separieren

Declare REFRESH&,IMG&,DLL&,IMG$,Textfarbe&,HINTERGRUNDFARBE&,Text$
Def @GetWindowLong(2) !"USER32","GetWindowLongA"
Def @SetWindowLong(3) !"USER32","SetWindowLongA"
DEF @LoadImage(6) !"USER32","LoadImageA"
Windowstyle 31+512
WindowTitle "SetWindowLong Test"
Window 0,0-640,440
Usermessages $10
LET DLL&=@USEDLL("SKCONTROL.DLL")
 $I SKCONTROL.INC
@SKCtrl_InitDll()
LET IMG$="BAUM"
Let IMG&=@LoadImage(%HINSTANCE,@ADDR(IMG$),$1,18,18,$0)
LET Textfarbe&=@SKCtrl_RGB(150,10,10)
LET HINTERGRUNDFARBE&=@SKCtrl_RGB(255,255,255)
LET Text$="Moin"
LET REFRESH&=@SKCtrl_CreateClrImageButton(%HWND,IMG&,@ADDR(Text$),1,1,Textfarbe&,HINTERGRUNDFARBE&,340,20,-220,30,%HINSTANCE)
Print @GetWindowLong(Refresh&,$FFFFFFF4)
@SetWindowLong(Refresh&,$FFFFFFF4,112)

While %Umessage<>$10

    Waitinput
    Locate 0,0
    Print %Menuitem

wend

DeleteObject IMG&
@SKCtrl_DeInitDll()
FreeDLL DLL&

29.10.2006 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Sebastian
König

[quote:53efa3727a]So, hier ist Code. Was mache ich falsch?[/quote:53efa3727a]Gar nichts

. Der Fehler liegt in der DLL... Wie ich bei einem Blick auf meinen Code gerade festgestellt habe, wird bei der WM_COMMAND-Nachricht, die an das Eltern-Fenster geschickt wird, der GWL_ID-Wert gar nicht benutzt... Ich habe das bei den ClrImageButtons mal schnell geändert - neue Version siehe Anhang...