Uso del listbox....

[[xEsk]]

Lo q hace el codigo puesto por maeyanes es añadir los items con un "objeto asociado", q contiene un valor "Integer" (entero).

Asi pues al hacer click encima de uno de los items del ListBox1 (por ejemplo) puedes obtener su valor y asignarselo al Gauge.

Código Delphi [-]
procedure TForm1.ListBox1Click(Sender: TObject);
begin
  Gauge1.Progress := Integer(ListBox1.Items.Objects[ListBox1.ItemIndex]);
end;

Pero de todos modos no entiendo muy bien q es lo q quieres hacer, hehe, si puedes explicarlo de otra forma, te podria ayudar mas hehe.

Saludos.