bonjour
voila le program
E3 reçoi le nom du journal
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15 procedure TForm4.Button4Click(Sender: TObject); var requete, E3 : string ; E1,E2 : Tdate; begin E1 := strtodate(edit2.text); E2 := strtodate(edit3.text); E3 := edit1.text; requete := 'select sum(:E1) form table_joursemaine where (date between :E2 and :E3) group by lignes )'; query1.active := true; query1.SQL.Clear; query1.SQL.Add(requete); query1.Prepare; query1.Open; end;
et je veux calculer la somme de la distribution de ce journal entre deux date
date1 c E1
date2 c E2
lignes c les villes
il maffiche un message derreur " unexpected end of command token line number''
si quelquun peu maider ?
merci
Partager