Цитата:
|
Сообщение от Drozh
Банальный спсоб
Код:
var
AFile: TStrings;
begin
AFile := TStringList.Create;
AFile.LoadFromFile('Путь к файлу');
Memo1.Lines.Add(AFile.Strings[N]);
AFile.Free;
end;
В данном случае строки нумеруются от 0, т.е. AFile.Strings[0] - получаешь первую строку |
А как сделать так что бы выводило данные до определенного слова , например что бы выводило все до строки с текстом "text", слово "text" не выводить на экран . а вывести тоьлко то что до него и начиная со строки номер 50 например.
Благодарю заранее