[ű]
=Simple
[ȼ]
=F6
ֹͣ=F11
ͣ=F10
[Attachment]
Number=0
[]
'űں
Public Const SW_NORMAL = 1
Sub Main()
Hwnd = HGUI.CreateWindow("Me",100,10,300,500)
print Hwnd
HwndButton = HGUI.CreateButton(Hwnd,"Button",20,0,50,50)
HwndPicture = HGUI.CreatePictureBox(Hwnd,"Picture",20,50,30,50)
HwndEdit = HGUI.CreateEdit(Hwnd,"Edit",20,100,50,50)
HwndCheck = HGUI.CreateCheckBox(Hwnd,"Check",20,150,70,50)
HwndComboBox = HGUI.CreateComboBox(Hwnd,"ComboBox",20,200,50,50)
HwndListBox = HGUI.CreateListBox(Hwnd,"ListBox",20,250,50,50)
HwndGroupBox = HGUI.CreateGroupBox(Hwnd,"GroupBox",20,300,100,50)
HwndRadio = HGUI.CreateRadio(Hwnd,"Radio",20,350,70,50)
HwndStatic = HGUI.CreateStatic(Hwnd,"Static",20,400,50,50)
HGUI.SetIcon Hwnd,"F:\\Key\Key\res\key.ico"
HGUI.Show HwndButton,SW_NORMAL
HGUI.Show HwndPicture,SW_NORMAL
HGUI.Show HwndEdit,SW_NORMAL
HGUI.Show HwndCheck,SW_NORMAL
HGUI.Show HwndComboBox,SW_NORMAL
HGUI.Show HwndListBox,SW_NORMAL
HGUI.Show HwndGroupBox,SW_NORMAL
HGUI.Show HwndRadio,SW_NORMAL
HGUI.Show HwndStatic,SW_NORMAL
HGUI.Show Hwnd,SW_NORMAL
HGUI.SetEvent HwndButton,0,"Button_Click"
HGUI.Run
End Sub

Sub Button_Click()
print "Button Click"
End Sub

Sub Edit_Change()
print "Edit Change"
End Sub
[]
