recorrer listbox

[dec]

Hola,

No entiendo muy bien qué es lo que quieres conseguir, puesto que el código de Román debería irte bien, ¿no? Yo voy a comentarlo a modo de "ruta" de lo que vamos a hacer. Si quieres tú puedes hacer lo propio, de manera que ayude a comprender qué es lo que necesitas.

Código Delphi [-]
procedure TForm1.SpeedButton1Click(Sender: TObject);
var
  I := Integer;
begin
  // Recorremos los elementos de la lista
  for I := 0 to ListBox2.Items.Count - 1 do
    // Y si nos topamos con uno que contenga "N"
    if ListBox2.Items[i] = 'N' then
    begin
      // Redimensionamos el formulario
      Height := 200;
      Width := 300;

      // Y puesto que ya lo hicimos, dejamos de buscar
      break;
    end;
end;

Lo único que se me ocurre al ver el "break" del código de Román es que tú no quieras salir del "bucle" en cuanto encuentres una "N" (en el ejemplo) sino que quieras seguir procesando el resto de elementos... si fuera esto, obviamente, es cuestión de que quites el "break" del "bucle". Ya dirás algo a ver qué tal.