مشکل با TASK BAR

[marzbannia]

چگون میشود موقعی که MDIFORM مان FULL SCREEN است MDIFORM مان بر روی TASK BAR بیفتد یعنی TASK BAR مشخص نباشد.

با تشکر فراوان

[vb2005]

سلام دوست عزیز،دقیقاً متوجه منظورتون نشدم اما به وسیله کد زیر می تونید مشخصات طول و عرض taskbar رو بدست بیارید.



Private Const ABM_GETTASKBARPOS = &H5
Private Type RECT
Left As Long
Top As Long
Right As Long
Bottom As Long
End Type
Private Type APPBARDATA
cbSize As Long
hwnd As Long
uCallbackMessage As Long
uEdge As Long
rc As RECT
lParam As Long
End Type
Private Declare Function SHAppBarMessage Lib "shell32.dll" (ByVal dwMessage As Long, pData As APPBARDATA) As Long

Function GetTaskBarSize()
Dim ABD As APPBARDATA
SHAppBarMessage ABM_GETTASKBARPOS, ABD
MsgBox "Width:" & ABD.rc.Right - ABD.rc.Left
MsgBox " Height:" & ABD.rc.Bottom - ABD.rc.Top
End Sub