Platforms to show: All Mac Windows Linux Cross-Platform
This item is deprecated and should no longer be used.
/MacCF/CFXMLTree
Function:
Required plugins for this example: MBS MacCF Plugin, MBS Main Plugin
You find this example project in your Plugins Download as a Xojo project file within the examples folder: /MacCF/CFXMLTree
This example is the version from Sun, 17th Mar 2012.
Function:
Required plugins for this example: MBS MacCF Plugin, MBS Main Plugin
You find this example project in your Plugins Download as a Xojo project file within the examples folder: /MacCF/CFXMLTree
This example is the version from Sun, 17th Mar 2012.
Project "CFXMLTree.xojo_binary_project"
Class Window1 Inherits Window
EventHandler Sub Open()
dim f as FolderItem
dim ct as CFTreeMBS
f=SpecialFolder.Desktop.Child("xml.xml") // any xml file
if not f.Exists then
MsgBox "you need to a xml file for this demo!"
else
ct=new CFTreeMBS
ct.CreateWithXMlDataFromURL NewCFURLMBSFile(f),8
printtree ct
end if
End EventHandler
Sub printtree(t as cftreembs)
dim childCount as integer
dim TreeNode as CFTreeMBS
dim node as CFXMLNodeMBS
dim index as integer
childCount = t.ChildCount
for index=0 to childCount-1
TreeNode = t.ChildAtIndex(index)
node=TreeNode.XMLNode
CFShowMBS node
PrintTree(TreeNode)
next
End Sub
End Class
MenuBar Menu
MenuItem UntitledMenu3 = ""
MenuItem UntitledMenu2 = "File"
MenuItem FileQuit = "Quit"
MenuItem UntitledMenu0 = "Edit"
MenuItem EditUndo = "Undo"
MenuItem UntitledMenu1 = "-"
MenuItem EditCut = "Cut"
MenuItem EditCopy = "Copy"
MenuItem EditPaste = "Paste"
MenuItem EditClear = "Clear"
End MenuBar
Class App Inherits Application
End Class
End Project
The items on this page are in the following plugins: MBS MacCF Plugin.
Feedback: Report problem or ask question.