Treeview?

Übersicht BlitzBasic BlitzPlus

Neue Antwort erstellen

dominik

Betreff: Treeview?

BeitragFr, Mai 06, 2005 16:01
Antworten mit Zitat
Benutzer-Profile anzeigen
also ich hab nen treeview in dem einzelne (beliebig viele) objekte angezeigt werden. wenn man nun eines dieser auswählt sollte in der daneben stehenden Textarea informationen zum jeweiligen objekt angezeigt werden.

erstellt werden die treeviews hier:
BlitzBasic:
Function laden()
datei = ReadFile(\"PM.dat\")

Repeat
a$ = ReadLine(datei)
Select a$
Case \"#\"
person_speicher$ = ReadLine(datei)
new_node = AddTreeViewNode(person_speicher$, TreeViewRoot(auswahl_uebersicht))
If new_node > 0 Then
gadget.neu = New neu
gadget\nodes = new_node
EndIf
Case \"#/\"
datum_speicher$ = ReadLine(datei)
Default
If person_speicher$ > \"\" And datum_speicher$ > \"\" Then
gadget.neu = New neu
gadget\person$ = person_speicher$
gadget\datum$ = datum_speicher$
gadget\daten$ = a$
EndIf
End Select

Until Eof(datei)
CloseFile datei
End Function

Das "If new_node > 0 Then" habe ich nur deshlab angegeben weil ich nach der Laden function mal probehalber alle gadget\nodes im debuglog ausgeben hab lassen und da dann komischerweise auch 0 drinn waren.

und hier sollten sie dann bei auswahl des benutzer angezeigt werden:
BlitzBasic:
Function personen_uebersicht()
Local auswahl
auswahl = SelectedTreeViewNode(auswahl_uebersicht)
If auswahl > 0 Then
For handel.neu = Each neu
If gadget\nodes = auswahl Then ;<---- hier komt der Fehler
person_ausgewaehlt$ = gadget\person$
DebugLog person_ausgewaehlt$
EndIf
Next
EndIf
End Function


leider bekomme ich aber immer nur eine Fehlermeldung "Objekt does not exist".
BB+ 1.41|Sempron 2.8|geforce fx5200|1GB DDR|XP home SP2 / prof.

Rallimen

Sieger des 30-EUR-Wettbewerbs

BeitragFr, Mai 06, 2005 16:13
Antworten mit Zitat
Benutzer-Profile anzeigen
Deine Schleife richtig?
Müßte das nich so sein!BlitzBasic:
 For gadget.neu = Each neu ;<<<<<<<<<<<<<<<<<<<<<<<<<<< versuch mal das !
If gadget\nodes = auswahl Then ;<---- hier komt der Fehler
person_ausgewaehlt$ = gadget\person$
DebugLog person_ausgewaehlt$
EndIf
Next
[BB2D | BB3D | BB+]

dominik

BeitragFr, Mai 06, 2005 16:20
Antworten mit Zitat
Benutzer-Profile anzeigen
Embarassed Embarassed
Ach du s****
ich habe zwischenzeitlich neue Types eingesetzt diese aber dann wieder gelöscht! Tja da is das dann wohl übersehen worden.
Danke
BB+ 1.41|Sempron 2.8|geforce fx5200|1GB DDR|XP home SP2 / prof.

Neue Antwort erstellen


Übersicht BlitzBasic BlitzPlus

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group