XProfan

English

Julian
Schmidt

Hi,
i'd gladly a Tooltip on a Control enable or. deaktivieren.
yet have I it erfolglos over Showwindow, EnableWindow & Settext probiert.
How can the manage (except of Delete\Wiedererstellen the Tooltips)?

Compile Mark Separation

CLS
Var static&=Create("Text",%hwnd,"",10,10,195,20)
Var button&=Create("Button",%hwnd,"Change Status",10,40,195,30)
Var ttip&=Create("Tooltip",%hwnd,%hwnd,"Tooltip-Text")
Var status&=1
Settext  static&,Str $(status&)+" = Tooltip becomes "+If(status&=1,"ein","aus")+"geblendet"

WhileNot iskey(27)

    Waitinput

    If getfocus(button&)

        status&=hardship(status&)
        'Showwindow(ttip&,status&)
        'EnableWindow(ttip&,status&)
        SetText ttip&, If(status&=1,%hwnd,0),If(status&=1,%hwnd,0), "Tooltip-Text"
        Settext  static&,Str $(status&)+" = Tooltip becomes "+If(status&=1,"ein","aus")+"geblendet"
        Setfocus(%hwnd)

    Endif

EndWhile

LG

Julian57

XProfan X2
Win7 Home Premium, SP1, AMD Athlon(tm) II Neo K125 Processor
˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗
Webseite [...]

07/08/12 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

« this Posting watts as Solution marked. »

Jörg
Sellmeyer

Compile Mark Separation

CLS
Var static&=Create("Text",%hwnd,"",10,10,195,20)
Var button&=Create("Button",%hwnd,"Change Status",10,40,195,30)
Var ttip&=Create("Tooltip",%hwnd,%hwnd,"Tooltip-Text")
Var status&=1
Settext  static&,Str $(status&)+" = Tooltip becomes "+If(status&=1,"ein","aus")+"geblendet"

WhileNot iskey(27)

    Waitinput

    If Clicked(button&)

        status&=hardship(status&)
        SetText ttip&,%hwnd,%hwnd,If(status&, "Tooltip-Text","")
        Settext  static&,Str $(status&)+" = Tooltip becomes "+If(status&=1,"ein","aus")+"geblendet"
        Setfocus(%hwnd)

    Endif

EndWhile

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...

07/09/12 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Julian
Schmidt

ergänzend moreover [...]

Compile Mark Separation

Tooltip deaktivieren:
SendMessage(tip&, ~TTM_ACTIVATE, 0, 0)
Tooltip again enable:
SendMessage(tip&, ~TTM_ACTIVATE, 1, 0)

XProfan X2
˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗
Webseite [...]

07/09/12 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Answer

Topic-Options

Unreaded
subscribe
Remember-List
Notes
guests
Delete
Permanent
Done

6.409 Views

Untitled	vor 0 min.
Uwe Lang	03/04/21
Normann Strübli	03/31/20
Ernst	05/15/16
Walter	02/03/16
More...

Themeninformationen

this Topic has 2 subscriber:

Julian Schmidt (2x)

Jörg Sellmeyer (1x)

XProfan

Tooltip enable\deaktivieren

« this Posting watts as Solution marked. »

Answer

Topic-Options

6.409 Views

Themeninformationen

Privacy Policy