Delphi If Abfrage - Delphi-PRAXiS

Thema durchsuchen

Ansicht

Themen-Optionen

If Abfrage

Ein Thema von Schnittcher · begonnen am 9. Sep 2009 · letzter Beitrag vom 9. Sep 2009

Vorheriger Beitrag

Nächster Beitrag

Satty67

Registriert seit: 24. Feb 2007
Ort: Baden
1.566 Beiträge

Delphi 2007 Professional

Re: If Abfrage

9. Sep 2009, 11:20

oder so (ungetestet):

zusammenfalten · markieren

Delphi-Quellcode:

			if (FSpielerZahl1 = FComputerZahl1)

or (FSpielerZahl2 = FComputerZahl2)

or (FSpielerZahl3 = FComputerZahl3) then

begin

  FPunkte := FPunkte + 1;

  Result := 'Sie haben gewonnen!'

end

else

begin

  Result := 'Sie haben verloren!'

end;

€: OK, sehe gerade das es mehrmals Punkte gibt, nicht nur einmal...