[[poliburro]]

El primero es mejor pues explotas las características de búsqueda del componente.


si aún así deseas usar el segundo prueba con esta forma optimizada:

Código Delphi [-]
With Lista Do
  ShowMessage(Strings[IndexOf(Elemento)]);