insert اطلاعات با استفاده از adoquery

[naeemeh]

با سلام
من در یک فرم با یک adoqury اطلاعات داخل دیتابیسم را نمایش می دهم البته اطلاعات از طریق dbedit های متصل به دیتاسورس کوئری است . حالا می خواهم با استفاده از همین dbedit ها و کوئری عمل insert انجام بدهم. امکان این کار هست و به چه صورت ؟

[tiphooo]

یک کلید برای درج قرار بدهید
و کد زیر را در آن بنویسید
Adoquery1.Append;
debedit1.setfocues; برای انتقال مکان نما به اولین editbox
یک دکمه هم برای ذخیره اطلاعات بگذارید با کد
Adoquery1.post;

[naeemeh]

من این کار را کردم ولی خطای not sql statment می ده می خوام بدونم دستور sql را کجا باید بذارم.

[aboualfazl]

سلام دوست عزیز اگه بخوای از دستورات sql استفاده کنی ، میتونی به این صورت استفاده کنی :






ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('insert into num values(:a,:b,:c,:d) ') ;
ADOQuery1.Parameters[0].Value:=ComboBox2.Text;
ADOQuery1.Parameters[1].Value:=Edit6.Text;
ADOQuery1.Parameters[2].Value:=Edit7.Text;
ADOQuery1.Parameters[3].Value:=Edit8.Text;
ADOQuery1.ExecSQL;

حالا به جای اون edit ها , combo از هر چی استفاده کردی بزار و ضمنا اگه پارامترات کمتر و یا زیادتره هم ، aو b وc وd و ... یا کم و یا زیاد کن .اوکی؟؟؟

هر چند نظر من اینه که حتما از یک data module استفاده کنی ، مثل زیر




DataModule3.ADOQuery1.SQL.Clear;
DataModule3.ADOQuery1.SQL.Add('insert into num values(:a,:b,:c,:d) ') ;
DataModule3.ADOQuery1.Parameters[0].Value:=ComboBox2.Text;
DataModule3.ADOQuery1.Parameters[1].Value:=Edit6.Text;
DataModule3.ADOQuery1.Parameters[2].Value:=Edit7.Text;
DataModule3.ADOQuery1.Parameters[3].Value:=Edit8.Text;
DataModule3.ADOQuery1.ExecSQL;