bonjour à tous.
Décidement ces derniers jours je suis demandeur.
Mon problème de ce topic est plutot une demande d'information qu'autre chose, il est un peu lié à un autre (enfin juste un peu).
Voilà,
Est-ce possible que lorsqu'on créé des forms dynamiquement que ces forms comportent par exemle un dbgrid dans le lequel j'ai ces 2 evenements :
Mise en gras au clique sur colonne dbgrid
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 procedure TFTravail.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState); Begin With Sender as TDBGrid Do With Canvas Do Begin if Column.FieldName = ColonneCliquee then Begin Column.Title.Font.Style := [fsBold]; end else Column.Title.Font.Style := []; end; end;Lorsque je créé 2 ou 3 ou 10 fenêtres dynamiquement elles ont toutes les mêmes composants et donc les mêmes procédures.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 procedure TFTravail.DBGrid1TitleClick(Column: TColumn); begin ColonneCliquee := Column.FieldName; DBGrid1.Invalidate; end;
Et bien figurez vous que si j'affiche une table (dans une form créée en dynamique) comportant par exemple :
Table CLIENT
Code, Nom, Adr
et qu'ensuite j'affiche dans la foulé une nouvelle form dynamique comportant cette fois :
Table SALARIE
Code, Nom, Adr
Et bien si je clique sur la colonne de ma première form sur Code , il me mets en gras le mot Code (normal), mais si je passe dans ma seconde form (qui pourtant n'as rien à voir) je récupére la même chose !!!! le mot Code en gras !!!
Hallucinant non ?
Comment ce phénomène est possible ?
Je précise que mes form créées en dynamique sont en fsMDIChild.
Partager