text datei auslessen und im StringGadget() darstellen

[sen-me]

was isn chr(10) eigentlich? leertaste oda was?

[IcedCoffee]

http://www.lookuptables.com/
10 = new line
aber 13 weiss ich nicht
naja eigentlich müsste es ja mit chr10 gehen weil bei MessageBox_ geht es ja auch aber beim StrinGadget nicht weil da kommt immer so [] ein zeichen

naja ist halt alles etwas

[Batze]

10 -> LF
Line Feed
13 -> CR
Carriage Return

http://www.manderby.com/mandalex/a/ascii.php
Guck auch in der PB-Hilfe, da gibts eine ASCII-Tabelle.

[sen-me]

ich hab mal dazu ne frage

ich hab zufällig grad ne idee gekriegt

ohne euch mit details zu nerven gleich zur sache

wie kann ich eine textdatei einlesen, wobei sie in mehrere stringgadgets verteilt werden?

genaue frage: wie kann ich rausfinden, wann ein string in der textdatei zuende ist

[jear]

Die wichtigsten Konstanten sind alle vordefiniert : #LF$ , #CR$ , #CRLF$ , #LFCR$
Handstände mit CHR(10) + CHR(13) erübrigen sich also.

Mit ReadString() wird immer nur eine Zeile bis zu ihrem Ende eingelesen.
Man braucht sich also um die Trennung von Zeilen keine Gedanken zu machen.

Auszug aus der Hilfe : ReadString()

Liest einen String aus der aktuell geöffneten Datei, bis ein 'End Of Line' (deutsch: "Ende der Zeile") Zeichen gefunden wird (Unix und DOS Dateiformate werden unterstützt).

[sharkpeter]

1. Die ASCII-Tabelle ist unter Werkzeuge zu finden, dort kann man sich die Code
Zeichen als Dezimalzahl oder Hexa anzeigen lassen.
2. Die Vorbelegung der Konstanten #LF usw. ist ebenfalls numerisch, also kommt
ihr in keinem Fall um CHR(xx) herum. Was dann nun die elegantere Schreibweise
ist, oder auch kürzer ist, muß jeder für sich selbst entscheiden.

Gruß Jens

[sen-me]

ich meine das eher so
textdatei.txt

Code: Alles auswählen

zeile 1
zeile 2
zeile ....

und nun will ich jede zeile in ein eigenes stringgadget packen

[bluejoke]

Ja, also rufst du ReadString sooft auf, bis du alles eingelesen hast. Bei jeem neuen Aufruf schreibst du die Daten in ein anderes StringGadget - ist doch kein Problem

[sen-me]

Code: Alles auswählen

If OpenFile(0,Path$)<>0
 x=1
 z=1
 While IsGadget(x)<>0
  z+1
  x+1
 Wend
 If z>1
  For x=1 To z
   test$=GetGadgetText(x)
   If test$<>""
    WriteStringN(test$)
   EndIf
  Next
 EndIf
 CloseFile(0)
Else
 MessageRequester("Laufzeitfehler","Konnte Datei zum speichern nicht öffnen!",#PB_MessageRequester_Ok)
 End
EndIf

er sagt (debugger)

Error at line 157 : #Gadget object not initialized.

wieso?
mein erstes stringgadget ist 1 (0 ist scrollarea)
und x startet ja mit 1

[roherter]

Zeig mal den ganzen code!?