Путь к строке memo

[mish@]

Привет всем! Я делаю icq бота но появился вопрос:
Вот загрузил я в memo все ответы, если пришло сообщение то ответить ему чё-нить. Но как указать путь к строке memo? если я хочу зделать так: если пришло сообщение то он должен отвечает на него первой строкой мемо ещё одно сообщение, второй строкой. Только чтоб он отвечал не попорядку а вразброс: 1-ое сообщение 5-ой строкой, 2-ое сообщение 16-ой строкой.

[Viteef]

memo1.lines.strings[i]; где i - номер строки.

[mish@]

Спасибо!!! тока как зделать чтоб он отвечал вразброс?

[Viteef]

randomize;
i:=random(memo1.Lines.Count-1);

[mish@]

Спасибо! работает как и хотелось! но один недостаток:

randomize;
i:=random(memo1.Lines.Count-1);

В этом коде всё часто повторяется, а как зделать без повтора?

[DomiNick]

Что значит "без повтора"..?
Список же не бесконечный...

Можно просто по порядку их брать:

Var S: String;
...
Inc(i);
If i>memo1.Lines.Count-1 Then i:=0;
S:=Memo1.Lines.Strings[i];
...