Parent eines Objektes

[Flo83]

Hallo,
ich habe folgende Struktur:

einen Record

Delphi-Quellcode:

type COPCItem = record
  GUID: string;
  Name: string;
  IP: string;
  User: string;
  Password: string;
  Ping: integer;
  SwitchItem: TPsBool;
  StatusItem: TPsBool;
  PingItem: TPsInteger;
end;

und daraus ein Array

Delphi-Quellcode:

OPC_Item_Array: Array of COPCItem;

SwitchItem hat das Event "OnChangeValue", welches ich eine eigene Prozedure zuweise

Delphi-Quellcode:

SwitchItem.OnValueChange := BoolValueChange;

OnValueChange übergibt nur den Sender als TObject.



Wie komme ich nun an den Record des Senders?

[mkinzler]

Delphi-Quellcode:

(Sender as <Typ>).<Eigenschaft/Methode>

[Flo83]

Naja, das Problem ist, dass der/die/das record ja eigentlich der Parent bzw. Owner vom SwitchItem ist, aber wenn ich schon nur Versuche mir den ClassName des Owners anzuzeigen bekomme ich eine Zugriffsverletzung...

[SirThornberry]

um die effektiv helfen zu können bräuchten wir wohl etwas quelltext wie du es versuchst.

[Flo83]

Delphi-Quellcode:

ShowMessage(OPC_Item_Array[Length(OPC_Item_Array)-1].SwitchItem.Owner.ClassType.ClassName);

[SirThornberry]

kannst du mal die komplette funktion zeigen? Und hast du mal geprüft ob der owner ungleich nil ist? hast du überhaupt einen owner beim erzeugen angegeben und suchst du nun den parent oder owner.