الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

برنامج حكمة اليوم

بدأه saiddsa3980 في 18 مايو 2008 · 4 رد · 951 مشاهدة · في لغة Delphi
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

بسم الله الرحمن الرحيم

إخواني في منتدى دلفي للفريق العربي للبرمجة احببت أن أقدم لكم هدية متواضعة وهي برنامج حكمة اليوم ولكن أطلب من الإخوان التعديل عليها بعض الشيء بحيث يكون ظهور الحكم بشكل عشوائي وليس بشكل متتالي كما هي حتى ينتفع منها الجميع وشكراً

NextTips.rar

قال الحسن البصري : يا إبن آدم إنما أنت أيام إذا ذهب يومك ذهب بعضك

#2

حاول استخدام Random و Randomize ليكو نالاختيار عشوائي

راجع Help دلفي

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

d4baa0.gif
#3

بارك الله فيك أخي عبد العزيز على الرد ولكن كيف أستعمل الدالة Random أو Randomize في تطبيقي المرفق

وشكراً

قال الحسن البصري : يا إبن آدم إنما أنت أيام إذا ذهب يومك ذهب بعضك

#4

يمكن استعمالها هكذا

Table1.RecNo := Random(Table1.RecordCount);

حيث Random(x) تعطيق قيمة عشوائية من صفر الى x-1

Delphi_NextTips.rar

d4baa0.gif
#5

مشكور أخي عبد العزيز " كل شيء يحتاج إلى لمسة خبير "

جزاك الله كل الخير و دوام الصحة والعافية .

تم تعديل هذه المشاركة بواسطة saiddsa3980 في 3 يونيو 2008 في 19:19

قال الحسن البصري : يا إبن آدم إنما أنت أيام إذا ذهب يومك ذهب بعضك

مواضيع مشابهة