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;