[GrafAtRuss]

Имеется автоматически генерируемый ListBox1 примерно на 150 строк (допустим это пути к файлам).
Требуется выполнить однотипные операции с каждой из строк, например автоматически поочередно отредактировать и добавить их в поле Memo1.
В голову приходит код на подобии:

Код:

procedure MemoFiles(Line: double);
var
L:double;
begin
Form1.ListBox1.ItemIndex := Line;
if Form1.ListBox1.Items.Strings[(Form1.ListBox1.ItemIndex)] = '' then
Form1.Memo1.Lines.Add('Анализ завершен.')
else
Form1.Memo1.Lines.Add('Анализ ' + Form1.ListBox1.Items.Strings[(Form1.ListBox1.ItemIndex)]);
L := Line + 1;
MemoFiles (L);
end;

Проблема в том, что ListBox1.ItemIndex не может быть равен текстовому значению Line, а только любому цифровому.
Вопрос в том, как автоматически переводить строки для последующей обработки?