Discussion :

[looping]

re bonjour,

comment on fait pour dupliquer une form dans un meme project ?

il faut se servir du repository ? comment ca marche ?

merci

[Clorish]

Quel interet de dupliquer une form ....
Si 2 forms on les meme proprietees, il suffit juste de declarer une 2e variable et de creer une nouvelle instance de la form.

Code :

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

1
2
 
Var form1, form1bis : TForm1;

et dans le source du projet (dpr)

Code :

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

1
2
3
 
Applciation.CreateForm(Tform1, Form1);
Application.CreateForm(Tfomr1, Form1bis);

Apres tu peux jouer avec le sender dans les evenements :

Code :

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

1
2
3
 
If sender = form1 Then ...
If Sender = Form1bis Then ...

et pour acceder au methodes de sender :

Code :

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

1
2
 
TForm1(Sender).Caption := ...

et enfin avant d'utiliser des casts il est preferable de verifier la possibilité du cast :

Code :

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

1
2
 
If Sender.inheritsFrom(TForm1) Then ....

[sofiane1111]

Je crois que le besoin c'est de dupliquer puis faire quelque modif, si c'est réellement ça :
Personnellement je crée la deuxième forme puis je fais un copie coller du code sources dans un note pad puis un ctr+h pour remplacer les mots form1 et unit1 par form2 et unit2 puis remplcer le contenue de l'unit2. Et pour les objets c'est un ctr+A & ctr+C de la form1 puis un ctr+V dans la form2


Puis en procède à la personnalisation de la form2

[Rayek]

Je crois que le besoin c'est de dupliquer puis faire quelque modif, si c'est réellement ça :
Personnellement je crée la deuxième forme puis je fais un copie coller du code sources dans un note pad puis un ctr+h pour remplacer les mots form1 et unit1 par form2 et unit2 puis remplcer le contenue de l'unit2. Et pour les objets c'est un ctr+A & ctr+C de la form1 puis un ctr+V dans la form2


Puis en procède à la personnalisation de la form2

super compliquer ton truc.

- Tu copies/colles le .pas et le dfm dans un autre répertoire.
- Tu fais un clic droit sur le fichier que tu veux renommer depuis le gestionnaire de projet de delphi
- Tu changes le nom (Name) de la form
- Tu recopies le.pas et le .dfm dans le répertoire de l'application et tu l'ajoutes au projet.

La c'est propre au moins

[Clorish]

Oauis ou alors un simple enregistrer sous suivi de la modification du nom de la form .... et penser bien sur a reimporter l'ancienne form ....

Mais je pense que cela n'ets pas forcement une tres bonne soution ...
On peu creer un Frame contenant le code commun et l'integrer dans les 2 forms.
Ou alors jouer avec l'heritage de classes et creer 2 forms derivant d'une commune

[Rayek]

Oauis ou alors un simple enregistrer sous suivi de la modification du nom de la form .... et penser bien sur a reimporter l'ancienne form ....

Je crois que si tu tentes de reimporter l'ancienne form sasn avoir changer le nom de la nouvelle, y va y avoir un message d'erreur car il ne peut y avoir 2 forms avec le même nom (Je n'en suis pas sûr à 100% ca fait longtemps que je n'ai pas dupliquer une form )

Mais je pense que cela n'ets pas forcement une tres bonne soution ...
On peu creer un Frame contenant le code commun et l'integrer dans les 2 forms.

C'est parfois beaucoup plus long à mettre en place que de copier une simple form, car ca oblige à bien étudier les deux form et de trouver les points communs, etc ...
J'utilise quand même beaucoup les frames dans des pagecontrol, c'est quand mêm bien pour la lisibilité du code

Ou alors jouer avec l'heritage de classes et creer 2 forms derivant d'une commune

Même remarque que plus haut

Après chacun ca méthode ^^ mais celle de sofianne est quand même très "sale"