Экспертная система Delphi.int.ru

Сообщество программистов
Общение, помощь, обмен опытом

Доброго времени суток, уважаемые эксперты!
Есть некий текстовый файл, который содежрит допустим 10тысяч символов, как сделать так, что бы в memo сначала загрузились 5 тысяч символов, а после некиих дейтвий, остальные 5?. заранее благодарен

Вопрос задал: Елагин Сергей (статус: Посетитель) Вопрос отправлен: 15 мая 2008, 15:29 Состояние вопроса: открыт, ответов: 1.

Ответ #1. Отвечает эксперт: min@y™

Знач так. Берём List: TStringList и грузим в него весь файл.

List.LoadFromFile('Мой_файл.txt');

Memo.Lines.Text:= Copy(List.Text, 1, 5000);

Цитата:

Memo.Lines.Text:= Memo.Lines.Text + Copy(List.Text, 5001, 5000);

Ответ отправил: min@y™ (статус: Доктор наук) Время отправки: 16 мая 2008, 08:22 Оценка за ответ: 5

Мини-форум вопроса

Мини-форум пуст.

Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.