Discussion :

[Maglight]

J'ai une virtual table qui me sert de datasource.dataset pour une grille.
Cela ne me convient pas exactement car je vois dans ma grille l'ensemble des champs de ma virtual table alors que je n'en utilise pour l'apparence que certains.
Dans un premier temps, j'ai rendu invisible les autres colonnes mais c'est long ( 2 à 3 secondes de plus que si je laisse toutes les colonnes visibles ).
Etant donné que j'ai besoin ensuite de toutes les données de ma virtual table dans des traitements, je ne peux modifier la structure de celle-ci.
J'ai voulu donc créer mes colonnes dynamiquement avec le code suivant :

Code :

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

1
2
3
4
Grid1._Grid.DataSource.DataSet := VTable;
col := Grid1._Grid.Columns.Add;
col.FieldName := 'Heure1';
col.Title.Caption:='A';

où col est du type TColumn.
J'ai alors bien la colonne A mais avec aucune données dedans.
Si je fais uniquement

Code :

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

Grid1._Grid.DataSource.DataSet := VTable;

j'ai toute les données de ma table virtuelle dans ma grille.
Où est mon erreur ?
Merci d'avance.

[LadyWasky]

essaie comme ça :

Code :

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

1
2
3
4
5
Grid1._Grid.DataSource.DataSet := VTable;
col := Grid1._Grid.Columns.Add;
col.FieldName := 'Heure1';
col.Title.Caption:='A';
Grid1._Grid.refresh;

[Maglight]

Cla ne résout hélas pas mon pb.
Le pire c'est que si je met en titre de colonne, la valeur d'un autre, j'ai bien des données :

Code :

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

col.Title.Caption:= TRIM(VTable.fieldbyname('TOTO').asstring);

mais je ne vois toujours rien dans ma grille.

[LadyWasky]

Code :

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

col.Title.Caption:= TRIM(VTable.fieldbyname('TOTO').asstring);

Ha oui, mais là, c'est normal, tu affiche en Titre de colonne la valeur de l'enregistrement courant du champ 'TOTO'.

Sinon, sur mon Delphi, ça marche nickel, donc le problême viens d'ailleurs.

'Heure1' , c'est bien le nom de champ, n'est ce pas ? Es-tu sur de ne pas mélanger les noms de champs et le contenu des enregistrements ?

Parce que si tu écris ça :

Code :

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

1
2
3
4
Grid1._Grid.DataSource.DataSet := VTable;
col := Grid1._Grid.Columns.Add;
col.FieldName := 'TOTO';
col.Title.Caption:='A';

Je suis presque sur que tu vas avoir quelque chose dans la colonne 'A' de ta grille...