Uso del listbox....

[[maeyanes]]

Primero que nada, una pequeña disculpa por lo poco parco de mi mensaje anterior. Ya iba de salida del trabajo así que solo puse como lo podrías hacer pensando que te ayudaría de esa forma.

Como bien menciona xEsk, el método AddItem del TListBox te permite agregar un elemento a la lista con un objeto asociado, al pedir como segundo parámetro un TObject hacemos un casting para que acepte el tipo Integer:

Código Delphi [-]
ListBox1.AddItem('Gauge 100%', TObject(100));

Ya teniendo los elementos en el listbox con un objeto asociado, al momento de obtener estos valores, usamos la propiedad Items, que contiene un arreglo con los objetos asociados a los elementos. Los valores de este arreglo se obtienen así:

Código Delphi [-]
  Gauge1.Progress := Integer(ListBox1.Items.Objects[ListBox.ItemIndex]); // Se hace un casting a Integer ya que este es el tipo de datos original.

Con todo esto te ahorras tener un if para comprobar el ItemIndex de cada elemento y también resuelves tu problema de que no importe en que orden metes los porcentajes al listbox.



Saludos...