Discussion :

[marsupilami34]

Bonjour à tous,

J'ai inséré le composant DBGrid dans mon appli.
J'ai ajouté un composant TDataSource DataSource1 + TMyQuery MyQuery1.
Je mets dans le Dataset de mon datasource MyQUery1.
Dans MyQuery1, je me connecte à la base de données.

Lorsque je lance mon application, j'ai l'impression que l'ajout des lignes s'effectue mais je n'ai pas de données (les données sont vides) - voir photo en PJ :



Mon code est le suivant :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
begin
  with MyQuery1 do
  begin
    Connection := Form_pp.MyConnection1;
    Active := False;
    SQL.Clear;
    SQL.Add('SELECT num_boite, date FROM MyTable where ref=''' + form_pp.ComboBox1.Text + ''' order by date');
    Open();
  end;
  DataSource2.DataSet := MyQuery1;
  DBGrid1.Refresh;
end;

Serait-il possible de m'aider svp ?

Merci d'avance

Marsup

[SergioMaster]

Les colonnes semblent avoir des définitions (à la vue des entêtes de colonnes) donc les noms des champs (propriété Fieldname de chaque Tcolumn) sont-ils correctement renseignés ?

[marsupilami34]

C'est à dire ?

Quand je vais sur la propriété du champ fieldName j'ai l'erreur suivante

[SergioMaster]

Ok. J'avais rayé la mention au DBGrid.DataSource car, à la vue de l'image écran, il y avait des lignes. Donc je pensais que la grille avait été créée avec un TQuery contenant un SQL

Si ce n'est pas le cas alors c'est au runtime qu'il faut écrire

Code :

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

1
2
3
DBGrid1.Datasource:=DataSource2;
DBGrid1.Columns[0].FieldName:='num_boite';
DBGrid1.Columns[1].FieldName:='date';

PS. pas joli ça la colonne nommée 'date'
P.P.S. AMHA DBGrid1.Refresh; ne sert à rien

[ShaiLeTroll]

Même en Design Time on peut mettre le nom, faut juste pas utiliser la ComboBox mais copier-coller, avec MyDAC+D7 et ODAC+XE2 ça passait très bien, je n'ai jamais utilisé la connexion depuis l'IDE, c'est une hérésie ce truc, on devrait avoir une option pour couper cette merde totalement.
Pense bien mettre Active à False à ton objet TMyConnection, c'est une vraie saloperie le mode IDE connecté à la DB, sinon ça tente au lancement du programme d'ouvrir une connexion sur les valeurs dans l'état avant que tu les changes par exemple via un fichier ini

Généralement, j'avais le DBGrid, le DataSource posé sur le TForm mais pas de DataSet, celui-ci était alloué à la volée et lié en RunTime, ça évite cette merde de l'IDE connecté.

[marsupilami34]

Super !
Ca marche.
Merci à vous 2 pour votre aide précieuse

Cdlt,

Marsup