mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-07-26 06:15:52 +00:00
6e01fc8dce
Added new _STRCMP and _STRICMP commands for quick string comparisons. Cleaned up QB64 to finish removing the QUI (quick user insert) code and folders. Altered UCASE and LCASE routines to be faster in some situations for us.
43 lines
1.7 KiB
Plaintext
43 lines
1.7 KiB
Plaintext
The '''LINE INPUT #''' file statement reads an entire file line as one string variable value.
|
|
|
|
|
|
|
|
{{PageSyntax}}
|
|
:: LINE INPUT #filenumber%, linereturn$
|
|
|
|
|
|
|
|
* Reads a file using the filenumber [[OPEN]]ed in the [[INPUT (file mode)]] as one file string value.
|
|
* Returns [[STRING]] values so it must use one string variable.
|
|
* Can be used with [[EOF]] to count the number of lines of data (records) in a file using a loop.
|
|
* Use the [[EOF]] function to avoid going past the end of a file and creating an error.
|
|
* LINE INPUT # can even retain the original quotation marks in text.
|
|
* '''NOTE: If QB64 or QB 4.5 give "Input past End of file" errors, check for CHR$(26) in the files being read!'''
|
|
* '''Warning! Files must exist to open them in INPUT mode! Use [[_FILEEXISTS]] to avoid program [[ERROR Codes|errors]]!'''
|
|
|
|
|
|
''Example:'' Finding the number of filenames listed in a file to dimension an array to hold them.
|
|
{{CodeStart}} '' ''
|
|
{{Cl|REDIM}} FileArray$(100) 'create {{Cl|$DYNAMIC|dynamic}} array
|
|
{{Cl|SHELL}} {{Cl|_HIDE}} "DIR /B *.* > D0S-DATA.INF"
|
|
{{Cl|IF...THEN|IF}} {{Cl|_FILEEXISTS}}("D0S-DATA.INF") THEN
|
|
{{Cl|OPEN}} "D0S-DATA.INF" FOR {{Cl|INPUT (file mode)|INPUT}} AS #1
|
|
DO UNTIL {{Cl|EOF}}(1)
|
|
{{Cl|LINE INPUT}} #1, file$ 'read entire text file line
|
|
filecount% = filecount% + 1
|
|
LOOP
|
|
{{Cl|CLOSE}} #1
|
|
{{Cl|END IF}}
|
|
{{Cl|REDIM}} FileArray$(filecount%)
|
|
{{Cl|PRINT}} filecount% '' ''
|
|
{{CodeEnd}}
|
|
|
|
|
|
''See also:''
|
|
* [[INPUT (file mode)]], [[INPUT (file statement)|INPUT #]], [[INPUT$]] {{text|(file input)}}
|
|
* [[INPUT]], [[LINE INPUT]], [[INPUT$]] {{text|(keyboard input)}}
|
|
* [[_FILEEXISTS]], [[_DIREXISTS]]
|
|
* [[FILELIST$]] (Function replacement for [[FILES]])
|
|
|
|
|
|
{{PageNavigation}} |