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=11980)

الصفحات: 1 2


RE: برنامج القرعة الاختيار العشوائي - SOFIANE09 - 23-06-2022

(22-06-2022, 11:29 PM)Mr.DOS كتب : السلام عليكم

معذرة نسيت ان ارفق ملفات المشروع

تعيش اخي الكريم و مشكور على التواصل الطيب  والمفيد و الزخم الهائل من المعلومات المرفقة ضمن البرنامج ولكن اود ان اشد انتباهك ان في البرنامج مشكلة صغيرة لم تشد انتباهك وهي انه عندما اعمل cancel  و ابداء من جديد البرنامج رايح يكرر بعض الاسماء الموجودة في قاعدة البيانات
مثلا البرنامج عند بداية يكون فيه 35 تسجيل و عند عمل cancel رايح يكرر اسماء موجدو في قاعدة البيانات سايقا و يصبح الرقم مثلا 42 ارجو منكم التعديل ان امكن ومشكور اخي الكريم سبقا


RE: برنامج القرعة الاختيار العشوائي - Mr.DOS - 23-06-2022

السلام عليكم 
بسيطة ان شاء الله 
في الزر  [Cancel] استبدل السطر 





كود :
  delete(getRec,i,1);


بالسطر التالي





كود :
  delete(getRec,i,length(getRec));



RE: برنامج القرعة الاختيار العشوائي - SOFIANE09 - 24-06-2022

(23-06-2022, 09:18 PM)Mr.DOS كتب : السلام عليكم 
بسيطة ان شاء الله 
في الزر  [Cancel] استبدل السطر 





كود :
  delete(getRec,i,1);


بالسطر التالي





كود :
  delete(getRec,i,length(getRec));
للمرة اللثانية اود ان اشكرك اخيي الكريم على هاته المشاركة الطيب ودمت لنا  منبع و مرجع في عالم البرمجيات مرة اخرى شركا ليك و جميع المشاركين معنا