Deutsches Lazarusforum

Hallo Nitrom30,
zunächst herzlich willkommen im Lazarusforum.

Was mir gerade so ins Auge sticht (hat nichts mit deinem eigentlichen Problem zu tun):
randomize;
hat nichts in der Schleife zu suchen. 'randomize' soll nur einmal z.B. im OnCreate-Ereignis aufgerufen werden.

Die Klammern () ohne ...

In dieser Schleife

For i := 1 to 5 do
...


greifst du auf Spielerdaten[i, ...] zu. Der erste Index geht aber nur bis 4.

Vielen Dank das Problem habe ich behoben, ich habe anscheinen einmal die Tisch- mit den Spieler-Karten Vertauscht,
jedoch behebt die das Problem nicht....
P.S Falls du ...

Moin ich bin gerade dabei für die Schule ein Poker zu Programmieren.
jedoch bekomme ich einen Fehler bei dem mir selbst meine Lehrerin nicht helfen kann.
Jetzt mal schauen ob ihr schlauer seid xD

unit Unit1;

{$mode objfpc}{$H+}

interface

uses
Classes, SysUtils, Forms, Controls, Graphics ...