Ah ok, habs erledigt.
Und warum funktioniert folgendes nicht:
Delphi-Quellcode:
else if StrToInt(edtAnzahl.Text) >= 21 and StrToInt(edtAnzahlBot.Text) >= 21 then
ShowMessage('Draw!');
[Fehler] Unit1.pas(62): E2015 Operator ist auf diesen Operandentyp nicht anwendbar
[Fehler] Unit1.pas(69): E2064 Der linken Seite kann nichts zugewiesen werden
[Fehler] Unit1.pas(73): E2029 Anweisung erwartet, aber 'PROCEDURE' gefunden
[Fehler] Unit1.pas(31): E2065 Ungenügende Forward- oder External-Deklaration: 'TForm1.Addieren'
[Fataler Fehler] Project1.dpr(5): F2063 Verwendete
Unit 'Unit1.pas' kann nicht compiliert werden