Function GadgetY(ByVal gadget As long) As Long
Позволяет получать расположение гаджета по оси Y.
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: Easily create iPhone documentation