Add('Where (Ref=:mref) and (kiosque.ref=fact.ref) ');
Add('and(kiosque.ref=numero.ref) and (BIM=:mbim) ');
Add('and(VINGT=:mvingt) and(NAPPEL LIKE :mpq) ');
end;
Params[0].AsString := 'ref';
Params[1].AsString := 'bim';
Params[2].AsInteger := 20;
end;
end;
etc...
[jfdsdjhfuetppo]--Message édité par antp le 22-04-2002 à 16:32:13--[/jfdsdjhfuetppo]
apt
SQL en chaine ! le 21/04 à 15h06
qlq peut m'aider a ecrire ce code sql dans l'editeur de code delphi !
Select * From Kiosque, Fact, Numero Where (Ref=:mref) and(kiosque.ref=fact.ref) and(kiosque.ref=numero.ref) and(BIM=:mbim) and(VINGT=:mvingt) and(NAPPEL LIKE :mpq) en commencant par : Query1.SQL.Clear; // bien sur !