CatchFile for Ascii included file

[flaith]

hi

i had a large text file to include to a project (must be included inside the executable). The only way was to make a little code to read the file, export it as a pb file (with datasection, Data.s ...) and put it inside my project.

maybe that way will be better

Code: Select all

#file_open_inside = 0

Global NewList liste_txt.s()

Filename$ = CatchFile(?Txt_File,#PB_Ascii)

If ReadFile(#file_open_inside,Filename$)
  While Eof(#file_open_inside) = 0
    AddElement(list_txt())
      list_txt() = ReadString(#file_open_inside)
  Wend
Else
  MessageRequester("Information","Impossible d'ouvrir le fichier!")
EndIf

End

DataSection

  Txt_File: IncludeAscii "liste_file.txt"
EndDataSection

Thanks

[Fred]

Why IncludeBinary doesn't do the job here ?

[flaith]

Hey Fred, thanks for answering

Why IncludeBinary doesn't do the job here ?

well, yes it does, but my aim is to use the 970 lines of words inside the text file
So, you're right, the request is not for "IncludeAscii" but for a "CatchFile(file$,type.l)" instead

[djes]

PeekS() should do easily the trick.

[flaith]

PeekS() should do easily the trick.

I know, but doing a PeekS(?included_file, ?end-?included_file) gives a var containing 970 lines of text i need to explode to an array of string

[Rescator]

You need to make a simple data format in this case: 4bytelen,nbytestring
Make a small tool that does this, then simply use includebinary.
The included datafile will have the len infront of each string so it's easy to calculate where the next start.

Alternatively include a text file, build this data at startup and parse for end of line.

In both cases the best is to put the date into a dim array of strings, or a dim array of pointers to the data.

There is no "easy" way to do this. Just search the forum, I think there should be a handfull of example code for something similar to the last case.

[flaith]

Thanks for your answers

There is no "easy" way to do this

That's why i'm making a wish to Santa fred