Vb6'da projeyi herzaman üstte tutma nasıl yapılır ?

Tarihe göre sırala Oylara göre sırala
K

Küçük-Mavi

Kıdemli Üye
23 Şub 2013
2,674
0
Backdoor
Buyrun hocam :)

Const HWND_TOPMOST = -1 ' Form en üstte

Const HWND_NOTOPMOST = -2 ' Normal

Const SWP_NOSIZE = &H1 ' Form boyutları değiştirilemez

Const SWP_NOMOVE = &H2 ' Form taşınmaz

Const SWP_NOACTIVATE = &H10 ' Form aktif yapılmaz

Const SWP_SHOWWINDOW = &H40 ' Pencere Görünür



Private Declare Sub 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)



Private Sub Form_Activate()

SetWindowPos Me.hWnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOACTIVATE Or SWP_SHOWWINDOW Or SWP_NOMOVE Or SWP_NOSIZE

End Sub
Genişletmek için tıkla ...
 
Oyla 0 Downvote
Üst

Turkhackteam.org internet sitesi 5651 sayılı kanun’un 2. maddesinin 1. fıkrasının m) bendi ile aynı kanunun 5. maddesi kapsamında "Yer Sağlayıcı" konumundadır. İçerikler ön onay olmaksızın tamamen kullanıcılar tarafından oluşturulmaktadır. Turkhackteam.org; Yer sağlayıcı olarak, kullanıcılar tarafından oluşturulan içeriği ya da hukuka aykırı paylaşımı kontrol etmekle ya da araştırmakla yükümlü değildir. Türkhackteam saldırı timleri Türk sitelerine hiçbir zararlı faaliyette bulunmaz. Türkhackteam üyelerinin yaptığı bireysel hack faaliyetlerinden Türkhackteam sorumlu değildir. Sitelerinize Türkhackteam ismi kullanılarak hack faaliyetinde bulunulursa, site-sunucu erişim loglarından bu faaliyeti gerçekleştiren ip adresini tespit edip diğer kanıtlarla birlikte savcılığa suç duyurusunda bulununuz.