Array in einer anderen Unit speichern

**Das_Dingomann**

Heyho!

Ich habe ein Memory-Spiel geschrieben und soll das jetzt auf Anweisung meines Info Lehrers LAN-fähig umschreiben.
Soweit so gut...Ich speichere die einzelnen Karten in einem zweidimensionales Array und möchte dieses Array jetzt in eine eigens definierte Package-Variable packen, um dieses komplette Array über LAN zuverschicken. Das Problem ist ich trenn das komplette Projekt in eine Unit, welche das eigentliche Spiel beinhaltet, und in eine zweite Unit, welche die ganze Netzwerk Geschichte verarbeitet. Wenn ich jetzt in der Unit2 in meiner Packages-Variable die Array-Variable aus Unit1 speichern möchte bekomm ich die Fehlermeldung "Inkompatible Typen: 'Unit1.TFeld' und 'Unit2.TFeld';"

Hier der Code aus der Unit1:

zusammenfalten · markieren

Delphi-Quellcode:

			.

.

.

type

  Tfield = array[0..15,0..15] of Integer;

.

.

.  

var

  Form1: TForm1;

  cards:  Tfield;

.

.

.

Und hier der Code aus der Unit2:

zusammenfalten · markieren

Delphi-Quellcode:

			.

.

.

type

  TPackagetype  = ( pkgconnect, pkggo, pkgcard);

  Tfield = array[0..15,0..15] of Integer;

TPlayer = record

    Name : String[20];

    Points : Integer;

    Active : Boolean;

  end;

  TPackage = record

   Case pkgtype : TPackagetype  of

     pkgconnect:(player_num:integer;);

     pkggo:(fieldarray:Tfield;

            player:array[1..4] of TPlayer;);

     pkgcard:(X,Y:Integer;);

  end;

.

.

.

procedure TForm2.send_pkggo;

var pkg:TPackage;

begin

 pkg.pkgtype:=pkggo;

  pkg.fieldarray:= cards; //Hier bekomm ich die Fehlermeldung "Inkompatible Typen: 'Unit1.TFeld' und 'Unit2.TFeld'"

end;

Ich hoffe ihr könnt mir helfen..Danke schonmal im vorraus.

Array in einer anderen Unit speichern

Array in einer anderen Unit speichern

Forumregeln