Kein ENDE

[B1acka5s77]

Zitat von mkinzler:

Ohne zu wissen, was dein Programm genau macht, ist eine Hilfestellung kaum möglich.

Was willst du da denn wissen???

Ich brauch eigentlich nur ein Befehl, der nur EINMAL die Karten für den Spieler zuordnet. Das zuordnen usw. hab ich ja schon programmiert, aber es gibt kein Gewinner.
Durch anz_sp=8 wird am Anfang die Kartenanzahl festgelegt und wenn der Spieler eine Karte legt wird diese um 1 verringert anz_sp:=anz_sp-1!!!
Aber wenn die Kartenanzahl des nach einigen legen 0 ist, dann werden im Memofeld 8 Karten ohne Farbe,Wert oder Funktion ausgegeben, obwohl er dank des Befehls ' If anz_sp=0 then showmessage('Gewonnen') ' Gewonnen ausgeben soll!!![delphi]unit Unit1;