Ich sitz im Moment an meiner Facharbeit (Stufe 12) die dringend fertig werden muss und ich komm nicht weiter wegen eines Fehlers der für mich einfach unerklärlich ist:
In zwei Units also auch 2 Klassen verwende ich den Datentyp TExtBewegGerade, wenn ich jetzt aber von dem Formular auf die Klasse zu greifen will sagt mir der Debugger immer, dass die Dateitypen inkompatibel sind obwohl sie definitiv gleich sind (hab mind. 10 mal Copy+Paste gemacht).
Delphi-Quellcode:
[...]
type
TExtBewegGerade = record
M: extended;
N: extended;
Richtung : Shortint; //-1,0,1
PosX : extended;
PosY : extended;
end;
[...]
TSpieler = class(TComponent) [...]
Delphi-Quellcode:
[...]type
TExtBewegGerade = record
M: extended;
N: extended;
Richtung : Shortint; //-1,0,1
PosX : extended;
PosY : extended;
end;
TAlleSpieler = array[1..6] of TSpieler;
TSpiel = class(TForm)
[...]
procedure TSpiel.tiBewegungTimer(Sender: TObject);
begin
[...]
BewegGeradeI := AlleSpieler[i].getBewegGerade; //hier tritt der fehler auf ([Pascal Fehler] mSpiel.pas(165): E2010 Inkompatible Typen: 'mSpiel.TExtBewegGerade' und 'mSpieler.TExtBewegGerade')
BewegGeradeJ := AlleSpieler[j].getBewegGerade; //hier auch
[...]
end;
Versucht hab ich schon den Typ umzubennen, die Deklaration mit in die procedure rein zu nehmen... hat alles nix gebracht.
Ich hoffe ihr könnt mir helfen. Bis jetzt hat mir
DP schon per Suche viel geholfen
lugy2001