Function GadgetID(ByVal gadget As Integer) As HWND
Позволяет получать хендл гаджета по его номеру(идентификатору)
gadget - номер гаджета
Windows , Linux
#Include "window9.bi"
Dim As Integer event
dim as HWND cal
OpenWindow("",10,10,300,300)
cal=CalendarGadget(1,10,10,220,220)
'-----------------
? cal
? ID_In_Number(cal)
? GadgetID(1)
'-----------------
Do
event=WaitEvent()
If event= eventclose Then End
Loop
Created with the Personal Edition of HelpNDoc: Full featured EPub generator