TQuery sur deux tables et commande EXCEPT
Alors je suis débutante en delphi on ce qui concerne les base de donné je veux bien un aide svp
Voici mon problème exemple j'ai deux table ( table2 : nom) et ( table1 : nomT, age)
Alors j'ai deux dbgrid et deux table et deux datasource et 1 seul Tquery
Je veux faire une déférence entre les nom danq table1 et nom1 dans table 2 ce qui veux dire je veux afficher dans un memo ou combobox les nom qui pas encor été utiliser dans la table 1 alors j'ai fait cela :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
procedure TForm1.Button1Click(Sender: TObject);
begin
Query1.SQL.Clear ;
Query1.SQL.Add('SELECT Nom') ;
Query1.SQL.Add('FROM Table2.db') ;
Query1.SQL.Add('EXCEPT') ;
Query1.SQL.Add('SELECT TNom') ;
Query1.SQL.Add('FROM Table1.db') ;
Query1.SQL.Add('WHERE age=30)') ;
Query1.Active:=true;
Query1.Open ;
with query1 do
begin
first;
while not eof do
begin
Memo1.Lines.add(fieldbyname('Prenom').asString );
next;
end;
end;
end;
end. |
il me donne l'erreur suivante :
Code:
1
2
3
4
|
invalid uses of keyword
Token : select
Lines number :4 |
