J'ai un TDBGrid, un TDataSource, un TADOConnection et un TADOQuery.
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
| with MonADOQuery do
begin
SQL.Clear;
SQL.Add('SELECT CHAMP1, CHAMP2, ...... blablabla');
SQL.Add('FROM TABLE1 INNER JOIN TABLE 2 ON .....');
SQL.Add('WHERE TABLE1.CHAMP2 = :MA_VALEUR');
Parameters.ParamByName('MA_VALEUR').Value := valeur;
try
Active := True;
Edit; /// POURQUOI ????
except
Active := False;
SQL.Clear;
end;
end; |
C'est à peu près tout pour le moment.... Mes fields sont créés et rattachés aux colonnes de ma grille... En gros à part ce problème de données en Update, tout est ok.
Si à partir de ça quelqu'un saurait me dire si, déjà, je fais quelque chose de mal, cela serait bien évidemment très sympa.
