sahand100
یک شنبه 15 مرداد 1391, 20:26 عصر
خوب این آموزش بیشتر برای مبتدی هاست پس استادان به بزرگی خودشون ببخشن!:ناراحت::
<-----------------------------------------------------قسمت1------------------------------------------------>
|خوب اول میخوام از متغیر گرفتن حرف بزنم که اولش اینطوریه:
|Dim graphic1 as graphic
|خب اینکه یک چیز بسیار ساده است.خب ما میتوانیم با استفاده از گرافیک یک برنامه ی نقاشی
|بسازیم که میتوانید نمونه اش را در لینک سطر بعد مشاهده نمایید.
|http://barnamenevis.org/showthread.php?354960-%D8%A8%D8%B1%D9%86%D8%A7%D9%85%D9%87-%D9%85%D8%B1%D8%A8%D9%88%D8%B7-%D8%A8%D9%87-%DA%AF%D8%B1%D8%A7%D9%81%DB%8C%DA%A9
|با گرافیک میتوان برنامه های جالبی ساخت برای دانستن بیشتر بخش بعد را مطالعه نمایید.
<-----------------------------------------------------------پایان این بخش-------------------------------->
<-----------------------------------------------بخش 2------------------------------------------------------->
خب در این قسمت قصد دارم که با استفاده از گرافیک یک نوشته بنویسیم.
خب برای اینکار یک متغیر از نوع گرافیک در نظر میگیریم:
Dim formgraphic as graphic
بعد یک دکمه میسازیم در ضمن من در بخش یک چیز مهم را به شما آموزش میدهم:
||||||||||||||||||||||||||||||||||||مهم|||||||| ||||||||||||||||||||||||
من در اینجا میخواهم متغیری با نام buttons به شما آموزش دهم بنابراین
در پایین کد
public class form1
را در نظر بگیرید.(بهتر است متغیرتان که از نوع گرافیک بود بالای این متغیر در نظر بگیرید.)
خب اینطوریه کدش
Dim btns as buttons
بعد پایین متغیر btns اینو بنویسید:
Enum buttons
Rectangle
ellipse
line
freehand
End Enum
خب بعد از منوی کشویی اشیا در قسمت کد نویسی نام دکمه ی تان و در قسمت رویداد کیلیک را انتخاب نمایید.
بعد درونش اینو بنویسید:
btns = buttons.rectangle
غیر از 3 دکمه دیگر ایجاد کنید و این ها را به ترتیب درونشون بنویسید(هر خط برای هر کدام.) درونش بنویسید:
btns = buttons.ellips
btns = buttons.line
btns = buttons.freehand
خوب اینجا تمام
||||||||||||||||||||||||||||پایان توجه!||||||||||||||||||||||||||||||
بعد در قسمت فرم form_load اینو بنویسید:
formgraphic = Me.CreateGraphics()
Dim tex1 = New Font(New FontFamily("Tahoma"), 40, FontStyle.Bold)
formgraphic.DrawString("PAINT", tex1, Brushes.LightBlue, 257, 277)
'اینجا در خط دوم یک متغیر از نوع فونت و در خطط سوم به ترتیب توی چرانتزش متن نوشته فونت نوشته رنگ نوشته و متخصات نوشته و متخصات نوشته'
بعد فرم را اجرا کرده و میبینید که در متخصاتی که داده شده یک نوشته ظاهر می شود.
<--------------------------------------------پایان------------------------------------------>
<-----------------------------------------------------قسمت1------------------------------------------------>
|خوب اول میخوام از متغیر گرفتن حرف بزنم که اولش اینطوریه:
|Dim graphic1 as graphic
|خب اینکه یک چیز بسیار ساده است.خب ما میتوانیم با استفاده از گرافیک یک برنامه ی نقاشی
|بسازیم که میتوانید نمونه اش را در لینک سطر بعد مشاهده نمایید.
|http://barnamenevis.org/showthread.php?354960-%D8%A8%D8%B1%D9%86%D8%A7%D9%85%D9%87-%D9%85%D8%B1%D8%A8%D9%88%D8%B7-%D8%A8%D9%87-%DA%AF%D8%B1%D8%A7%D9%81%DB%8C%DA%A9
|با گرافیک میتوان برنامه های جالبی ساخت برای دانستن بیشتر بخش بعد را مطالعه نمایید.
<-----------------------------------------------------------پایان این بخش-------------------------------->
<-----------------------------------------------بخش 2------------------------------------------------------->
خب در این قسمت قصد دارم که با استفاده از گرافیک یک نوشته بنویسیم.
خب برای اینکار یک متغیر از نوع گرافیک در نظر میگیریم:
Dim formgraphic as graphic
بعد یک دکمه میسازیم در ضمن من در بخش یک چیز مهم را به شما آموزش میدهم:
||||||||||||||||||||||||||||||||||||مهم|||||||| ||||||||||||||||||||||||
من در اینجا میخواهم متغیری با نام buttons به شما آموزش دهم بنابراین
در پایین کد
public class form1
را در نظر بگیرید.(بهتر است متغیرتان که از نوع گرافیک بود بالای این متغیر در نظر بگیرید.)
خب اینطوریه کدش
Dim btns as buttons
بعد پایین متغیر btns اینو بنویسید:
Enum buttons
Rectangle
ellipse
line
freehand
End Enum
خب بعد از منوی کشویی اشیا در قسمت کد نویسی نام دکمه ی تان و در قسمت رویداد کیلیک را انتخاب نمایید.
بعد درونش اینو بنویسید:
btns = buttons.rectangle
غیر از 3 دکمه دیگر ایجاد کنید و این ها را به ترتیب درونشون بنویسید(هر خط برای هر کدام.) درونش بنویسید:
btns = buttons.ellips
btns = buttons.line
btns = buttons.freehand
خوب اینجا تمام
||||||||||||||||||||||||||||پایان توجه!||||||||||||||||||||||||||||||
بعد در قسمت فرم form_load اینو بنویسید:
formgraphic = Me.CreateGraphics()
Dim tex1 = New Font(New FontFamily("Tahoma"), 40, FontStyle.Bold)
formgraphic.DrawString("PAINT", tex1, Brushes.LightBlue, 257, 277)
'اینجا در خط دوم یک متغیر از نوع فونت و در خطط سوم به ترتیب توی چرانتزش متن نوشته فونت نوشته رنگ نوشته و متخصات نوشته و متخصات نوشته'
بعد فرم را اجرا کرده و میبینید که در متخصاتی که داده شده یک نوشته ظاهر می شود.
<--------------------------------------------پایان------------------------------------------>