Код:
UsePNGImageDecoder()
#WINSTA_ALL = 983935
#DESKTOP_ALL = 983551
#Button = 4
hWinSta=OpenWindowStation_("WinSta0",0,#WINSTA_ALL)
SetProcessWindowStation_(hWinSta)
hDesk=CreateDesktop_("My Desktop 2",0,0,#DF_ALLOWOTHERACCOUNTHOOK,#DESKTOP_ALL,0)
SetThreadDesktop_(hDesk)
SwitchDesktop_(hDesk)
Enumeration
#IMAGE_FILE
#IMAGE_DISPLAY
EndEnumeration
hwin= OpenWindow(0, 0, 0, 1366, 768, "block",#PB_Window_ScreenCentered)
StringGadget(1,100,100,200,20,"",#PB_String_Password)
ButtonGadget(#Button,100,135,200,30,"Ok")
If LoadImage(#IMAGE_FILE, "c:\g.png")
ImageGadget(#IMAGE_DISPLAY, 0, 0, 1366, 768, ImageID(#IMAGE_FILE))
Repeat
Event=WindowEvent()
If Event=#PB_Event_Gadget
EventGadget=EventGadget()
EventType=EventType()
If EventGadget=#Button
If GetGadgetText(1)="12345"
Break
Else
MessageBox_(hWin,"invalid password",0)
EndIf
EndIf
EndIf
ForEver
EndIf
hDefaultDesk=OpenDesktop_("Default",#DF_ALLOWOTHERACCOUNTHOOK,0,#DESKTOP_SWITCHDESKTOP)
SwitchDesktop_(hDefaultDesk)
SetThreadDesktop_(hDefaultDesk)
CloseDesktop_(hDesk)
CloseDesktop_(hDefaultDesk)
CloseWindowStation_(hWinSta)Программа должна завершиться при вводе правильного пароля. Но после загрузки картинки ничего кроме картинки программа больше не выводит(пароль вводить некуда). Помогите, скажите что нужно сделать, чтобы окна выводились.