DisableToolTip

Gadget ›› GadgetToolTip ››
Parent Previous Next

DisableToolTip

Синтаксис

Sub DisableToolTip(ByVal gadget As Long, ByVal state As long)

Описание

Отключает(включает) всплывающую подсказку

Параметры

gadget - номер гаджета

state - флаг, может быть:
1 - disable
0 - enable

Платформы

Windows , Linux

Пример

#Include "window9.bi"
OpenWindow("",10,10,400,100)
StringGadget(1,10,10,100,20)
ButtonGadget(2,120,10,100,20,"disable")
ButtonGadget(3,230,10,100,20,"enable")
GadgetToolTip(1,"это строковой гаджет",4)
Do
  var event=WaitEvent()
  If event=eventclose Then End
  If event=eventgadget Then
     If eventnumber()=2 Then
        DisableToolTip(4,1)
     ElseIf eventnumber()=3 Then
        DisableToolTip(4,0)
     EndIf
  EndIf
Loop

Результат

Created with the Personal Edition of HelpNDoc: Easily create EBooks