Discussion :

[AuBozon]

Bonjour ,

Après avoir crée en dynamique des Onglets ( TTabsheet) ( inspiré de http://bloon.developpez.com/articles...requetethread/ ).
Chaque Frame contient un StringGrid .
Je n'arrives pas à insérer des infos dans les StringGrids crées en dynamique.



Se serait comme un calepin ou les onglets sont les iniatles , et le Stringgrid l'affichage des contacts filtré sur les initiales du calepin.

Qui peux m'éclairer .



Cordialement

[evarisnea]

Je n'arrives pas à insérer des infos dans les StringGrids crées en dynamique.

c'est assez vague, quelle difficulté rencontres tu exactement ?
en principe, avec des TTabSheets, tu modifies ton contenu, lors des évènements OnChanging et OnChange (de mémoire...).

[AuBozon]

Ma recherche est la création dynamique d'onglet , contenant ici un stringgrid
et selon un critère attaché à chaque onglet ( ex : un annuaire onglet A Caption A) , onglet B ' Caption B,etc .... ) y afficher des infos filtrés par critere du caption style annuaire liste des A => onglet A , affichage des B* => onglets B.
Et comment utilisé les évennement dans la création des dynamiques



Merci

[Clorish]

Simplement .... en tant que variables, ce qu'ils sont en fait.
D'ailleur si on analyse bien le comportement de Delphi il te met sur la voie

Delphi :
Quand on double click dans une cellule a gauche d'un evenement dans l'inspecteur d'objet, il affecte a cette cellule un nom de fonction.
Ensuite il creer une methode (dans la definition de la classe) et plus loint creer le corps de la fonction prete a etre implementee.

Donc dynamiquement on fait pareil
On creer un prototype de fonction (en accord avec l'evenement)

Code :

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

1
2
 
Procedure MonGestionaireDynamique(Sender : TObject); // Type TNotifyEvent des "OnClick" par exemple

Puis on implemente la fonction :

Code :

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

1
2
3
4
Procedure TMaForm.MonGestionaireDynamique(Sender : TObject);
Begin
...
End;

ET enfin on l'affecte a notre evenement (ie dans la case a cote de l'inspecteur de proprietee) mais de maniere dynamique :

Code :

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

1
2
 
MonCompo.OnClick := Self.MonGestionaireDynamique;

[AuBozon]

Cela fonctionne coorectement.



Merci por l'info.