[gontxalo]

Hola
Tengo un problema y necesitaba un poco de ayuda.

Genero 20 números aleatorios sin repetir y los coloco en 20 TMemo.
Luego según que número sale pues unas imágenes se hacen visibles. Hasta ahí bien. Pero quiero que por ejemplo en si en el memo1 sale el 1 sea visible la image 1, pero la imagen 1 es visible si sale el 1 en cualquiera de los 20 memos aunque le diga que si es en el memo 1. He puesto los siguientes code sin éxito:

Código Delphi [-]
  procedure TForm2.Button1Click(Sender: TObject);
  var
     Ristra : TAlea2;
     n      : integer;
     linea : integer;
  Ristra:=TAlea2.Create(20); {Saco 20 números sin repetir}
      for n:=1 to 1 do begin
      linea := ristra.PillaNumero;
      memo1.Lines.Add( IntToStr(linea) );
  end;
  for n:=1 to 1 do begin
      linea := ristra.PillaNumero;
      memo2.Lines.Add( IntToStr(linea) );
  end;
 {hasta aquí funciona, hasta el memo 20, saca los números y los pone en
 los memo. pero para que sea visible la image 1 sólo cuando sale el 1 en 
 el memo1 he probado los siguientes code sin éxito:}
      if linea = 1 then image1.Visible := True;
      image1.Top := 50;
      image1.Left := 69;

Sale la imagen si sale el 1 en cualquier memo no en el memo1.
code 2:

Código Delphi [-]
  if Memo1.Text = '1' then image1.Visible := True;
  image1.Top := 50;
  image1.Left := 69;

Sale la imagen si sale el 1 en cualquier memo no en el memo1.
code3:

Código Delphi [-]
  image1.Visible := Memo1.Text = '0';
  image1.Top := 50;
  image1.Left := 69;

Sale la imagen si sale el 1 en cualquier memo no en el memo1.

que code tendría que poner ?

Gracias