Zitat von
Nikolas:
Delphi-Quellcode:
if HandIsRoyalFlush(SpielerHand) then
begin
showmessage('Wow, Cheater!');
break;
end;
if HandIsstraightFlush(Spielerhand) then
begin
showmessage('SF');
break;
end;
Das Break sorgt dafür, dass bei einem Vierling nicht auch noch 2 Paare erkannt werden.
Naja, ich glaube mit else bekommst du das schöner hin