Discussion :

[MelkInarian]

Bonsoir à toutes et à tous!
Je souhaite copier un Panel situé dans un TPageControl, d'un Ttabsheet à un autre par l'appui d'un bouton.
Est-ce possible en cours d'exécution?

Merci!

[PierreDelcroix]

Qui, c'est possible.

Important: Il y a des autres objects sur le TPanel?

[philnext]

D'un autre côté copier un panel vide ça ne semble pas super interessant

[philnext]

Sinon le plus simple me semble être de créer un nouveau panel (avec visible=false) dans ton 2eme tabsheet, de lui donner les propriété de celui d'origine, puis de faire pareil avec tous les composants enfants du panel.
Attention :
-Pour les composants enfants tu devras faire une fonction récursive car un composant 'enfant' peut avoir des enfants lui même (et ainsi de suite).
-Une fois tout terminé tu passe ton deuxième panel à visible:=true et ton premier à visible=false.

[PierreDelcroix]

On peut aussi utilisez des 'Frames'

[MelkInarian]

Effectivement je ne suis pas assez précis dans ma question.

Il y une grande quantité de composants dans mon TPanel
et c'est la raison pour laquelle je souhaite pouvoir le déplacer.

Il y a:
- une vingtaine de TEdits
- Une dizaine de TDateTimePickers
- Une dizaine de boutons.

Mon appli est connectable à 6 fichiers Excel
(en fonction d'un choix volontaire sur un bouton).
Mon TPanel sert à afficher le contenu de l'un des enregistrements
(de l'un des fichiers Excel).

Si je duplique le TPanel 6 fois,
je devrai quasiment écrire 6 fois le programme f(composants).
D'où l'idée de déplacer le TPanel d'un onglet à l'autre.

J'ai déjà écrit des modifications de couleur de tous les objets
en fonction du fichier Excel ouvert
(ça permet de différencier les utilisations).

Merci pour les réponses déjà reçues.
Melk Inarian.

[Cl@udius]

Salut

Une question en passant: Pourquoi tu n'utilises pas un TabControl ou lieu PageControl ?

Ainsi tu n'auras besoin que d'un seul Panel (avec tes contrôles), dont tu modifieras le comportement suivant l'onglet sélectionné.

Ou bien je suis carrément à côté de la plaque.

@+ Claudius

[MelkInarian]

Effectivement Cl@udius. Merci bien!
Je n'ai jamais utilisé le TabControl,
je viens de faire un essai et en combinant les deux objets,
J'arriverai au résultat escompté.
(J'ai d'autres Panels, dont je n'ai pas fait mention,
pour lesquels j'utiliserai le PageControl et à l'intérieur de l'une des pages
un TabControl).

Mes respects!

[Cl@udius]

Mes respects!

Merci bien, j'en rougi

@+