[Delphi] jak odnalezc linijke

nie jestem pewien czy to jest najlepszy sosob ale zaraz wszystko wytlumacze.

]
.VERSION_DEMO 0
.ROLLING_EN_VENTANA 1
.INFOVUELTAPROGRAMAENROLLING 0
.ELIMINA_MATERIALES_REDUNDANTES 0
.COMPRESION_ANIMACIONES 1
.MEGACACHE 1250
.NUMENTRADASCACHE 50
.CACHE 1
...

to jest kawalek pliku konfiguracyjnego z gry. Tak go wzialem bo pod reka. i teraz daje mu zeby odczytal wartosc linii po kolei od 0 do koncowej. i teraz mam klauzule if else
if Linijka = ".MEGACACHE 1250" then
{ jakies instrukcje }

i teraz mam pytanko czy jest jakis lepszy sposob, nie zabardzo zaawansowany :-)

i teraz mam pytanko czy jest jakis lepszy sposob, nie zabardzo zaawansowany :-)

Pod jakim wzgledme lepszy? Co Ci sie nie podoba w tym?

witam !

var
linia,linia2:string;
i:integer;
begin
linia:='tutaj szukany tekst';// wpisz tu szukany tekst
for i:=0 to Memo1.lines.count-1 do
begin
linia2:=Memo1.lines.strings[i];
if linia2=linia then
begin

//tutaj jakis kod ktory ma sie wypełnic jest bedzie taka linia
end;
end;
end;

PS pirze z glowy więc moze byc bląd w jedej literce
pozdrówka