تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[مثال] مثال عن رسم دوائر بشكل جميل
#1
السلام عليكم
باستعمال كود رسم دوائر

PHP كود :
 g.DrawEllipse(p, New Rectangle(XpYpdd)) 

المطلوب رسم مجموعة دوائر حول مركز واحد

لذلك لزم ان يكن المسار دائري يعني موقع x y  بشكل دائري
و نغير الونها و مواقعها بهذا الشكل



لذلك كانت المعادلة 

PHP كود :
[align=center bel Math.PI 180[/align]
[
align=center           Xp Math.Cos(bel) : Yp Math.Sin(bel)[/align

( الشكر موصول للاستاذ ثامر ابو بلقيس )

الان نستغل المسار يتغيير في كل مرة موقع x و y  اي نرسم دائرة في كل مرة

الان يبقى ان نستغل دالة steep اي الفرق بين موقع الدالة التكرارية 

فيكون الكود الاساسي للفكرة التالي

PHP كود :
[align=center Dim belxyAs Double[/align]
[
align=center       Dim p As Pen[/align]
[
align=center       p = New Pen(Brushes.Black1)[/align]
[
align=center       Dim choixcolor 0[/align]
[
align=center       Dim XpYp As Integer[/align]
[
align=center       For i As Integer 0 To 360 Step TextBox1.Text[/align]
[
align=center           bel Math.PI 180[/align]
[
align=center           Xp Math.Cos(bel) : Yp Math.Sin(bel)[/align]
[
align=center           g.DrawEllipse(p, New Rectangle(XpYpdd))[/align]
[
align=center       Next[/align


الملف السورس للفكرة و المثال


.rar   drawcircl.rar (الحجم : 14.88 ك ب / التحميلات : 9)



بالتوفيق 
 لعل الكلمة التي تنفعني لم أكتبها بعد
عبد الله بن المبارك
الرد


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Wink [مشروع] مشروع تصميم فورم بشكل جديد بالفيجوال ستوديو مع السورس كود ahmadpal 5 992 15-09-20, 04:56 PM
آخر رد: Ali 2020
  مثال على عمل qr code و قرائة ال qr code من ملف صورة او من الشاشة mohamed haroon 4 2,242 08-09-20, 10:48 AM
آخر رد: Emad aldeen
  مثال بسيط للنقل المواد بين المخازن ارجو ان يعجبكم خالد كامل1 1 136 27-08-20, 10:35 PM
آخر رد: خالد كامل1
  [كود] مثال عن رسم خط مستقيم بين نقطتين عبد الهادي بهاب 7 369 07-08-20, 04:52 AM
آخر رد: عبد الهادي بهاب
  مثال استيراد اى ملف اكسيل وتصدير البيانات الى ملف اكسيل new_programer 2 926 05-08-20, 07:31 PM
آخر رد: عبد الهادي بهاب
  [Acces2007] مثال على شجرة محاسبية Mohamad Anan 2 419 30-07-20, 02:38 PM
آخر رد: المعترس
  مثال في عمل النسخة الاحتياطية مع ضغط الملف asemshahen5 0 185 26-07-20, 02:09 AM
آخر رد: asemshahen5
  مثال لحمايه ملفات البرنامج من النسخ alshandodi 3 527 17-07-20, 12:28 PM
آخر رد: ibra9009
  [مشروع] مثال للعمل مع الـBackgroundWorker سعود 10 1,509 09-07-20, 06:24 AM
آخر رد: سعود
  [VB.NET] تم تحديث الرابط - مثال برنامج اقتطاع الفيديو معاند الحظ 6 823 07-07-20, 01:45 AM
آخر رد: معاند الحظ

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


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