Hallo,
Du verwendest unter Declarationen
Delphi-Quellcode:
private
procedure Gewinner;
...
und als Variable
Delphi-Quellcode:
var
Form1: TForm1;
...
Gewinner:Boolean;
den gleichen Bezeichner "Gewinner", was zu Problemen führen kann. Hier würde ich unterschiedliche Namen benutzen.
Gruß RoGa