خیلی محیط پویا هست [بایگانی]

SYSMAN

سه شنبه 04 مرداد 1384, 18:12 عصر

اینجا از بس رفت و آمدزیاده آدم گیج می خوره (هر 12 ساعت یک نفر)

اینم یک کامپوننت برای تغییر رنگ پس زمینه فرم

منبع: محفوظ است

بابک زواری

سه شنبه 04 مرداد 1384, 23:20 عصر

برای تغییر رنگ به شکل Gradient متد برای این کار وجود داره

mehrdotnet

سه شنبه 04 مرداد 1384, 23:51 عصر

Sysman عزیز جالب بود دستت درد نکنه.
آقای زواری میشه بیشتر در مورد این متد توضیح بدین ؟

SYSMAN

پنج شنبه 06 مرداد 1384, 00:11 صبح

منم مشتاقم بدونم ؟

علیرضا مداح

جمعه 07 مرداد 1384, 10: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, 12:25 عصر

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