المساعد الشخصي الرقمي

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

abdelmalek
16-04-2010, 03:09 PM
السلام عليكم ورحمة الله وبركاته

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

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

بتوفيق ان شاء الله
mohfa
16-04-2010, 05:37 PM
هل من محاولة اخي الكريم , لكي تتعلم يجب ان تحاول
على كل حال
استعمل ال TTimer مع خاصية
Interval = 5000 يعني 5 ثواني .
او استعمل ال Sleep .
abdelmalek
16-04-2010, 06:07 PM
السلام عليكم ورحمة الله وبركاته

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

من فضل وضح اجابتك او اعطي مثال ؟
بتوفيق للجميع ان شاء الله
King SofT
16-04-2010, 06:24 PM
وعليكم السلام اخي

الاخ MOHFAيقصد هذا:
procedure TForm1.Button1Click(Sender: TObject);
begin
Sleep(5000);
ShowMessage('delphi4arab');
end;
khiro.alg
16-04-2010, 06:25 PM
السلام عليكم
أخي
ضع مكون التايمر الذي تجده في صفحة المكونات سيستام
ضعه على الفورم وإضغط عليه مرتين وأكتب الكود الذي تريده
حدد عنصر التايمر وإذهب لنافذة الخصائص - للخاصية إنترفال - تجدها1000 -إجعلها 5000
1000=1ثانية / 5000=5ثواني
ونفذ برنامجك وتمتع
abdelmalek
16-04-2010, 07:47 PM
اشكركم من قلبي
اخ sadoun39100 متميز لا يشرح إلا باعطاء مثال ( بالمثال يتضح المقال)
اخ khiro.alg دكتور لا يكفيه أعطاء المثال بل يزيد على دالك ( لا تعطيني سمكة ولكن علمني كيف اصتاد السمك)
متميزون حقا شكرا لكم
mohfa
16-04-2010, 10:55 PM
اخي الكريم كان من السهل ان اعطيك الاجابة و لكن صدقني لن تتعلم البرمجة بهذه الطريقة بل اعطيتك نصف الاجابة وكان الاحرى بك المحاولة اعتمادا على تلك المفاتيح .
والله المستعان
amar_del2007
16-04-2010, 11:35 PM
السلام عليكم :
اكيد نصيحةمن استاذ موهفا نصيحة صحيحة وعلى الاكل الاقتداء بها ..