TObject kopieren und zuweisen

[helen]

Hallo,

ich habe ein Object TMembers. Wie kann ich bei folgendem Code der Variablen B eine Kopie zuweisen?

Code:

s := tMember.Create;
s.zahl := 12;
p := s;
p.zahl := 12589;

jetzt soll p.zahl 12589 und s.zahl 12 zurückgeben. Da gab es irgendetwas mit p := ^s; oder so ähnlich..

Danke für die Hilfe
Helen