Как найти позицию строки в Memo? (Delphi 7)

@tibIvan · Регистрация: 26.04.2014

Author24 — интернет-сервис помощи студентам

Такое дело,нужно чтоб переменная присваивала значение номера стоки в memo.
Вот кусок кода:

Delphi

var g1,g2,g3:integer;
      t1,t2:string;
begin
   g2:=//вот это переменная хочет узнать номер строки с определённым словом 
        for g1:=3 to g2 do
     begin
     g3:=pos(':',code1.Lines[g1]);
     t1:=copy(code1.Lines[g1],1,g3);
     t2:=copy(code1.Lines[g1],g3,g3+7);
     
     lst1.Items.Add(t1+t2);
 
     end;
end;

@Зотов_из_ОСА · 30.04.2014, 10:31

Delphi

 for i:=1 memo1.lines.count -1 do
   begin
       s:=memo1.lines[i];
       if pos(sbs, s)<>0 then 
           begin       
             g2:=i;
             break;
           end;
   end;

Delphi

1	for g1:=3 to g2 do

почему именно 3? или в первых двух строках хранится определенный текст, который обработке не подлежит?

@tibIvan · 30.04.2014, 16:42 **[ТС]**

Да,там другой текст который имеет другое значение.
Спасибо за код!

@tibIvan 1 / 1 / 0 Регистрация: 26.04.2014 Сообщений: 16
	30.04.2014, 16:42 [ТС]	3
	Да,там другой текст который имеет другое значение. Спасибо за код! 0