PDA

View Full Version : Always On Top



BAHAL_KEYHAN
سه شنبه 08 شهریور 1384, 02:34 صبح
می خواستم یکی تابع api مربوط به alwaysontop رو برام بفرسته
ممنون میشم :گیج:

PalizeSoftware
سه شنبه 08 شهریور 1384, 02:50 صبح
از تابع SetWindowPos استفاده کن به این صورت


Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, _
ByVal hWndInsertAfter As Long, _
ByVal x As Long, _
ByVal y As Long, _
ByVal cx As Long, _
ByVal cy As Long, _
ByVal wFlags As Long) As Long

Private Const HWND_TOPMOST = -1

Private Sub Form_Load()
SetWindowPos hwnd, HWND_TOPMOST, 0, 0, 0, 0, 3
End Sub