Code: Alles auswählen
win=OpenWindow(0,0,0,400,300,"Test v1.0 | 2007 By RiSiNG",#PB_Window_ScreenCentered|#PB_Window_SystemMenu|#PB_Window_MinimizeGadget)
CreateGadgetList(win)
GadgetToolTip(15,"")
StringGadget(16,7,232,250,20,"",#PB_String_BorderLess)
GadgetToolTip(16,"")
CreateImage(0,254,24)
StartDrawing(ImageOutput(0))
Box(0,0,254,24,RGB(255,255,255))
StopDrawing()
ImageGadget(17,5,230,254,24,ImageID(0))
Repeat
Select WaitWindowEvent()
Case #WM_CLOSE
End
Case #PB_Event_Gadget
Select EventGadget()
Case 0
EndSelect
EndSelect
ForEver
Wie könnte man diesen Bug beseitigen?