AddElement in Structured List

[Janni]

Hi,

What basics am I missing here ?
It fetches line 1, 6, 11,16.
If I only have one fila() it fetches all lines, but then I don't see how to get column 1 in date, column 2 in id etc. -from each line in the txt file.

Code: Select all

Structure logfile
  date$
  id$
  num$
  nicks$
  chat$
EndStructure

OpenConsole()

NewList fila.logfile()

If ReadFile(#file, file$, #PB_Ascii)
  While Eof(#file) = #False 
    
    AddElement(fila())
    fila()\date$ = StringField(ReadString(#file), 1, ";")
    fila()\id$ = StringField(ReadString(#file), 2, ";")
    fila()\num$ = StringField(ReadString(#file), 3, ";")
    fila()\nicks$ = StringField(ReadString(#file), 4, ";")
    fila()\chat$ = StringField(ReadString(#file), 5, ";")
    
   Wend
  CloseFile(#file)
EndIf

[jacdelad]

You read another line each time ReadString() is called. Put ReadString() right after the head of the loop and store the result into a string variable. Then use Stringfield () with the variable:

Code: Select all

Structure logfile
  date$
  id$
  num$
  nicks$
  chat$
EndStructure

OpenConsole()

NewList fila.logfile()

If ReadFile(#file, file$, #PB_Ascii)
  While Eof(#file) = #False 
    Temp$=ReadString(#file)
    AddElement(fila())
    fila()\date$ = StringField(Temp$, 1, ";")
    fila()\id$ = StringField(Temp$, 2, ";")
    fila()\num$ = StringField(Temp$, 3, ";")
    fila()\nicks$ = StringField(Temp$, 4, ";")
    fila()\chat$ = StringField(Temp$, 5, ";")
    
   Wend
  CloseFile(#file)
EndIf

[Janni]

I clearly wasn't aware that ReadString() read another line each time it's called.
Your solution makes a lot of sense now.

Much appreciated jacdelad, thanks!

[jacdelad]

Yay, I'm helpful!