GadgetX

Синтаксис

Function GadgetX(ByVal gadget As long) As Long

Описание

Позволяет получать расположение гаджета по оси Х.

Параметры

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

Платформы

Windows , Linux

Пример

#Include "window9.bi"
Dim As Integer event
OpenWindow("",10,10,300,300)
CalendarGadget(1,15,10,220,220)
'-----------------
? GadgetX(1)
? GadgetY(1)
'-----------------
Do
  event=WaitEvent()
  If event= eventclose Then End
Loop

Результат

15
10

Created with the Personal Edition of HelpNDoc: Free iPhone documentation generator