forum.boolean.name - Показать сообщение отдельно - Перевод хелпа

03.09.2005, 19:14

ReadLine$ (указатель_на_файл/поток)

Параметры
указатель_на_файл/поток = переменная, определенная командой OpenFile, ReadFile или OpenTCPStream (версия 1.52 и выше). Функция возвращает строковое значение

Описание
Как только вы открыли файл на диске (или поток) для чтения, используйте эту команду для считывания целой строки текста из текстового файла или потока. Каждая строка текста возвращается как строковая переменная. Эта функция может быть использована для чтения простых текстовых файлов.

Символы считываются из файла до тех пор, пока не будет достигнута метка «конец файла». «Концом строки» может быть или только символ «возврата каретки» (0Dh), или только «перевод строки» (0Ah), или «возврат каретки», за которым следует «перевод строки» (0Dh, 0Ah). К каждой строке текста автоматически добавляется метка «конец файла», состоящая из символа «возврата каретки», за которым следует символ «перевода строки» (т.е. 0Dh, 0Ah). Чтение за пределами конца файла не вызовет ошибку, но каждое считанное значение будет строкой нулевой длины.

ReadLine$ возвращает все символы, за исключением chr$(13)/chr$(10) («возврат каретки» и «перевод строки» - прим. перев.)

Потоками можно пользоваться только в версии Blitz Basic 1.52 или выше.

Пример

; Чтение и запись в файл, используя функции ReadLine$ и WriteLine$
 
; Инициализировать несколько переменных для примера
String1$ = "Строка 1 короткая" 
String2$ = "Строка 2 более длинная строка, они могут быть еще длинней " 
String3$ = "Строка 3 составлена " 
String4$ = "из двух частей, соединенных вместе." 

; Открыть файл для записи 
fileout = WriteFile("mydata.txt") 

; Записать информацию в файл
WriteLine( fileout, String1 ) 
WriteLine( fileout, String2 ) 
WriteLine( fileout, String3 + String4) 
WriteLine( fileout, "Как видно, не обязательно использовать переменные." ) 

; Закрыть файл
CloseFile( fileout ) 

; Открыть файл для чтения 
filein = ReadFile("mydata.txt") 

Read1$ = ReadLine( filein ) 
Read2$ = ReadLine$( filein ) 
Read3$ = ReadLine$( filein ) 
Read4$ = ReadLine$( filein ) 

; Закрыть файл после завершения чтения
CloseFile( filein ) 

Print "Текстовые строки, считанные из файла mydata.txt " 
Print 
Print Read1 
Print Read2 
Print Read3 
Print Read4 

WaitKey()

03.09.2005, 19:14	#9
alcosholik Сообщений: n/a	ReadLine$ (указатель_на_файл/поток) Параметры указатель_на_файл/поток = переменная, определенная командой OpenFile, ReadFile или OpenTCPStream (версия 1.52 и выше). Функция возвращает строковое значение Описание Как только вы открыли файл на диске (или поток) для чтения, используйте эту команду для считывания целой строки текста из текстового файла или потока. Каждая строка текста возвращается как строковая переменная. Эта функция может быть использована для чтения простых текстовых файлов. Символы считываются из файла до тех пор, пока не будет достигнута метка «конец файла». «Концом строки» может быть или только символ «возврата каретки» (0Dh), или только «перевод строки» (0Ah), или «возврат каретки», за которым следует «перевод строки» (0Dh, 0Ah). К каждой строке текста автоматически добавляется метка «конец файла», состоящая из символа «возврата каретки», за которым следует символ «перевода строки» (т.е. 0Dh, 0Ah). Чтение за пределами конца файла не вызовет ошибку, но каждое считанное значение будет строкой нулевой длины. ReadLine$ возвращает все символы, за исключением chr$(13)/chr$(10) («возврат каретки» и «перевод строки» - прим. перев.) Потоками можно пользоваться только в версии Blitz Basic 1.52 или выше. Пример ; Чтение и запись в файл, используя функции ReadLine$ и WriteLine$ ; Инициализировать несколько переменных для примера String1$ = "Строка 1 короткая" String2$ = "Строка 2 более длинная строка, они могут быть еще длинней " String3$ = "Строка 3 составлена " String4$ = "из двух частей, соединенных вместе." ; Открыть файл для записи fileout = WriteFile("mydata.txt") ; Записать информацию в файл WriteLine( fileout, String1 ) WriteLine( fileout, String2 ) WriteLine( fileout, String3 + String4) WriteLine( fileout, "Как видно, не обязательно использовать переменные." ) ; Закрыть файл CloseFile( fileout ) ; Открыть файл для чтения filein = ReadFile("mydata.txt") Read1$ = ReadLine( filein ) Read2$ = ReadLine$( filein ) Read3$ = ReadLine$( filein ) Read4$ = ReadLine$( filein ) ; Закрыть файл после завершения чтения CloseFile( filein ) Print "Текстовые строки, считанные из файла mydata.txt " Print Print Read1 Print Read2 Print Read3 Print Read4 WaitKey()