| |
| |
|
| - page 1 - |
|
Julian
Schmidt | Salut,
je serait volontiers une Tooltip sur une Contrôle aktivieren bzw. désactiver.
Bisher habe je es erfolglos sur Showwindow, EnableWindow & Settext probiert.
comment peux on cela bewerkstelligen (ausgenommen vom Effacer\Wiedererstellen des Tooltips)?
CLS
Var static&=Créer("Text",%hwnd,»,10,10,195,20)
Var button&=Créer("Button",%hwnd,"Change Status",10,40,195,30)
Var ttip&=Créer("Tooltip",%hwnd,%hwnd,"Tooltip-Text")
Var status&=1
Settext static&,Str$(status&)+" = Tooltip wird "+Si(status&=1,"ein","aus")+"geblendet"
WhileNot iskey(27)
Waitinput
Si getfocus(button&)
status&=Not(status&)
'Showwindow(ttip&,status&)
'EnableWindow(ttip&,status&)
SetText ttip&, Si(status&=1,%hwnd,0),Si(status&=1,%hwnd,0), "Tooltip-Text"
Settext static&,Str$(status&)+" = Tooltip wird "+Si(status&=1,"ein","aus")+"geblendet"
SetFocus(%hwnd)
Endif
Endwhile
LG
Julian57 |
|
| |
| |
| |
|
 |
« cette Beitrag wurde comme Solution gekennzeichnet. » |
|
Jörg
Sellmeyer |
CLS
Var static&=Créer("Text",%hwnd,»,10,10,195,20)
Var button&=Créer("Button",%hwnd,"Change Status",10,40,195,30)
Var ttip&=Créer("Tooltip",%hwnd,%hwnd,"Tooltip-Text")
Var status&=1
Settext static&,Str$(status&)+" = Tooltip wird "+Si(status&=1,"ein","aus")+"geblendet"
WhileNot iskey(27)
Waitinput
Si Clicked(button&)
status&=Not(status&)
SetText ttip&,%hwnd,%hwnd,Si(status&, "Tooltip-Text",»)
Settext static&,Str$(status&)+" = Tooltip wird "+Si(status&=1,"ein","aus")+"geblendet"
SetFocus(%hwnd)
Endif
Endwhile
|
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ...  | 09.07.2012 ▲ |
|
| |
|
|
|
Julian
Schmidt | ergänzend en supplément [...] 
|
|
| |
| |
| |
|
(1.171)
Deutsch
English
Français
Español
Italia