بسم الله الرحمن الرحيم
إخواني في منتدى دلفي للفريق العربي للبرمجة احببت أن أقدم لكم هدية متواضعة وهي برنامج حكمة اليوم ولكن أطلب من الإخوان التعديل عليها بعض الشيء بحيث يكون ظهور الحكم بشكل عشوائي وليس بشكل متتالي كما هي حتى ينتفع منها الجميع وشكراً
بسم الله الرحمن الرحيم
إخواني في منتدى دلفي للفريق العربي للبرمجة احببت أن أقدم لكم هدية متواضعة وهي برنامج حكمة اليوم ولكن أطلب من الإخوان التعديل عليها بعض الشيء بحيث يكون ظهور الحكم بشكل عشوائي وليس بشكل متتالي كما هي حتى ينتفع منها الجميع وشكراً
قال الحسن البصري : يا إبن آدم إنما أنت أيام إذا ذهب يومك ذهب بعضك
بارك الله فيك أخي عبد العزيز على الرد ولكن كيف أستعمل الدالة Random أو Randomize في تطبيقي المرفق
وشكراً
قال الحسن البصري : يا إبن آدم إنما أنت أيام إذا ذهب يومك ذهب بعضك
يمكن استعمالها هكذا
Table1.RecNo := Random(Table1.RecordCount);
حيث Random(x) تعطيق قيمة عشوائية من صفر الى x-1
مشكور أخي عبد العزيز " كل شيء يحتاج إلى لمسة خبير "
جزاك الله كل الخير و دوام الصحة والعافية .
تم تعديل هذه المشاركة بواسطة saiddsa3980 في 3 يونيو 2008 في 19:19
قال الحسن البصري : يا إبن آدم إنما أنت أيام إذا ذهب يومك ذهب بعضك