درخواست کد رسم شکل ربع دایره

[mohammad-alone 564]

با درود

من زیاد با کلاس Canvas کار نکردم.

میتونم دایره و مستطیل رسم کنم ولی این شکلی که پیوست میکنم رو برای یه مدل نمودار دایره ای میخوام استفاده کنم.

پروژه در سطح کشور هستش لطفاً کمک کنید

ممنون

[امین مهدی نژاد 2,142]

من کتابخونه ای برای این کار تا حالا ندیدم که شاید باشه

ولی طراحی اینی که شما می خواین ساده و در این حال به روش های مختلفی میشه اونو انجام داد.

اصولی ترین راه استفاده از نسبت های مثلثاتیه . (بالاخره اینها یه جا باید کاربرد داشته باشن)

کد پایین یه کمون میکشه بر اساس مرکزیت نقطه 200و200 و شعاع 50

	For i=0 To 90 
		Dim x As Int=(CosD(i)*50)+200
		Dim y As Int=200-(SinD(i)*50)
		cvsImage.DrawPoint(x,y,Colors.Blue)
	Next

 

کد زیرم کد توپر بودنشه

		For j=200 To x
			cvsImage.DrawPoint(j,y,Colors.Blue)
		Next

در زیر هم کد کامل به صورت ساده نوشتم

موقعیت-شعاع و رنگ رو بهش بدین

به درجه بندی که دادم هم دقت کنید

هرگونه درجه بندی با نواحی چهارگانه سیستم مختصات رو خودتون در صورت نیاز بهش اضافه کنید.

Sub DrawArc(x As Int,y As Int, r As Int,color As Int)
	For i=0 To 90 
		Dim x11 As Int=(CosD(i)*r)+x
		Dim y11 As Int=y-(SinD(i)*r)
		cvsImage.DrawPoint(x11,y11,color)
		For j=x To x11
			cvsImage.DrawPoint(j,y11,color)
		Next
	Next
	
	Activity.Invalidate
End Sub

طوری توضیح دادم که هر گونه تغیری و یا شکلی بخواین دستتون باز باشه برای طراحیش

موفق باشید.

[mohammad-alone 564]

مرسی از کد و اهمیتی که دادین.

2 مورد هستش که پیش اومده برام :

1. ضخامت خط رو چطور بیشتر کنم؟

2. کد توپر شدن رو نتونستم درست انجام بدم، خط‌خطی رسم میکرد. نه توپر

 

ممنون