プログラム言語 FreeBasic |
GadgetID
GadgetID(number)
Function GadgetID(ByVal gadget As Integer) As HWND
番号(識別子)で、ガジェットのハンドルを取得できます。
number - ガジェットの番号 (識別子)
Windows , Linux
例:
#Include "window9.bi"
Dim As Integer cal,event
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