Bonjour a tous,
Je suis sur un Projet Delphi et j'utilise l'objet TFrame, seulement j'ai constater une certaine lourdeur à louverture de mes Forms.
Voici le Code utilisé à l'ouverture de Mon Form1:
Ce code est appelé dans l'Evenement FormActivate;
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 Frame_ticket_reception.Init(DsPrincipale,':Num_patient = Num_patient','Ticket de reception',Module_traitement.Q_ticket_reception,TF_ticket_reception,TF_ticket_reception,TF_ticket_reception); Frame_ticket_reception.Titre_formulaire:='Liste des tickets '; Frame_admission.Init(DsPrincipale,':Num_patient = Num_patient','Facture d''Hospitalisation',Module_traitement1.Q_admission,TF_admission,TF_admission,TF_admission); Frame_admission.Titre_formulaire:='Liste des Admissions ';
Vous constaerez que le Form1 ouvre 2 Form distincts que son Form2 et Form3.
Form2 = Liste des Tickets et Form3= Liste des Admissions
ces dernières contenant chacune d'autres Frames.
Pouvez vous m'aider à mieux gérer l'ouverture et la fermeture de mon composant TFrame afin que l'application soit un peu plus souple.
Encore merci pour votre aide.
Partager