Hallo,
Ich wollte für ein kleines Programm RadioButtons verwenden, welche durch einen Button mit einer if-then Anweisung benutzt werden sollen.
Leider kann ich es bisher nicht compelieren weil jedesmal ein Fehler bei der then Anweisung erscheint, mir ist jedoch nicht klar wo der Fehler liegt.
Hier ein Ausschnitt aus dem Quellcode:
Delphi-Quellcode:
procedure TForm1.BerechnenClick(Sender: TObject);
var Eingabe : Integer ;
zahl1 : Real ;
rechnen : Real ;
begin
zahl1 := StrToFloat(Edit1.Text) ;
if Eingabe=MetertoFeettest
then
begin
rechnen := zahl1 * 3.28095 ;
ErgebnisLabel.Caption := FloatToStr(rechnen);
end
end;
Könnte mir bitte jemand sagen wo der Fehler ist?
Danke
Gruß force