| |
| |
|
| - Página 1 - |
|
Julian
Schmidt | ¡Hola,
Yo sería como un Tooltip en una Control aktivieren o. deaktivieren.
Bisher Yo lo erfolglos encima Showwindow, EnableWindow & Settext probiert.
¿Cómo se puede al bewerkstelligen (salvo vom Löschen\Wiedererstellen des Tooltips)?
CLS
Var static&=Crear("Text",%hwnd,"",10,10,195,20)
Var button&=Crear("Button",%hwnd,"Change Status",10,40,195,30)
Var ttip&=Crear("Tooltip",%hwnd,%hwnd,"Tooltip-Text")
Var status&=1
Settext static&,Str$(status&)+" = Tooltip se "+If(status&=1,"ein","aus")+"geblendet"
Sinestar encargado iskey(27)
Waitinput
If getfocus(button&)
status&=Not(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 se "+If(status&=1,"ein","aus")+"geblendet"
Setfocus(%hwnd)
Endif
EndWhile
LG
Julian57 |
|
| |
| |
| |
|
 |
« Dieser Contribución wurde como Solución gekennzeichnet. » |
|
Jörg
Sellmeyer |
CLS
Var static&=Crear("Text",%hwnd,"",10,10,195,20)
Var button&=Crear("Button",%hwnd,"Change Status",10,40,195,30)
Var ttip&=Crear("Tooltip",%hwnd,%hwnd,"Tooltip-Text")
Var status&=1
Settext static&,Str$(status&)+" = Tooltip se "+If(status&=1,"ein","aus")+"geblendet"
Sinestar encargado iskey(27)
Waitinput
If Clicked(button&)
status&=Not(status&)
SetText ttip&,%hwnd,%hwnd,If(status&, "Tooltip-Text","")
Settext static&,Str$(status&)+" = Tooltip se "+If(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 | |
| |
| |
| |
|
(506)
Deutsch
English
Français
Español
Italia