Une UPDATE qui chiffone - Delphi/Pascal - Programmation
Marsh Posté le 22-04-2005 à 14:34:20
Je ne pense pas qu'il faille mettre Active à True, vu que ça équivaut à faire un Open (qui ici est remplacé par un ExecSql)
Marsh Posté le 23-04-2005 à 16:40:35
Je confirme qu'il faut supprimer la ligne ...active:=True;
Marsh Posté le 23-04-2005 à 18:03:48
Heu... oui ; c'est ce que j'ai dit
Marsh Posté le 24-04-2005 à 06:53:07
Ouiiiiii c'est a peu pres ca oui cooooollll, merci
pour verifier ce ke je UPDATE j'ai mis ca
procedure TForm1.Button1Click(Sender: TObject);
begin
DataSource1.DataSet:=Query1;
Query1.SQL.Clear;
Query1.SQL.Add('Update etudiant');
Query1.SQL.Add('Set Nom='''+edit1.text+'''');
Query1.ExecSQL;
Query1.SQL.Clear;
Query1.SQL.Add('Select *');
Query1.SQL.Add('From etudiant');
if Query1.Active=False then Query1.Open;
end;
Mercii encore probleme resolu
Marsh Posté le 21-04-2005 à 22:45:39
Bonsoir tlm,
Voila mon probleme :
sur ma fiche Form1 j'ai deposé 4 composants
- 1 Tdatasource
- 1 TQuery
- 1 Tbutton
- 1 TDBdrig
Biensur bien reliés entre eux avec une table "Etudiant"
eh bien en voulant appliquer la requete UPDATE sur le champ "Nom" (affecter le meme nom pour tout les etudiants, c'est pour tester la requete UPDATE seulement ) en utisant le Tbutton avec le code suivant :
Form1.Query1.Sql.Clear;
Form1.Query1.Sql.Add('Update etudiant');
Form1.Query1.Sql.Add('SET Nom=''Machin''');
Form1.Query1.Active:=true;
Form1.Query1.ExecSQL;
Alors là kand je clique sur le boutton je recois un message d'erreur : erreur de creation du handle de curseur, une erreur ki chiffone vraiment.
a l'aide svppppppp