AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Probleme mit Real

Ein Thema von St.Pauli · begonnen am 3. Jan 2005 · letzter Beitrag vom 3. Jan 2005
 
Benutzerbild von St.Pauli
St.Pauli

Registriert seit: 26. Dez 2004
351 Beiträge
 
Delphi 7 Personal
 
#1

Probleme mit Real

  Alt 3. Jan 2005, 16:34
Hallo,

habe ein Prob mit Realzahlen!
Ich wollte mal ein Programm zum Berrechnen von BMIs schreiben.

Delphi-Quellcode:
 procedure TForm1.Button1Click(Sender: TObject);
VAR BMI : real;
      Grs : real;
      Gew : real;
      Hi1 : string;
      Hi2 : string;
      Hi3 : string;

begin
//Variablen bestimmen

  Hi1 := Edit1.text;
  Hi2 := Edit2.text;
  Hi3 := FloatToStr(BMI);
  Grs := strtofloat(Hi1);
  Gew := strtofloat(Hi2);

// BMI erechnen

// Körpergewicht
// BMI = -------------
// Körpergrösse^2

BMI := Gew / (Grs*Grs);
Edit3.Text := Hi3;
Dann wollte ich machen, dass in Edit3.text eine normale Kommazahl steht, z.B. 22,35 oder so, hat aber irgendwie net geklappt.
Hatte versucht BMI := Gew / (Grs*Grs):4:2;
Was hab ich Falschgemacht?

Jetzt schon mal Danke für jede antwort!

PS: Ich weiss, ich hab ein paar Variablen unnötig eingesetzt! Die hätte ich gar net gebraucht.
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 15: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