برش بخشی از فرم

[relax_cp]

با سلام
می خواستم بدونم چطور میشه فرم ورودی را برش زد .
توضیحات:
ما یک فرم داریم می خواهیم بخشی از فرم که رنگ آن سبز است برش بخورد.
منظور از برش این است که وقتی فرم اجرا می شود صفحه یا مطالبی که زیر آن بخش است دیده شود
من فرم رو می ذارم لطفا ویرایش را روی آن انجام بدین. ممنون

[Tasiyan]

Private Const LWA_COLORKEY = &H1
Private Const LWA_ALPHA = &H2

Private Const GWL_EXSTYLE = (-20)
Private Const WS_EX_LAYERED = &H80000 '&H70000 &H60000

Private Declare Function SetLayeredWindowAttributes Lib "user32" (ByVal hwnd As Long, ByVal crKey As Long, ByVal bAlpha As Byte, ByVal dwFlags As Long) As Long
Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long
Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long

Private Declare Function ReleaseCapture Lib "user32" () As Long
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" ( _
ByVal hwnd As Long, _
ByVal wMsg As Long, _
ByVal wParam As Long, _
lParam As Any) As Long

Private Const WM_NCLBUTTONDOWN = &HA1



Dim Retval As Long
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Call ReleaseCapture
Call SendMessage(hwnd, WM_NCLBUTTONDOWN, 2, 0&)
End Sub

Private Sub Form_Load()
Me.BackColor = RGB(255, 0, 0)

Retval = GetWindowLong(Me.hwnd, GWL_EXSTYLE)
Retval = Retval Or WS_EX_LAYERED
SetWindowLong Me.hwnd, GWL_EXSTYLE, Retval
SetLayeredWindowAttributes Me.hwnd, RGB(255, 0, 0), 0, LWA_COLORKEY
End Sub
یه فایل گیف به فرمت اضافه کن، برو صفا ...!!!

[mmssoft]

با سلام
می خواستم بدونم چطور میشه فرم ورودی را برش زد .
توضیحات:
ما یک فرم داریم می خواهیم بخشی از فرم که رنگ آن سبز است برش بخورد.
منظور از برش این است که وقتی فرم اجرا می شود صفحه یا مطالبی که زیر آن بخش است دیده شود
من فرم رو می ذارم لطفا ویرایش را روی آن انجام بدین. ممنون

این رو دانلود کن. کمکت میکنه.
موفق باشی.

[butterfly8528]

سلام دوست عزیز .

من این کار رو به 2 صورت زیر انجام دادم .

روش اول :

1- کد RGB رنگ موردنظر ( سبز ) رو با فتو شاپ بدست آوردم .

2- رنگ پس زمینه فرم رو به RGB مورد نظر تعغیر دادم .

3- رنگ پس زمینه فرم رو حظف کردم .


روش دوم :

1 - قسمتی اصلی تصویر رو خیلی دقیق برش زدم و بدون پس زمینه با فرمت GIF ذخیره کردم .

2- عکس Gif رو به عنوان عکس پس زمینه فرم انتخاب کردم .

3- رنگ پس زمینه رو حظف کردم .


* چون در روش دوم عکس خیلی خوب و دقیق برش خرده کار بسیار ظریف تر و دقیق تر در اومد .

موفق باشید .