zeilenweises dateiauslesen, speichern in dim -> leerzeile

[broozar]

hallo, habe ein problem beim zeilenweisen einlesen von textdateien. ich will den gelesenen content in ein dim speichern, erhalte aber nur eine leerzeile.

Code: Alles auswählen

Procedure LoadConf()
[...]
    Shared keylist_read()
[...]
    If ReadFile(0, "..\Data\config.cfg")
      k=0
      While Eof(0) = 0
        keylist_read(k) = ReadString(0)
        k+1
        Debug ReadString(0)
        Debug keylist_read(k)
        Debug Str(k)
      Wend
      CloseFile(0)
    EndIf
[...]

erzeugt folgende ausgabe:
- Zeile mit Inhalt aus der Textdatei
- leere Zeile
- Kontollzähler

da "Zeile mit Inhalt aus der Textdatei" und "Kontollzähler" korrekt sind, frage ich mich, warum die zeile in der mitte leer bleibt.

[ts-soft]

Weil Du k um 1 erhöhst, nachdem Du etwas eingelesen hast. Nach dieser Erhöhung liest Du für
den Debugger und gibst das leere Arrayfeld aus.

[broozar]

oh gott, wie peinlich. ich sollte wirklich mehr schlafen...

vielen dank.

[Franky]

Und nochwas: Mit "Debug ReadString" liest du die nächste Zeile aus, die geht dir dann für dein Array aber verloren