Так работает и главное окно открывается:
Код
AddSysTrayIcon(1,hwnd1,LoadIcon(0,IDI_WINLOGO),"SYSTRAY приложение")
ListBoxGadget(11,10,10,400,400,,WS_EX_CLIENTEDGE)
for i as integer = 0 to 300
dim ss as STRING = "" + str(i)
AddListBoxItem(11, ss)
next
А так не работает и главная форма не показывается:
Код
AddSysTrayIcon(1,hwnd1,LoadIcon(0,IDI_WINLOGO),"SYSTRAY приложение")
ListBoxGadget(11,10,10,400,400,,WS_EX_CLIENTEDGE)
for i as integer = 0 to 300
AddListBoxItem(11, str(i))
next