Přidat otázku mezi oblíbenéZasílat nové odpovědi e-mailem Delphi - help

Dobry den.
Nějak na netu nemohu najit, jak na cyklus for.

Načtu data do TStringList

Potřebují je vypisovat co druhý řadek.

Takto po řadcích
for i := 0 to TS.Count-1 do

Jsou zobrazeny jen nové odpovědi. Zobrazit všechny
Předmět Autor Datum
Nechapu? Načtený řadek do s je string. A hledaný řetězec je take string i když to jsou čisla. Třeba…
Ka11 15.05.2017 18:38
Ka11
parametre toho pos mas naopak. Citaj si referencie funkcii ktore pouzivas. poslední
MM.. 15.05.2017 18:41
MM..

Nechapu?
Načtený řadek do s je string.
A hledaný řetězec je take string i když to jsou čisla.

Třeba toto

for i := 1 to 60 do
  if i mod 2 <> 0 then
    begin
    s:= TS[i];
    if pos(s,'blbec')>0 then showmessage('Našel jsem!');
    Memo2.Lines.Add(IntToStr(pos(s,'blbec')));

Pokud je na řadku blbec tak to najde.
Pokud je kdo je blbec, tak už ne.

Zpět do poradny Odpovědět na původní otázku Nahoru