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.