If I open this pbf file with the option "generate event loop" in preferences, the last part of
Code: Select all
; Form Designer for Purebasic - 5.0
; Warning: this file uses a strict syntax, if you edit it, make sure to respect the Form Designer limitation or it won't be opened again.
Global ButtonImage_0
Global Img_0
Enumeration #PB_Compiler_EnumerationValue
#Window_secret
EndEnumeration
Enumeration #PB_Compiler_EnumerationValue
#String_primo
#String_secondo
#Editor_Messaggio
EndEnumeration
UsePNGImageDecoder()
Img_0 = CatchImage(#PB_Any,?img_0)
Enumeration #PB_Compiler_EnumerationValue
#Font_0
EndEnumeration
LoadFont(#Font_0,"Arial", 8)
Procedure InitWindow_secret()
OpenWindow(#Window_secret, 0, 0, 350, 270, "", #PB_Window_SystemMenu | #PB_Window_Tool)
StringGadget(#String_primo, 10, 230, 60, 30, "", #PB_String_Numeric)
SetGadgetColor(#String_primo, #PB_Gadget_BackColor,RGB(255,255,128))
SetGadgetFont(#String_primo, FontID(#Font_0))
StringGadget(#String_secondo, 90, 230, 60, 30, "", #PB_String_Numeric)
SetGadgetColor(#String_secondo, #PB_Gadget_BackColor,RGB(255,255,128))
SetGadgetFont(#String_secondo, FontID(#Font_0))
ButtonImage_0 = ButtonImageGadget(#PB_Any, 170, 210, 48, 48, ImageID(Img_0))
EditorGadget(#Editor_Messaggio, 10, 10, 330, 190, #PB_Editor_ReadOnly)
EndProcedure
Procedure Window_secret_Events(event)
Select event
Case #PB_Event_Gadget
Select EventGadget()
EndSelect
EndSelect
EndProcedure
DataSection
img_0: IncludeBinary "C:\ZZZZ_Ardi_Go\Explorer\check48.png"
EndDataSection
Code: Select all
EndDataSection
img_0: IncludeBinary "C:\ZZZZ_Ardi_Go\Explorer\check48.png"
EndDataSection