manipulation base de donnée SQL server 2000 composant TqueryRésolu

Question

bonjour
voila ce que j'ai fait mais lemessage d'erreur s'affiche masi l'ajout ce fait

le program:
procedure TForm1.Button2Click(Sender: TObject);
var requete : string;
begin

requete := 'insert into tableclient (code_client,nom_client,prenom_client,adresse_client,mail_client,tel_client,portable_client) values(:x1,:x2,:x3,:x4,:x5,:x6,:x7)';
form2.query1.close;
form2.Query1.SQL.Clear;
form2.query1.sql.add(requete);
form2.query1.parambyname('x1').asinteger := strtoint(edit1.text);
form2.query1.parambyname('x2').asstring := edit2.text;
form2.query1.parambyname('x3').asstring := edit3.text;
form2.query1.parambyname('x4').asstring := edit4.text;
form2.query1.parambyname('x5').asstring := edit5.text;
form2.query1.parambyname('x6').asinteger := strtoint(edit6.text);
form2.query1.parambyname('x7').asinteger := strtoint(edit7.text);
form2.query1.execsql;
form2.Query1.Free;
form2.Query1.Open;
end;

message derreur:
project.prpjet.exe raised exeption class EAacessviolation with message'acess violation at adress0047d2A6 in module 'project.exe'read of adress '00000000' process stoped use step or run to continu 



merci

f0xi · Accepted Answer

on pose la question dans le sujet pas dans le titre!







<hr size="2" width="100%" />


http://deefaze.gnomz.com

cs_deutsch · Answer

Slt 

Kand tu fait un insert via un query tu doit le suivre par un select pour ne pas avoir de message d'erreur

exemple

insert into tab values(1,2,3)
select * from tab where champs=222

bon courage

Manipulation base de donnée SQL server 2000 composant Tquery

2 réponses

Votre réponse