Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi richtig rechnen !!! (https://www.delphipraxis.net/63243-richtig-rechnen.html)

homerunjack 15. Feb 2006 20:31


richtig rechnen !!!
 
Ich habe hier einen kleinen Quellcode, in dem einfach nur gerechnet wird. Es wird im ersten teil * gerechnet, in den anderen beiden teilen / . nur klappt das in dem ersten abschnitt nicht wirklich:

Delphi-Quellcode:
var s, v, t: real;
begin
if RadioButton1.Checked then
t:= strtofloat(edit1.text);
v:= strtofloat (edit2.text);
[color=#ff005f]s:= v*t;[/color]
Edit3.text:= floattostr(s);


if RadioButton2.Checked then
s:= strtofloat(edit1.text);
t:= strtofloat (edit2.text);
v:= s/t;
Edit3.text:= floattostr (v)         ;


if RadioButton3.Checked then
s:= strtofloat(edit1.text);
v:= strtofloat (edit2.text);
t:= s/v;
Edit3.text:= floattostr (t)         ;




end;
wie kann man das mit else if schreiben?

Matze 15. Feb 2006 20:34

Re: richtig rechnen !!!
 
Hi, du musst den Code, der von der if-Abfrage eingeschlossen werden soll, in begin - end setzen:

Delphi-Quellcode:
if blubb then
begin
  // Code
end;
Mit else geht das ganze dann so:

Delphi-Quellcode:
if blubb then
begin
  // ...
end else
if blubb_2 then
begin

end else
if blubb_3 then
begin

end;

Dust Signs 15. Feb 2006 20:34

Re: richtig rechnen !!!
 
Nach dem if hast du mehrere Zeilen Code, aber kein begin/end

Dust Signs


Alle Zeitangaben in WEZ +1. Es ist jetzt 18:43 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