Seite 1 von 1
Multistring im Filesystem
Verfasst: 13.11.2006 14:14
von eiban
Hallo PureBoard.
Ich hab eine Frage, unzwar wie bekomme ich eine mehrzeilige Textdatei
in ein Multistringstringgadget?
Befehle bitte für V3.30
Danke für ALLE Antworten!
Verfasst: 13.11.2006 16:08
von AND51
Hallo!
gibt's unter 3.30 schon den Befehl
ReadString()? Dann machst du es so:
Datei öffnen, mit einer Schleife und dem o. g. Befehl Zeile für Zeile lesen und in das Gadget übertragen. Dabei nicht vergessen, manuell einen Zeilenumbruch hinzuzufügen. So in etwa:
Code: Alles auswählen
SetGadgetText(#string, GetGadgetText(#string)+ReadString()+Chr(10)+chr(13))
Verfasst: 13.11.2006 17:00
von eiban
Das Funktioniert leider nicht!
Es kommt dann hinter der 1. Zeile nur so ein Komischer Strich.
Geht das auch irgend wie anders ? Mit Wend???
Ich weis nicht?
Verfasst: 13.11.2006 18:41
von #NULL
pb 3.94 - bin mir nicht sicher ob du noch was für 3.3 ändern mußt..
Code: Alles auswählen
OpenWindow(0,0,0,400,600,#PB_Window_SystemMenu|#PB_Window_ScreenCentered,"StringGadget Flags")
CreateGadgetList(WindowID(0))
StringGadget(0, 2,2, 400-4,600-4, "", #PB_String_MultiLine)
file.s="C:\test\test.txt"
If ReadFile(0, file)
While Eof(0)=0
text.s+ReadString()+Chr(13)+Chr(10)
Wend
CloseFile(0)
EndIf
SetGadgetText(0, text)
Repeat
Until WaitWindowEvent()=#PB_Event_CloseWindow
<edit: sorry, fehlte noch was>