Hallo zusammen,
vielen Dank. Ich habe mal eure Tips ausprobiert.
p:=@value; (immer noch der Fehler)
p:=Pointer(value); (ungültige Typenumwanldung, ich habe es auch mit meinem Typ Ptype und TType probiert, dto)
p:=value; (inkompatible Typen)
p^.Assign(Value); (undefinierte Bezeichner Assign)
....
Ich habe festgestellt, daß wenn ich eine Variable mit meinem TType erzeuge und dann die Zuweisung machen, das dann der Fehler nicht mehr kommt.
Funkioniert:
TTypelist.item[1]:=TType
funktioniert nicht
TTypelist.item[1].tag:=string
----
Delphi-Quellcode:
type TType = record
Tag : String;
element1: String;
element2: String;
end;//Type
type TTypelist= class
private
FTypelist:TList;
...
function Get(Index: Integer): TType;
procedure Put(Index: Integer; Value: TType);
...
public
property item[Index: Integer]: TType read Get write Put;
end;