[Delphi] Парсинг. Есть массив типа TMemo в нем содержится исходный код страницы в нем более 4000 строк. Как найти строку:

Question

Анна Никитина · Accepted Answer

ХЗ как там на делфи точно, но, по идее, регулярным выражением

Sergei · Answer

Например, вводишь переменную: 
var 
S: AnsiString; 
-----------------
далее заносишь в нее все, что есть в Memo: 
S:=Memo1.Text; 
------------
ну а потом пробегаешься по этой переменной и ищешь строку: 
A:=POS(Искомая строка, S); 
A - это будет позиция входа искомой строки во всем тексте 
-----------------------
или поиск построчно: 
A:=Memo1.Lines.IndexOf(Искомая строка) ; 
if A>-1 then //строка найдена 
---------
A - это индекс найденной строки в Memo 
Еще нужно сказать, что А - это переменная типа Integer