كيف اجعل برنامج الدلفي يقوم بتنفيد عملية بعد مرور كل 5 ثواني ؟
#1
السلام عليكم ورحمة الله وبركاته

كيف اجعل برنامج الدلفي يقوم بتنفيد عملية بعد مرور كل 5 ثواني ؟

اي عندا تشغيل البرنامج ينفد عملية معينة تم بعد مرور 5 ثواني يعيد تنفيد العملية السابقة تم بعد مرور 5 ثواني اخرى ينفد نفس العملية السابقة وهكدا بعد مرور كل 5 ثواني

بتوفيق ان شاء الله
كن متواضعا ولا تكن متكبرا // الصبر + المثابرة = النجاح
الرد
#2
هل من محاولة اخي الكريم , لكي تتعلم يجب ان تحاول
على كل حال
استعمل ال TTimer مع خاصية
Interval = 5000 يعني 5 ثواني .
او استعمل ال Sleep .
الرد
#3
السلام عليكم ورحمة الله وبركاته

انا ليس لديا ادنى فكرة لكي احاول

من فضل وضح اجابتك او اعطي مثال ؟
بتوفيق للجميع ان شاء الله
كن متواضعا ولا تكن متكبرا // الصبر + المثابرة = النجاح
الرد
#4
وعليكم السلام اخي

الاخ MOHFAيقصد هذا:
كود :
procedure TForm1.Button1Click(Sender: TObject); begin Sleep(5000); ShowMessage('delphi4arab'); end;
وتعاونوا على البر و التقوى ، ولا تعاونوا على الاثم والعدوان
الرد
#5
السلام عليكم
أخي
ضع مكون التايمر الذي تجده في صفحة المكونات سيستام
ضعه على الفورم وإضغط عليه مرتين وأكتب الكود الذي تريده
حدد عنصر التايمر وإذهب لنافذة الخصائص - للخاصية إنترفال - تجدها1000 -إجعلها 5000
1000=1ثانية / 5000=5ثواني
ونفذ برنامجك وتمتع
ومن يتهيب صعود الجبال يعش أبد الدهر بين التلال و الحفر
الرد
#6
اشكركم من قلبي
اخ sadoun39100 متميز لا يشرح إلا باعطاء مثال ( بالمثال يتضح المقال)
اخ khiro.alg دكتور لا يكفيه أعطاء المثال بل يزيد على دالك ( لا تعطيني سمكة ولكن علمني كيف اصتاد السمك)
متميزون حقا شكرا لكم
كن متواضعا ولا تكن متكبرا // الصبر + المثابرة = النجاح
الرد
#7
اخي الكريم كان من السهل ان اعطيك الاجابة و لكن صدقني لن تتعلم البرمجة بهذه الطريقة بل اعطيتك نصف الاجابة وكان الاحرى بك المحاولة اعتمادا على تلك المفاتيح .
والله المستعان
الرد
#8
السلام عليكم :
اكيد نصيحةمن استاذ موهفا نصيحة صحيحة وعلى الاكل الاقتداء بها ..
الرد


التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم