Dear visitor, welcome to Jabaco - Community. If this is your first visit here, please read the Help. It explains in detail how this page works. To use all features of this page, you should consider registering. Please use the registration form, to register here or read more information about the registration process. If you are already registered, please login here.
Date of registration: Jul 16th 2008
Location: Erlangen, Germany
Occupation: Software Developer
Hobbies: Jabaco, game theory, text-mining
Wednesday, November 26th 2008, 4:05pm
> 1. Wie öffne und schliesse ich eine Datei zum Lesen und / oder Schreiben ?
Dafür gibt es 2 Möglichkeiten:
BASIC-like
Java-like (Lesson: Basic I/O)
> Wie ist die Syntax für das Listview-Controll, hier insbesondere das 'add' von 'childs'
Die ListBox? Genau wie in Visual Basic:
nur mit vielen coolen Extras:
Dafür gibt es 2 Möglichkeiten:
BASIC-like
|
Jabaco Source |
1 2 3 4 5 6 7 8 9 10 11 |
Public Sub Command1_Click() Dim myFile As VBFileHandler ' write myFile = Open("C:\test.txt", Random, ReadAndWrite, Shared) Call write(myFile, "testtesttest") Call Close(myFile) 'read myFile = Open("C:\test.txt", Random, ReadAndWrite, Shared) MsgBox readline(myFile) Call Close(myFile) End Sub |
Java-like (Lesson: Basic I/O)
|
|
Jabaco Source |
1 2 3 4 5 6 7 8 9 10 |
Public Sub Command1_Click() ' write Dim outputStream As New java#io#BufferedWriter(New java#io#FileWriter("c:\test.txt")) outputStream.write "abcdabcdabcd" Call outputStream.close() ' read Dim inputStream As New java#io#BufferedReader(New java#io#FileReader("c:\test.txt")) MsgBox cStr(inputStream) Call inputStream.close() End Sub |
> Wie ist die Syntax für das Listview-Controll, hier insbesondere das 'add' von 'childs'
Die ListBox? Genau wie in Visual Basic:
|
|
Jabaco Source |
1 2 3 4 5 |
Public Sub Command1_Click() List1.AddItem "add item at the end" List1.AddItem "add top-item", 0 List1.AddItem "add middle", 1 End Sub |
nur mit vielen coolen Extras:
|
|
Jabaco Source |
1 2 3 4 |
Public Sub Command1_Click() List1.AddItem New ListCellData("add item with icon", ConsoleGif) List1.AddItem New UsercontrolXYZ() End Sub |
Date of registration: Nov 24th 2008
Location: Cologne, Germany
Occupation: Second Vice President of Distributed Junk and Trash Development
Wednesday, November 26th 2008, 8:31pm
Ich meinte übrigens nicht die Listbox sondern das Treeview-Control.
Daher auch die Frage nach dem 'Child'-Objekten.
So kann man Nodes einem TreeView hinzufügen:
|
|
Jabaco Source |
1 2 3 |
Dim RootNode As Node = Tree1.Nodes.Add(Nothing, tvwFirst, "Root", "Root") Dim ChildNodeFromRoot As Node = Tree1.Nodes.Add(RootNode, tvwChild, "ChildFromRoot", "ChildFromRoot") RootNode.Expand = True |
Grüße ... Peter
(Manuel wird gleich wahrscheinlich wieder eine viel coolere Java-like - Methode posten
)
Date of registration: Jul 16th 2008
Location: Erlangen, Germany
Occupation: Software Developer
Hobbies: Jabaco, game theory, text-mining
Wednesday, November 26th 2008, 8:35pm
auch treeview in jabaco ist treeview in visual basic sehr ähnlich:
|
|
Jabaco Source |
1 2 3 4 5 6 7 |
Public Sub Command1_Click() Dim Root As Node Root = Tree1.Nodes.Add(Nothing, tvwFirst, "Root", "Root") Tree1.Nodes.Add Root, tvwChild, "Child1", "ChildItem" Tree1.Nodes.Add Root, tvwChild, "Child2", "Child with icon", DialogGif Root.Expand = True End Sub |