PureBoard

Verfasst: **21.04.2008 17:43**

Mir ist das klar, aber er hofft anscheinend, er könnte direkt mit nur einem Aufruf an den n-ten String kommen

Verfasst: **21.04.2008 17:50**

hi.. wow so viele antworten schon... ja ich wollte nen string direkt auslesen, so wie scholly es beschrieben hat... danke für die antworten, problem gelöst... danke euch

fox

Verfasst: **21.04.2008 19:02**

Er kann nur von vorne lesen, dann muß er die Bedingung verändern.
Aber um die vierte Zeile zu lesen, sind erst die 3 davor zu lesen Mr. Green

Falsch. Du kannst die Position des Dateizeigers auch ändern. Allerdings muss er dann wissen, wie lang die erste Zeile ist. Und wie das geht, weiß ich nicht(Ohne len(readstring(file)))

Verfasst: **21.04.2008 19:13**

X0r hat geschrieben:
Er kann nur von vorne lesen, dann muß er die Bedingung verändern.
Aber um die vierte Zeile zu lesen, sind erst die 3 davor zu lesen Mr. Green
Falsch. Du kannst die Position des Dateizeigers auch ändern. Allerdings muss er dann wissen, wie lang die erste Zeile ist. Und wie das geht, weiß ich nicht(Ohne len(readstring(file)))

Das einzig richtige an deiner Aussage ist, das man mit FileSeek den
Dateizeiger verschieben kann, der Rest ist murks und es nützt sowieso
nichts.
Textdateien haben keine feste länge. Um die länge einer Zeile festzustellen
muß man diese einlesen, das macht mein Vorschlag, ignoriert aber die
länge, weils unwichtig ist

Verfasst: **21.04.2008 19:17**

X0r hat geschrieben:
Er kann nur von vorne lesen, dann muß er die Bedingung verändern.
Aber um die vierte Zeile zu lesen, sind erst die 3 davor zu lesen Mr. Green
Falsch. Du kannst die Position des Dateizeigers auch ändern. Allerdings muss er dann wissen, wie lang die erste Zeile ist. Und wie das geht, weiß ich nicht(Ohne len(readstring(file)))

Verfasst: **21.04.2008 19:34**

ja, was denn.

Ich hab ja nur gesagt, dass er nicht nur von vorne lesen kann...

natürlich ist der rest murks, denn physisch ist die Einteilung der Zeilen nicht vorhanden.

Verfasst: **21.04.2008 19:56**

jetzt laberst du schon wieder...

Verfasst: **21.04.2008 20:41**

Code: Alles auswählen

; Datei öffnen, laden ...

a.b = 2 ;Zeilennummer

For x = 1 To a
   ReadString()
Next

; Datei schließen ...

Natürlich fehlt hier noch die Abfrage, ob es sich schon am Ende der Datei befindet.

Oder wie meinste das? ^^

Verfasst: **21.04.2008 22:19**

PB hilft in allen Lebenslagen, so auch hier

Code: Alles auswählen

dnr = 1
dat$ = "2007.txt" ;bei mir 1 MB groß

gesuchteZeile = 2068

flag = ReadFile(dnr, dat$)

If flag

    datlg = Lof(dnr)
    daten$ = Space(datlg)

    bytes = ReadData(dnr, @daten$, datlg)    
    
    erg$ = StringField(daten$, gesuchteZeile, #CRLF$)
       
    Debug Mid(erg$,2,9999)   ;der dritte Parameter soll ja bald optional sein, wurde mal versprochen
    
    daten$ = ""
    
Else
    MessageRequester("Information","Konnte Datei nicht öffnen!")
EndIf

Verfasst: **21.04.2008 22:35**

Und da wieder der Beweis, ts-soft, Andreas_s, geht auch ohne Zeile für Zeile lesen.
Aber ich bin jetzt mal lieber ruhig, sonst platzt jemandem noch der Schädel.

PureBoard

String der 1, 2, 3, usw... auslesen