Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Objektkopie

0 views
Skip to first unread message

Robert Wehofer

unread,
Sep 30, 2000, 3:00:00 AM9/30/00
to
Hi!

Wie ist es möglich, in Delphi Objekte zu kopieren (spiegeln). Eine Zuweisung
referenziert nur das Objekt.

Danke im voraus
Robert

Hans-Werner Schmidt

unread,
Oct 1, 2000, 3:00:00 AM10/1/00
to
"Robert Wehofer" <e952...@stud3.tuwien.ac.at> schrieb in der message
<8ciB5.27583$zJ5.1...@news.chello.at> folgendes:

Hey Robert,

>Wie ist es möglich, in Delphi Objekte zu kopieren (spiegeln). Eine Zuweisung
>referenziert nur das Objekt.

normalerweise enthält jedes Objekt die Methode ASSIGN. Erzeuge eine
neue Instanz vom Objekt und übergebe das zu kopierende Objekt in
Assign.

function CopyObject( TRefObj:TPersistent ):TPersistent;
BEGIN
Result:=TRefObj.Class.Create;
Result.Assign( TRefObj );
END;

So in etwa müsste es gehen. Allerdings habe ich das nicht getestet.
Kann auch sein, dass die 1. Zeile nicht geht. Dann muß man sich die
Klasse über FindClass( TRefObj.ClassName) heraussuchen.

HTH


Hans-Werner
--
H.-W. Schmidt - Individuelle Software-Erstellung
"Man muß nicht erst in die 10. Klasse gehen, um Objekte
zu verstehen..."

0 new messages