View Full Version : خیلی محیط پویا هست
SYSMAN
سه شنبه 04 مرداد 1384, 19:12 عصر
اینجا از بس رفت و آمدزیاده آدم گیج می خوره (هر 12 ساعت یک نفر)
اینم یک کامپوننت برای تغییر رنگ پس زمینه فرم
منبع: محفوظ است
بابک زواری
چهارشنبه 05 مرداد 1384, 00:20 صبح
برای تغییر رنگ به شکل Gradient متد برای این کار وجود داره
mehrdotnet
چهارشنبه 05 مرداد 1384, 00:51 صبح
Sysman عزیز جالب بود دستت درد نکنه.
آقای زواری میشه بیشتر در مورد این متد توضیح بدین ؟
SYSMAN
پنج شنبه 06 مرداد 1384, 01:11 صبح
منم مشتاقم بدونم ؟
علیرضا مداح
جمعه 07 مرداد 1384, 11:49 صبح
سلام .
Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles MyBase.Paint
'''How to Create a linear gradient brush to fill a rectangle with.'''
'1 - Creating a rectangle
Dim Rect As New Rectangle(0, 0, DisplayRectangle.Width, DisplayRectangle.Height)
'2- Creating a linear gradient brush to fill rectangle with.
Dim MyBrush As New LinearGradientBrush(Rect, Color.Green, Color.Yellow, LinearGradientMode.BackwardDiagonal)
'3 - Filling rectangle with defined brush
Me.CreateGraphics().FillRectangle(MyBrush, Rect)
End Sub
SYSMAN
جمعه 07 مرداد 1384, 13:25 عصر
بله اینم میشه دستت درد نکه
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.