Doppelklick auf IPAddressGadget erfassen. [erledigt]

Anfängerfragen zum Programmieren mit PureBasic.
Benutzeravatar
Fluid Byte
Beiträge: 3110
Registriert: 27.09.2006 22:06
Wohnort: Berlin, Mitte

Beitrag von Fluid Byte »

Oder hat es was mit 64-Bit zu tun? Doch eigentlich nicht oder? Das ist die offizielle Methode soweit ich mich erinnere.

Das ist doch die Geschichte hier:

http://www.purebasic.fr/english/viewtop ... wfrompoint
Windows 10 Pro, 64-Bit / Outtakes | Derek
Kaeru Gaman
Beiträge: 17389
Registriert: 10.11.2004 03:22

Beitrag von Kaeru Gaman »

danke für den link, fluid... hatte meinen container gesucht.

@Elektrolurch

wenn du einen Union-container benutzt, kannst du dir das bitshift sparen:

Code: Alles auswählen

Structure ValPoint
  StructureUnion
    P.POINT
    V.q
  EndStructureUnion
EndStructure

Define cp.ValPoint

cp\p\x = 384
cp\p\x = 256

PtInRect_(*lprc, cp\V )
Der Narr denkt er sei ein weiser Mann.
Der Weise weiß, dass er ein Narr ist.
Benutzeravatar
Elektrolurch
Beiträge: 168
Registriert: 11.10.2007 16:48
Wohnort: 49°26'51.46"N - 8°59'49.06"E
Kontaktdaten:

Beitrag von Elektrolurch »

Hi all

Sorry ich bin halt noch Anfänger und habe leider die letzten Tips nicht verstanden. Das macht aber nichts ich habe für mich nun eine akzeptable Lösung gefunden.

Code: Alles auswählen

Case #WM_LBUTTONDBLCLK  
            cx = WindowMouseX(#Window_0)
            cy = WindowMouseY(#Window_0)
            If cx > 280 And cx < 485 And cy > 10 And cy < 35
              Debug "Gadgettreffer"
            EndIf   
Ist schnucklig klein und erkennt jeden doppelklick aud dem IPAdressgadget.

Danke für eure Mühe.

Bye Andre
Benutzeravatar
Fluid Byte
Beiträge: 3110
Registriert: 27.09.2006 22:06
Wohnort: Berlin, Mitte

Beitrag von Fluid Byte »

Oder so ... :lol:
Windows 10 Pro, 64-Bit / Outtakes | Derek
Andesdaf
Moderator
Beiträge: 2673
Registriert: 15.06.2008 18:22
Wohnort: Dresden

Beitrag von Andesdaf »

... bloß schwieriger wenn's reiszed wird.
Win11 x64 | PB 6.20
Benutzeravatar
Fluid Byte
Beiträge: 3110
Registriert: 27.09.2006 22:06
Wohnort: Berlin, Mitte

Beitrag von Fluid Byte »

Ja ne, wird Position oder Größe verändert is' Essig aber das ist ja anscheidend nicht gewünscht.
Windows 10 Pro, 64-Bit / Outtakes | Derek
Benutzeravatar
Elektrolurch
Beiträge: 168
Registriert: 11.10.2007 16:48
Wohnort: 49°26'51.46"N - 8°59'49.06"E
Kontaktdaten:

Beitrag von Elektrolurch »

Hi

Beim verschieben des Fensters passiert nichts da es ja Fensterorientierte Koordinaten sind.

Und Größenänderung des Fensters habe ich schon deshalb verhindert, weil ich sonst ja das Layout anpassen müßte.

Meine User sollen das Programm benutzen, nicht verändern. :lol:

Bye Andre
Kaeru Gaman
Beiträge: 17389
Registriert: 10.11.2004 03:22

Beitrag von Kaeru Gaman »

einleuchtender Weise meinte Fluid
>>> Position oder Größe
des Gadgets.

... aber auch dafür kann man Abhilfe schaffen ...

Code: Alles auswählen

Case #WM_LBUTTONDBLCLK 
    cx = WindowMouseX(#Window_0)
    cy = WindowMouseY(#Window_0)
    Gx = GadgetX(#IPAdd)
    Gy = GadgetY(#IPAdd)
    Gw = GadgetWidth(#IPAdd)
    Gh = GadgetHeight(#IPAdd)
    If cx > Gx And cx < Gx + Gw And cy > Gy And cy < Gy + Gh
      Debug "Gadgettreffer"
    EndIf
Der Narr denkt er sei ein weiser Mann.
Der Weise weiß, dass er ein Narr ist.
Antworten