XProfan

Français

Beschreibung:

SetCapture leitet alle Eingaben qui souris eines Threads sur cela angegebene la fenêtre um. qui la déviation wird aufgehoben, si le API Capture de sortie aufgerufen wird, ou bien un la fenêtre eines anderen Threads den Concentrer erhält.

Deklaration:

DEF @SetCapture(1) !USER32,SetCapture

paramètre:

1.paramètre: Handle des Fensters, sur cela qui Mauseingaben umgeleitet volonté devoir.

Rückgabewert:

chez Erfolg cela Handle des Fensters, sur cela zuvor qui Mauseingaben umgeleitet wurden. Existiert ne...aucune solches la fenêtre, wird 0 retour. chez einem faute wird 0 retour.

Beispiele:

Kompilieren Marque Séparation

DEF @SetCapture(1) !"USER32","SetCapture"
DEF @ReleaseCapture(0) !"USER32","ReleaseCapture"
DEF @GetCapture(0) !"USER32","GetCapture"
Windowstyle 31+512
Windowtitle "Maus in Fenster einfangen!"
Window 0,0-640,440
Declare Release&,Set&,Message&
LET SET&=@CreateButton(%HWND,"Mauseingabe einfangen",10,50,250,30)
LET Release&=@CreateButton(%HWND,"Maus freilassen",10,100,250,30)
LET Message&=@CreateButton(%HWND,"Message ausgeben",10,150,250,30)

Whilenot %MENUITEM=-2

    Drawtext 0,0,"Welches Fenster hat den Capture: "+@GetText$(@GetCapture())+@Space$(255)
    Waitinput

    IF @Getfocus(Set&)

        @SetCapture(Release&)

    ElseIF @Getfocus(Release&)

        @ReleaseCapture()
        @MessageBox("Maus wieder frei!","Release!",64)

    ElseIF @Getfocus(Message&)

        @MessageBox("Eingabe möglich","Test",64)

    endif

Wend