Zitat von
Schnittcher:
Hallo,
ich habe es jetzt so gelöst.
Delphi-Quellcode:
function TZahlen.VergleichePunkteAlt: string;
begin
if FPunkte - FPunkte_alt = 1 then
Result := 'Sie haben eine Zahl richtig erraten!'
else if FPunkte - FPunkte_alt = 2 then
Result := 'Sie haben zwei Zahlen richtig erraten!'
else if FPunkte - FPunkte_alt = 1 then
Result:= 'Sie haben zwei Zahlen richtig erraten!'
end;
Gruß,
Schnittcher
Da ist aber ein dicker Fehler drin.
Die letzte If-Abfrage ist wie die erste und wenn die erste schon nicht klappt, wird die letzte genau so wenig klappen. Außerdem fehlt noch, ob man nichts erraten hat.