Seite 1 von 1
Linkedlist und writestring?
Verfasst: 20.06.2006 22:12
von roherter
Warum geht das nicht:
Code: Alles auswählen
While NextElement(icondelete())
WriteString(0,icondelete())
Wend
Aber das:
Code: Alles auswählen
While NextElement(icondelete())
debug icondelete()
Wend
Weiß jemand rat?
Verfasst: 20.06.2006 22:20
von Green Snake
Geht bei mir.
Kommt aber natürlich darauf an, dass "icondelete()" wirklich vom Typ "String" ist, und / oder "ResetList()" vergessen wurde...
Edit:
Wobei das Zweite dann auch nicht gehen würde...
Verfasst: 20.06.2006 22:29
von roherter
Das ist mal das ganze stück wo ich das gerade teste
Code: Alles auswählen
NewList icondelete.s()
ElseIf EventMenu()=13
ClearList(icondelete())
zahl=0
If OpenFile(0,GetHomeDirectory()+"icons.desk")
While Eof(0) = 0
AddElement(icondelete())
icondelete()=ReadString(0)
zahl=zahl+1
Wend
CloseFile(0)
Dim list.s(100)
a=0
Debug "str-"+Str(CountList(icondelete()))
erg= OpenFile(1,"test.txt")
If erg
ResetList(icondelete())
While NextElement(icondelete())
WriteString(1,list.s)
Wend
CloseFile(1)
EndIf
;--
EndIf
Verfasst: 20.06.2006 22:35
von ts-soft
Was ist das?
Also, das kann nicht gehen, weil bei list.s das element nicht angegeben ist.
Ausserdem biste lange genug hier im Board, um Schnippsel zu Posten, die
man Testen kann. Schnippsel die irgendwo mit
ElseIf
anfangen sind meist sinnlos und eine Zumutung für die Helfer, die da erst was
lauffähiges erstellen müssen
Ausserdem hat der erste Schnippsel mit dem zweiten nicht viel
gemeinsam. Wie soll so der Fehler ermittelt werden, wenn Du falschen
unvollständigen Code postest

Verfasst: 20.06.2006 22:37
von roherter
Hast recht sorry oh man bin ich blöd selbst hammer aufm kopf haue:lol: Danke dir ts-soft
edit:Es geht jetzt.
@Ts-Soft : War für die Deskbar um einzelne Icons zu löschen habe mich da verwurschtelt aber jetzt gehts man kann jetzt einzelne icons löschen stelle es morgen auf purearea rein
