نوشتن برنامه با api

[candy1]

سلام دوستان

من می خوام ببینم دکمه مینیمم و زوم و بستن پنجره و تمام صفحه شدن را با توابع api نیاز دارم هر کی میتونه کمک کنه
ممنون

[Babak.Hassanpour]

برای مینیمایز:


Private Declare Function CloseWindow Lib "user32" (ByVal hwnd As Long) As Long
'کد
CloseWindow Me.hwnd


برای ماکزیمایز:


Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
Private Const SW_SHOWMAXIMIZED = 3

'کد
Call ShowWindow(Me.hwnd, SW_SHOWMAXIMIZED)



برای بستن:


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_DESTROY = &H2
Private Const WM_CLOSE = &H10

'کد
SendMessage Me.hwnd, WM_CLOSE, 0, 0