Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi if then anweisung (https://www.delphipraxis.net/55625-if-then-anweisung.html)

force 24. Okt 2005 14:27


if then anweisung
 
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

Robert Marquardt 24. Okt 2005 14:29

Re: if then anweisung
 
Eingabe wird nirgendwo zugewiesen. Da es eine Variable auf dem Stack ist, ist ihr Inhalt zufaellig.

PierreB 24. Okt 2005 14:31

Re: if then anweisung
 
Was ist denn "MetertoFeettest" ? Desweiteren wäre die genaue Fehlermeldung sehr sinnvoll zu wissen. :zwinker:

Chegga 24. Okt 2005 14:35

Re: if then anweisung
 
Hi,

Zitat:

Zitat von force
Delphi-Quellcode:
procedure TForm1.BerechnenClick(Sender: TObject);
.
.
.
  if Eingabe = MetertoFeettest
   then
.
.
.

Außerdem würde ich statt = , >= oder <= verwenden. :wink:
Dann ist es eher gewärleistet,
dass deine folgenden Anweisungen durchlaufen werden.

MfG Marc

force 24. Okt 2005 14:47

Re: if then anweisung
 
Hallo,

Die genaue Fehlermeldung lautet "inkompatible Typen" und wie soll ich eine <= oder >= einsetzen wenn es bei dem = nur um die richtige Auswahl des RadioButtons geht :?

MetertoFeettest ist die Bezeichnung des RadioButtons den ich in dieser If Anweisung als Auswahl gern hätte.

Und was ist ein Stack?? :roll:

Danke

Gruß force

leddl 24. Okt 2005 14:51

Re: if then anweisung
 
OK, dann denk doch mal ganz kurz nach. Was für ein Typ ist "Eingabe" und was ist "MeterToFeetTest"? Du willst allen Ernstes einen Integer mit einem RadioButton vergleichen? :zwinker:

scp 24. Okt 2005 14:55

Re: if then anweisung
 
Wie wärs einfach mit
Delphi-Quellcode:
If MeterToFeetTest.Checked then

force 24. Okt 2005 15:16

Re: if then anweisung
 
ok jetzt funktioniert es. Danke

@ leddl
Das Problem ist das ich erst seit recht kurzer Zeit Delphi lerne und ich mit einem Buch arbeite das zwar die If/then/else Anweisung bearbeitet aber nicht im Bezug auf einen RadioButton. Leider bin ich nicht so talentier tund kann es aus dem FF heraus.

gruß force


Alle Zeitangaben in WEZ +1. Es ist jetzt 07:05 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz