Code:
if Von.ItemIndex = 1 then
begin
Eingaben / 1024;
Eingabe.Text := FloatToStr(Eingaben);
end;
zuvor wird Eingaben noch als double deklariert. Und der Inhalt von Eingabe.Text mit
Code:
Eingaben := StrToFloat(Eingabe.Text);
gespeichert.
Hoffe das hilft.
Mfg