Discussion :

[ovni76]

Bonjour,
Utilisant souvent des formes ayant la même présentation : plein écran, panel titre tout en haut et panel boutons avec au moins un bouton quitter ou retour.
Je voudrais savoir si on peut créer un fiche modèle dans l'EDI de lazarus via nouveau et pouvoir l'ajouter par la suite dans son application sans avoir de problèmes, car j'ai voulu le faire avec la commande ouvrir puis ajouter au projet, mais cela ne fonctionne.
Merci d'avance

[chris37]

Salut ET,

Je ne sais pas ou en est l'héritage de form comme sous Delphi mais au dernières nouvelles, c'était dans les cartons. Pas eu le temps de tester mais c'est la réponse à ta question

@+

[ovni76]

Salut Chris37,
je vais donc patienté et faire attention à ma façon de faire des copies de formes pour éviter de perdre les points d'arrêts.
Et dis donc on va bien ensemble avec mon pseudo et ton image.
A+

[chris37]

regarde dans menu Nouveau/élément hérité
c'est par la que ce trouve la réponse que tu cherche
tu trouveras les form du projet en cours....

@+

[ovni76]

Salut Chris 37,
J'ai fait l'essai mais la fiche héritée n'est pas opérationnelle.
pas dans la déclaration du projet

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
program pmodele;
 
{$mode objfpc}{$H+}
 
uses
  {$IFDEF UNIX}{$IFDEF UseCThreads}
  cthreads,
  {$ENDIF}{$ENDIF}
  Interfaces, // this includes the LCL widgetset
  Forms, umodele, umodele2
  { you can add units after this };
 
{$R pmodele.res}
 
begin
  Application.Initialize;
  Application.CreateForm(TFmodele, Fmodele);
  Application.CreateForm(TFmodele2, Fmodele2);
  Application.Run;
end.

la ligne

Code :

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

1
2
 
  Application.CreateForm(TFmodele2, Fmodele2);

je l'ai crée moi-même

de plus dans la déclaration de la deuxième forme
tout en bas j'ai complété la valeur *.lrs il y avait une astérisque

Code :

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

1
2
3
4
5
6
7
8
initialization
  {$I umodele2.lrs}
 
donc j'en resterais à ma dernière "trouvaille" , je crée une fiche un lui donnant le nom de la forme et de l'unité de mon modèle puis je ferme mon projet et remplace l'unité nouvelle et sa forme par ceux de mon modèle.
Et j'ai le résultat souhaité, cela fait des manipulations mais moins que de tout refaire.
A+
 
end.

[chris37]

Ouais !

Comme je disais plus haut Dans les tuyaux mais peut être pas encore opérationnel