delphi - valuemember - Obtenga el valor de Combobox seleccionado actualmente y úselo como variable

obtener valor seleccionado combobox visual basic

Question

Mi pregunta es acerca de Delphi 7. Necesito obtener el valor de ComboBox1 actualmente seleccionado para usarlo como variable de coma flotante en mi código:

t:=t+ComboBox1. // Not sure what to write here...

¡Gracias!

Answer 1

No estoy seguro si el TryStrToFloat ya está en Delphi 7, pero si es así, lo haría de esta manera.

procedure TForm1.ComboBox1Change(Sender: TObject);
var
  Value: Double;
begin
  if TryStrToFloat(ComboBox1.Text, Value) then
    T := T + Value
  else
    ShowMessage(''You''''ve entered wrong value ...'');
end;

Answer 2

// ItemIndex is the index of the selected item
// If no item is selected, the value of ItemIndex is -1
if (ComboBox1.ItemIndex >= 0) then
begin
  t := t + StrToFloat(ComboBox1.Items[ComboBox1.ItemIndex]);
end;