|
|
|
|
Читает строку из указанного текстового файла. Строка читается либо до символа конца строки ('\n'), либо пока ее длина не превышает значения параметра Length (если он указан). Строка не
содержит символы конца строки ('\n') и перевода каретки ('\r').
Синтаксис
| function ReadString(
| | Handle, | | Length
| | ): String;
|
| Параметры
|
| Параметр
| Тип
| Описание
|
| Handle
| Number
| дескриптор открытого файла
|
| Length
| Number
| максимальная длина строки (необязательный параметр)
|
|
Возвращаемое значение
Текстовая строка из указанного файла в случае успеха или null в противном случае.
// Главная форма
frm=new TForm();
frm.Caption="JS+ - функция JS+ ReadString";
frm.Width =450;
frm.Height=300;
// Строка состояния
stb=new TStatusBar(frm);
stb.SimpleText=" Пример работы с функцией ReadString";
// Текстовое поле
mem=new TMemo(frm);
mem.BorderStyle=bsSingle;
mem.SetBounds(10,10,frm.ClientWidth-20,stb.Top-20);
f_name=JSPlus.HelpDir+"DATA\\TextFile.txt";
if ((f=FileOpen(f_name,fmOpenRead))>=0) {
for (i=0;(tmp_Str=ReadString(f))!=null;i++)
mem.Lines.Add(tmp_Str);
mem.Lines.Add("Всего строк: "+i);
FileClose(f);
}
frm.ShowModal();
|
| JS+ | Руководство пользователя
|
|
|
| |
|
|
