DelToolTip

Синтаксис

Sub DelToolTip(ByVal GadgetPARRENT As long,ByVal gadget As long)

Описание

Удаляет всплывающую подсказку

Параметры

GadgetPARRENT - гаджет, для которого сделана подсказка

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

Платформы

Windows , Linux

Пример

#Include "window9.bi"
OpenWindow("",10,10,400,100)
StringGadget(1,10,10,100,20)
ButtonGadget(2,120,10,230,20,"Убрать подсказку у гаджетов")
GadgetToolTip(1,"это строковой гаджет",3)
GadgetToolTip(2,"это кнопка",4)
Do
  var event=WaitEvent()
  If event=eventclose Then End
  If event=eventgadget Then
     If eventnumber()=2 Then
        DelToolTip(1,3)
        DelToolTip(2,4)
     EndIf
  EndIf
Loop

Результат

Created with the Personal Edition of HelpNDoc: iPhone web sites made easy