when i try to run this code
Code: Select all
#Xml = 0
#Dialog = 0
xml$ = "<window name='test' text='Window' width='300'>"
xml$ + "<hbox expand='item:2'>"
xml$ + "<spin width='80' min='1' max='3' flags='#PB_Spin_Numeric'/>"
xml$ + "<button/>"
xml$ + "</hbox>"
xml$ + "</window>"
If CatchXML(#Xml, @xml$, StringByteLength(xml$)) And XMLStatus(#Xml) = #PB_XML_Success
If CreateDialog(#Dialog) And OpenXMLDialog(#Dialog, #Xml, "test")
Repeat
Event = WaitWindowEvent()
Until Event = #PB_Event_CloseWindow
Else
Debug "Dialog error: " + DialogError(#Dialog)
EndIf
Else
Debug "XML error: " + XMLError(#Xml) + " (Line: " + XMLErrorLine(#Xml) + ")"
EndIf
With 5.51 it runs fine.
Regards Uwe