If Abfrage

[Schnittcher]

Hallo,

mehr gibt es ja nicht.

Das mit dem case finde ich auch gut.

Das schaue ich mir mal an. Danke.

so eine Frage noch:

Delphi-Quellcode:

  if FRunden = FRundenEingabe  then
  ShowMessage(Format('Sie haben %d Punkte erreicht!',[punkte]))
  else
  begin
  SpielerZahlen[0] := StrToInt(edZahl1.Text);
  SpielerZahlen[1] := StrToInt(edZahl2.Text);
  SpielerZahlen[2] := StrToInt(edZahl3.Text);
  Zahlen := TBackupClassesFactory.Zahlen;
  Zahlen.SpielerZahl := SpielerZahlen;
  Zahlen.set_ComputerZahlen;
  Zahlen.vergleichen;
  lbAussage.Caption := Zahlen.VergleichePunkteAlt;
  FPunkte := FPunkte + Zahlen.HolePunkte;
  Zahlen.get_Punkte(FPunkte);
  lbPunkte.Caption := IntToStr(Zahlen.HolePunkte);
  end;

Sieht jemand hier einen Fehler?

Fehler ist im Anhang.

Gruß,
Schnittcher