السلام عليكم احبائي جميعا
خوارزمية Bresenham لرسم الدائرة
قمت ببرمجتها فالفيجوال بيسك 6
والبرمجة صحيحة ولكن المشكلة اللتي ظهرت لدي
ان البرنامج يقوم برسم الدائرة واحداثيات مركزها (0,0)
سؤالي : كيف اقوم بتغيير احداثي المركز لكي استطيع رسم الدائرة في اي موقع اريده في الـ Form
في المرفقات الـ Form والكود
انتضر
تحياتي لكم جميعا
تم تعديل هذه المشاركة بواسطة نبولي في 1 نوفمبر 2010 في 20:17
مرحبا اخوي ...
ممكن تضيف Picture1 على الفورم و تغير التالي:
من:
PSet (x, y)
الى:
Picture1.PSet (x, y), RGB(100, 200, 300)
RGB(100, 200, 300) هذا الجزء راح يغير لون الرسم و ممكن تستغني عنه
و غيير كود زر امر المسح الى:
Private Sub Command2_Click()
Picture1.Cls
End Sub
بكذا راح يكون الرسم في Picture1 و تقدر تغيير مكانه زي ما تحب
تحياتي
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…