+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : حدف تسجيلة لتلاتة جداول بزر واحد (/showthread.php?tid=4235)
حدف تسجيلة لتلاتة جداول بزر واحد - boughagha - 31-05-2012
السلام عليكم
كيف يمكننا حدف تسجيلة لتلاتة جداول بزر واحد سواء كانت هده الجداول مرتبطة مع بعضها او لا
جربت عدة طرق وبحث في المنتدى ولم اجد النتيجة
كود
procedure TForm1.BitBtn2Click(Sender: TObject);
begin
Table1.Open;
if table1.RecordCount>0 then
if MessageDlg('Voullez vous vraiment supprimer cet enregistrement ?', MtConfirmation, MbOkCancel,0)=mrok
then table1.Delete;
end;
حدف تسجيلة لتلاتة جداول بزر واحد - onexite - 31-05-2012
وعند الحذف ماذا ستحذف من الجدول الثاني والثالث ?
مجرد اقتراح
اذا كانت الجداول الثلاثة متساوية
فعند تغيير index جدول تتغير البقية ويصبح الكود
PHP كود :
procedure TForm1.BitBtn2Click(Sender: TObject);
begin
Table1.Open;
if table1.RecordCount>0 then
if MessageDlg('Voullez vous vraiment supprimer cet enregistrement ?', MtConfirmation, MbOkCancel,0)=mrok
then
begin
table1.Delete;
table2.Delete
table3.Delete
end;
end;
حدف تسجيلة لتلاتة جداول بزر واحد - boughagha - 31-05-2012
جربت هده الطريقة الجدول التاني والتالت يحدف ولكن في الجدول الاول لا يحدف
وكدلك عندما جربت هده الطريقة والجدول التاني والتالت مرتبطين مع الجدول الاول تظهر لي رسالة خطا
وشكرا
حدف تسجيلة لتلاتة جداول بزر واحد - format82 - 04-06-2012
هنالك مشكلة في ربط الجداول (العلاقة بين الجدولين ) في الربط حدد خيار عند حذف من الجدول الاساسي يحذ من الجدول الفرعي وكذلك التعديل
حدف تسجيلة لتلاتة جداول بزر واحد - nebchadelphi - 05-06-2012
السلام عليكم
سؤالك فيه بعض الغموض
يجب أن يكون هناك عنصر مشترك بين الجداول، مثل حقل من حقول التسجيلة
وعليه يتم الحذف استنادا على هذا المفتاح
اذا أمكنك توضيح سؤالك أكثر، فبالامكان تقديم ال******
شكرا والسلام عليكم
حدف تسجيلة لتلاتة جداول بزر واحد - boughagha - 05-06-2012
شكرا لكم جميعا
لقد نجحت العملية ودلك بربط الجداول مع بعضها بحقل مشترك
وبالتالي عند حدف تسجيلة من الجدول الاول تحدف ايضا من الجداول الاخرى المرتبطة معه
كود PHP:
procedure TForm1.BitBtn2Click(Sender: TObject);
begin
Table1.Open;
if table1.RecordCount>0 then
if MessageDlg('Voullez vous vraiment supprimer cet enregistrement ?', MtConfirmation, MbOkCancel,0)=mrok
then
begin
table1.Delete;
table2.Delete
table3.Delete
end;
end;