[Vovich]

Шота я туплю

Код:

procedure TForm1.ComboBox1Change(Sender: TObject);
  var t:integer;
begin
Memo2.Lines.LoadFromFile('ComboBoxList.txt'); 
for t:=0 to Memo2.Lines.Count-1 do 
if Memo2.Lines[t]=Combobox1.Text then
begin
Image1.Visible:=true;
Image2.Visible:=false;
end;
if Memo2.Lines[t]<>Combobox1.Text then
begin
Image1.Visible:=false;
Image2.Visible:=true;
end;
end;

при вводе нового значения которого нет в списке минус так и остается висеть...