PDA

View Full Version : سوال: گرد کردن فرم



seyed ehsan
سه شنبه 23 شهریور 1389, 22:28 عصر
من این کد را در زمان جستجو در اینترنت دیدم .
کارش اینه که لبه های فرم را گرد میکنه .

کسی از دوستان میتونه اون رو شرح بده ؟ خیلی گنگ هستش . این همه عدد چیه ؟ اصلا در کل چیزهایی مثل این رو اونهایی که برنامه نویس حرفه ای هستند چکار می کنند ؟ حفظ می کنند ؟ می نویسند ؟ بلدن ؟ از رو دست بغل دستی تقلب می کنند ...؟



Dim p As New Drawing2D.GraphicsPath()
p.StartFigure()
p.AddArc(New Rectangle(0, 0, 35, 35), 180, 90)
p.AddLine(35, 0, Me.Width - 35, 0)
p.AddArc(New Rectangle(Me.Width - 35, 0, 35, 35), -90, 90)
p.AddLine(Me.Width, 35, Me.Width, Me.Height - 35)
p.AddArc(New Rectangle(Me.Width - 35, Me.Height - 35, 35, 35), 0, 90)
p.AddLine(Me.Width - 35, Me.Height, 35, Me.Height)
p.AddArc(New Rectangle(0, Me.Height - 35, 35, 35), 90, 90)
p.CloseFigure()
Me.Region = New Region(p)

salehbagheri
چهارشنبه 24 شهریور 1389, 07:01 صبح
کسی از دوستان میتونه اون رو شرح بده ؟ خیلی گنگ هستش . این همه عدد چیه ؟

این اعداد همگی برای کار خاصی هستند. نیازی به حفظ کردنشون نیست فقط کافیه روش کار کردن باهاش رو یاد بگیرید، خود امکانات VisualStudio همه موارد رو براتون یادآوری میکنه.

مثلاً شما وقتی یک Rectangle جدید میسازید، در هنگام ساخت میتونید از Tooltip اون کمال استفاده رو ببرید.

در این کد شما برای فرم مستطیل خودتون یه طول و عرض تعریف میکنید. براساس اون برنامه میاد گوشه های این مستطیل رو پیدا میکنه و به اندازه 30 پیکسل با تابع AddArc یک کمان میزنه. بعد این کمانها رو توسط تابع AddLine به هم وصل میکنه و سپس به عنوان یک تصویر فرم ازش استفاده میکنه ...

به عکس زیر دقت کنید:

http://up.iranblog.com/Files/7dd4ffd81d1944468124.jpg

seyed ehsan
چهارشنبه 24 شهریور 1389, 22:22 عصر
آقای مدیر بخش محترم خیلی ببخشید ها ولی می خواستم بگم که بابا آخرشیییییییییییی
میدونم که اگه سوال کنم که شیر مرغ رو از کجا میشه بدست آورد انچا کسی پیدا میشه که جواب آدم رو بده و این خیلی با ارزشه .
براتون آرزوی موفقیت می کنم