PDA

View Full Version : ترسیم شکل در برنامه



AmirPasha_vb
دوشنبه 10 آبان 1389, 14:30 عصر
با سلام
دوستان کسی میدونه در این برنامه چه جوری این شکل ترسیم شده ؟

مختصات نقاط داده شده و شماره و همه چی فقط چه جوری رسم شده ؟

روی Picture Box هست یا فرم ؟

http://barnamenevis.org/forum/attachment.php?attachmentid=59445&stc=1&d=1288611021

"juggle"
چهارشنبه 12 آبان 1389, 09:19 صبح
یه دید بنداز

همین الان نوشتم

AmirPasha_vb
چهارشنبه 12 آبان 1389, 10:17 صبح
یه دید بنداز

همین الان نوشتم

خیلی ممنون از توجه شما :قلب:

پس به نظر شما روی فرم رسم شده نه پیکچر باکس درسته ؟

برای نقطه های توپر شما از دستور Circle استفده کردید, این دستور دایره تو پر هم رسم میکنه ؟

اگر بخوام روی پیکچر باکس هم میتونم همین کارارو انجام بدم ؟

اون عدد ها چه جوری نوشته شده ؟ به نظر شما لیبل هستند یا مستقیما نوشته میشند ؟

با تشکر

returnx
چهارشنبه 12 آبان 1389, 12:23 عصر
برای نقطه های توپر شما از دستور Circle استفده کردید, این دستور دایره تو پر هم رسم میکنه ؟

اگر بخوام روی پیکچر باکس هم میتونم همین کارارو انجام بدم ؟

اگه دایره های متحدالمرکز رسم کنید به طوری که شعاع دایره بعدی یکی بیشتر از دایره قبلی باشه میشه دایره توپر...
همین کار رو روی پیکچر باکس هم میتونید انجام بدید

xxxxx_xxxxx
چهارشنبه 12 آبان 1389, 15:16 عصر
دوستان کسی میدونه در این برنامه چه جوری این شکل ترسیم شده ؟
احتمالش هست که از DirectX استفاده شده باشه.



برای نقطه های توپر شما از دستور Circle استفده کردید, این دستور دایره تو پر هم رسم میکنه ؟
قبل از رسم دایره، خاصیت FillStyle فرم رو روی Solid یا 0 قرار بدید:

Me.FillStyle = 0

Javad-2010
چهارشنبه 12 آبان 1389, 16:04 عصر
دوستان عزیز؛
یه سؤال در رابطه با ترسیم شکل:
اگر بخواهیم رنگ یک خط را که با دستور Line کشیدیم عوض کنیم، باید از چه دستوری استفاده کنیم.
منظورم غیر از رنگ‌های پیش‌فرض مثل vbRed هست، مثلاً بخواهیم با رنگ قهوه‌ای خط بکشیم.
خیلی ممنون

xxxxx_xxxxx
چهارشنبه 12 آبان 1389, 16:31 عصر
سلام،

منظورم غیر از رنگ‌های پیش‌فرض مثل vbRed هست، مثلاً بخواهیم با رنگ قهوه‌ای خط بکشیم.
از تابع RGB استفاده کنید و یا مقدار Hex رنگ موردنظرتون رو بهش بدید.
مثال:


Me.Line (10, 10)-(1000, 1000), RGB(200, 10, 80)

یا:

Me.Line (10, 10)-(1000, 1000), &HB668D88