Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.063 Beiträge
 
Delphi 12 Athens
 
#4

Re: Record als Property übergeben

  Alt 7. Okt 2006, 22:32
Du definierst Verwaltung_Rec mehrfach.
Und obwohl die Definitionen gleich ausshen sind sie für den Compiler nicht das Selbe.

Definiere den records nur einmal () und greife in beiden Units auf die selbe Definition zu.



Zitat:
In der MainForm hab ich eine Variable die so definiert ist:

Liste_Sprachen = Array of Verwaltung_Rec;
Ich bin mir sicher, daß dieses keine Definition für eine Variable ist.


Delphi-Quellcode:
Type TListe_Sprachen_Array = Array of Verwaltung_Rec;

Var Liste_Sprachen: TListe_Sprachen_Array;
...
property Liste_Sprachen: TListe_Sprachen_Array read FListe_Sprachen write FListe_Sprachen;
Wobei es o bestimmt besser ist:
Delphi-Quellcode:
property Liste_Sprachen[Index: Integer]: Verwaltung_Rec read Get_Liste_Sprachen write Set_Liste_Sprachen;

function Get_Liste_Sprachen(Index: Integer): Verwaltung_Rec;
  begin
    Result := FListe_Sprachen[Index];
  end;
procedure Set_Liste_Sprachen(Index: Ineger; Rec: Verwaltung_Rec);
  begin
    FListe_Sprachen[Index] := Rec;
  end;
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.
  Mit Zitat antworten Zitat