Delphi-Quellcode:
procedure TForm1.BildKlick(Nummer,x,y : integer); // Übergabewerte
// Koordinaten der Karte (x,y)
// Nummer der Karte (1-30)
var Karte1,Karte2:Integer;
// erste gezogene Karte = Karten[x1,y1]
// Karte1 = Position der Karte in Form1
begin
der Bereich
var Karte1,Karte2:Integer;
sorgt für die Schutzverletzungen, nimm die Deklaration mal in den private Bereich mit auf...