PDA

View Full Version : چطوری میشه کاری کرد که برنامه بالای ساعت اجرا بشه



hex161
یک شنبه 15 خرداد 1384, 18:54 عصر
با سلام .
میخواستم بدونم که چطوری میشه کاری کرد که برنامه بالای ساعت اجرا بشه؟
این کارو دستی میشه انجام داد ولی تو بعضی مانیتورها فرم گم میشه
آیا میشه کاری کرد که همیشه برنامه گوشه سمت راست بالای ساعت اجرا بشه؟
ممنون.

bamzy
یک شنبه 15 خرداد 1384, 21:47 عصر
سلام.با استفاده از منوی form layout window می توانید محل فرمتون را روی صفحه مونیتور تنظیم کنید.
view---> form layout window

حامد مصافی
دوشنبه 16 خرداد 1384, 00:49 صبح
سلام
این تابع ارتفاع تسک بار رو بر می گردونه؛ بقیش با خودتون



Public Type RECT
Left As Long
Top As Long
Right As Long
Bottom As Long
End Type

Public Declare Function GetClientRect Lib "user32.dll" (ByVal hWnd As Long, _
lpRect As RECT) As Long


Public Declare Function FindWindowA Lib "user32.dll" ( _
ByVal lpClassName As String, ByVal lpWindowName As String) As Long


Public Function GetTrayHeight() As Long
Dim hShell As Long
Dim rc As RECT
hShell = FindWindowA("Shell_TrayWnd", vbNullString)
GetClientRect hShell, rc
GetTrayHeight = (rc.Bottom - iOffset + 3) * Screen.TwipsPerPixelY
End Function
'

hex161
دوشنبه 16 خرداد 1384, 16:16 عصر
ممنون دوست عزیز. :flower: