ورود

View Full Version : سوال: فرم روی فرم



30rabi
جمعه 20 خرداد 1390, 22:15 عصر
با سلام خدمت اساتید محترم
چگونه می توان فرمی را روی فرم دیگر قرار دهیم. منظورم همون bring to front هست.
با تشکر

Mr.Unknown
جمعه 20 خرداد 1390, 22:36 عصر
سلام
Option Explicit

Private Declare Function SetWindowPos& Lib "user32" (ByVal hwnd&, ByVal hWndInsertAfter&, ByVal x&, ByVal y&, ByVal Wid&, ByVal Hgt&, ByVal Flags&)

Const SWP_NOSIZE = 1

Const SWP_NOMOVE = 2

Const HWND_TOPMOST = -1



Private Sub Form_Load()

SetWindowPos hwnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOSIZE Or SWP_NOMOVE

End Sub