Einzelnen Beitrag anzeigen

Benutzerbild von p80286
p80286

Registriert seit: 28. Apr 2008
Ort: Stolberg (Rhl)
6.659 Beiträge
 
FreePascal / Lazarus
 
#9

AW: ungültiger Gleitkommawert?

  Alt 28. Dez 2012, 00:17
Delphi-Quellcode:
  private
  kk1, kk2, kk3, kk4, kk5, kk6, kk7, kk8, kk9, kks, ka1, ka2, ka3 : real;
  kkdurchschnitt : real;
  kadurchschnitt : real;
  notendurchschnitt : real;
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form3: TForm3;
  kk1, kk2, kk3, kk4, kk5, kk6, kk7, kk8, kk9, kks, ka1, ka2, ka3 : real;
  kkdurchschnitt : real;
  kadurchschnitt : real;
  notendurchschnitt : real;

implementation

procedure TForm3.Button2Click(Sender: TObject);
var
  kk1, kk2, kk3, kk4, kk5, kk6, kk7, kk8, kk9, kks, ka1, ka2, ka3, kas : real;
  kkdurchschnitt : real;
  kadurchschnitt : real;
  notendurchschnitt : real;
Ich sehe eigentlich keinen Grund warum Du die Variablen dreimal definiert hast.
Ebenso solltest Du statt real double oder single benutzen.

Gruß
K-H
Programme gehorchen nicht Deinen Absichten sondern Deinen Anweisungen
R.E.D retired error detector
  Mit Zitat antworten Zitat