Discussion :

[jer64]

Bonjour,

Comment puis-je créer une form dynamiquement en recopiant tous les objets placés sur une form qui est déjà ouverte.

Ex:

Une form avec 3 Edit et 3 bouttons active, je crée une autre form avec 3 Edit et trois bouttons et si dans la form d'origine il y a du code affecté aux bouttons, je voudrais que les trois bouttons de la nouvelle form comporte le même code.


Merci d'avance.

JER.

[remixtech]

Tu le fais comme pour un composant normal , sauf que dans project.dpr
tu enleves la declaration formXXXX.create

Voila ;-)

[chtiot]

oui, c'est comme remixtex dit qu'il faut faire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
procedure TForm1.Button2Click(Sender: TObject);
var Formx : TForm1;
begin
 
Formx := TForm1.Create(self);
Formx.Show;
 
end;

[jer64]

Merci beaucoup, ça marche parfaitement.

A+

JER