طلب صغير

[mss cool]

عندي سؤال ممكن تساعدوني ....
بالرسم شكل ببرنامج فيجول بيسك لتصميم كودات c++ في تعليمة بتخلي البرنامج يقوم يأخذ فترة زمنية بين رسم كل جزء
لنفرض انو الشكل هو مثلث ولكن يرسم ضلع ثم بعد برهة ضلع آخرى ...

[doha mokdad]

على ما أعتقد f10 و لادخال القيم بضغطي على alt
هيك حسب ما فهمت السؤال

[kaito kid]

في الحقيقية ما زلت مبتدئ في الفيجوال ولكن اعتقد أن الدالة هي
الدالة timer

[J*O*H*N]

أخت مروى بتلاقي جوابك بهاد الموقع
http://www.vb4arab.com

__________________________________________________ ______

There is no greater
Gift in life than a
Forever friend

[Golden man]

السلام عليكم

أي فيجوال بيسك تقصدين ؟ vb6 أم vb.net ؟؟

في حال vb 6 فهذا الحل بثلاث طرق و في حال vb.net الحل مشابه مع بعض الاختلافات البسيطة:

أنشئي مشروع جديد و أضيفي زرين و أداة timer و اضبطي الخاصية interval على الزمن المطلوب للانتظار بالميلي ثانية و اكتبي الكود التالي:


Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Private Sub Command1_Click()
For i = 0 To 100000000: Next
MsgBox ("Golden man")
End Sub
Private Sub Command2_Click()
Timer1.Enabled = True
End Sub
Private Sub Command3_Click()
Sleep (1000)
MsgBox ("Golden man")
End Sub
Private Sub Timer1_Timer()
MsgBox ("Golden man")
Timer1.Enabled = False
End Sub



حيث بالطريقة الأولى يقف البرنامج بسبب الحلقة التي يقوم بتنفيذها لزمن يتبع لقيمة نهاية الحلقة
و الطريقة الثانية لا تحتاج إلى شرح
و الطريقة الثالثة نستخدم تابع api يقوم بإيقاف البرنامج للفترة الممررة له بالميلي ثانية أيضا.

حيث يمكنك استخلاص الفكرة من المثال السابق و تطبيقها على الرسم بشكل مشابه.