Code: Alles auswählen
#Dialog = 0
#Xml = 0
  
XML$ = "  <window name='test' flags='#PB_Window_SystemMenu|#PB_Window_ScreenCentered'>"
XML$ + "    <statusbar id='0'>"
XML$ + "      <field/>"
XML$ + "      <field/>"
XML$ + "      <field/>"
XML$ + "    </statusbar>"
XML$ + "    <editor name='editor_1' height='100'/>"
XML$ + "  </window>"
 
If ParseXML(#Xml, 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



 
 
