Работа с текстом в Delphi

[scorpi.on]

Подскажите пожалуйста как мне поступить в сложившейся ситуации. Дело в том, что я создаю программу в которой на экран выводиться очень много текста, но можно так сказать ‘небольшими порциями’. То есть за раз я могу вывести около 500 знаков текста. Вы представьте, что у меня этого текста на 50 МБ !!! Вписывать тест прямо в код программы как-то неинтересно. Так что я вас очень прошу вас посоветовать мне как можно упаковать в программу много отрезков текста, а потом при необходимости его вывести, например в компонент Memo. Может быть можно весь текст запоковать весь текст в файл, а потом из него получать информацию. Но как мне поступить если мой текст разделён на группы, а в каждой группе окло 1000 отрывков текста.
Заранее благодарю за помощь.

[LAngel]

Подскажите пожалуйста как мне поступить в сложившейся ситуации. Дело в том, что я создаю программу в которой на экран выводиться очень много текста, но можно так сказать ‘небольшими порциями’. То есть за раз я могу вывести около 500 знаков текста. Вы представьте, что у меня этого текста на 50 МБ !!! Вписывать тест прямо в код программы как-то неинтересно. Так что я вас очень прошу вас посоветовать мне как можно упаковать в программу много отрезков текста, а потом при необходимости его вывести, например в компонент Memo. Может быть можно весь текст запоковать весь текст в файл, а потом из него получать информацию. Но как мне поступить если мой текст разделён на группы, а в каждой группе окло 1000 отрывков текста.

Можно хранить текст в обычном текстовом файле. Если по группам - то в нескольких файлах. Если же необходима "высокая" скорость поиска-сортировки-доступа, то можно использовать таблицы и запросы.
Т.е. переконвертить текст в таблицу, например Paradox, структуры (id, group, text), делать выборку и выкидывать поле текст (например blob типа) прямо в мемо.