Znowu TListView

Cześć!

Mam pytanko(a):

1. Jak zrobić tak: Mam edita w który wpisałem <ort>jakąć </ort>5 cyfrową liczbę i po kliknięciu na button jeśli <ort>tka </ort>cyfra jest gdzieś w 4 kolumnie to <ort>nieh </ort>wyświetli wiadomość. Wiem, że coś z pętlą, ale <ort>dlaej </ort>nic...

2. Jak zrobić tak: aby wyszukał w <ort>drugirj </ort><ort>kolunie </ort>ListView, to co jest w edit, a potem zmiejszył o jeden to co jest w tym wyszukanym wierszu o jeden. //fajka mi zgasła mi fajka - ŁF

3. Jak zrobić, że jeśli w czwartej <ort>kolunie </ort>liczba będzie mniejsza ort! 5 to wyświetl ort!. (jeśli w kilku wierszach będzie mniejsza to kilka komunikatów, których treść zawiera tę mniejszą liczbę).

mam nadzieję, że rozumiecie o co mi chodzi i <ort>m </ort>pomożecie.

1. Jak zrobić tak: Mam edita w który wpisałem jakąć 5 cyfrową liczbę i po kliknięciu na button jeśli tka cyfra jest gdzieś w 4 kolumnie to nieh wyświetli wiadomość. Wiem, że coś z pętlą, ale dlaej nic...
2. Jak zrobić tak: aby wyszukał w drugirj kolunie ListView, to co jest w edit, a potem zmiejszył o jeden to co jest w tym wyszukanym wierszu o jeden.
3. Jak zrobić, że jeśli w czwartej kolunie liczba będzie mniejsza d 5 to wyświetl komunika. (jeśli w kilku wierszach będzie mniejsza to kilka komunikatów, których treść zawiera tę mniejszą liczbę).

Weź mnie nie załamuj! To są podstawy! Powinienem odpowiedzieć:
for + TListView + F1, ale już trudno:

Ad 1.

var
  i: integer;
begin
 for i := 0 to ListView1.Items.Count -1 do
   if ListView1.Items.Item[i].SubItems[2] = Edit1.Text then ShowMessage('Taka liczba już jest w 4 kolumnie!');
end;

Ad 2.

var
  i: integer;
begin
 for i := 0 to ListView1.Items.Count -1 do
   if ListView1.Items.Item[i].SubItems[0] = Edit1.Text then ListView1.Items.Item[i].SubItems[0] := IntToStr(StrToInt(ListView1.Items.Item[i].SubItems[0]) -1);
end;

Ad 3.

var
  i: integer;
begin
 for i := 0 to ListView1.Items.Count -1 do
   if StrToInt(ListView1.Items.Item[i].SubItems[2]) < 5 then ShowMessage(ListView1.Items.Item[i].SubItems[2]);
end;

Wiem, ze to są podstawy, więc jak widać nawet podstaw nie umiem.

Ale wielkie dzięki, ze jednak wybrałeś drugi waroant swej odpowiedzi. Dzięki. [browar]