como asignar a un item combobox un numero

[[Caral]]

Hola
Otro ejemplo mas usando arrays dinamicos (como estoy con esto )
Siguiendo el ejemplo de mi amigo ecfisa el que me parecio muy bueno os hago otro con menos codigo.

asignamos el array publico sin datos:

Código Delphi [-]
public
    { Public declarations }
    Valores: array of string
  end;

En el evento onchange del combobox, le indicamos cuantos valores, le asignamos el valor y lo presentamos:

Código Delphi [-]
procedure TForm1.ComboBox1Change(Sender: TObject);
var
  i  :Integer;
  valor : Real;
begin
    SetLength( Valores, 4 );
    Valores[0] := '0.017';
    Valores[1] := '0.22';
    Valores[2] := '1.22';
    Valores[3] := '2.015';

    for i := 0 to ComboBox1.ItemIndex  do begin
    label1.Caption:=  Valores[i];

end;
end;

Como estoy aprendiendo.
saludos