delphi4arab منتديات دلفي للعرب
إضهار السجل الحديد - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : إضهار السجل الحديد (/showthread.php?tid=6228)



إضهار السجل الحديد - أبوأمين - 02-06-2014

السلام عليكم ورحمة الله

كيف يمكن إضهار السجل الجديد مباشرة بعد إدخاله وحفظه يظهر في اخر السجلات في المصفوفة في فورم واحد يعني اذا ضغطت على حفظ يطلع مباشرة جانبا في المصفوفة
مع العلم انني استعمل إستدعاء الاجراءات sqlفي دلفي

وهذا الكود
self.ADOStoredProc1.Active:=false
self.ADOStoredProc1.ProcedureName:='InsertSpécialité';
self.ADOStoredProc1.Parameters.Refresh;
self.ADOStoredProc1.Parameters.ParamByName('@Numspécial').Value:=strtoint(edit1.Text);
self.ADOStoredProc1.Parameters.ParamByName('@Nomspécial').Value:=edit2.Text;
self.ADOStoredProc1.Parameters.ParamByName('@message').Value:='message';
self.ADOStoredProc1.ExecProc;
self.ADOStoredProc1.Active:=true
showmessage (ADOStoredProc1.Parameters.ParamValues['@message']);