Probleme de copie d'objet

Bonjour,
Mon problème est le suivant, je crée une instance d'un Plane et ensuite je lui affecte les valeurs d'un objets déjà existant , et ensuite je lui change le nom.

Lorsque que je me mets en DEBUG, je m'aperçois que GLPlane1 est à Nil

                PlaneLocal[compteurPlane] := TGLPlane.Create(self);
                PlaneLocal[compteurPlane] := GLPlane1 ;
                PlaneLocal[compteurPlane].Name := 'GLPlane' + inttostr(compteurPlane) ;

Est-ce qu'il y a une fonction qui permet de recopier les paramètres d'un objet du style:

                 nomFct( objSrc , objDest ) ;

Merci d'avance

PlaneLocal[compteurPlane] := TGLPlane.Create(self);
PlaneLocal[compteurPlane].assign(GLPlane1) ;
PlaneLocal[compteurPlane].Name := 'GLPlane' + inttostr(compteurPlane) ;

Cordialement.

---

Il existe 10 catégories de personne. Ceux qui connaissent le binaire et les autres...