|
Jak zrobić przyciąganie okienka do krawędzi ekranu (jak w WinAmpie)? |
|
|
|
Napisał Administrator
|
|
poniedziałek, 03 październik 2005 |
Wystarczy do projektu doda? timer, a w jego procedurze wklepa?:
'Przyciaganie do lewej krawedzi
If Form1.Left <= 500 Then
Form1.Left = 0
End If
'Przyciaganie do gornej krawedzi
If Form1.Top <= 500 Then
Form1.Top = 0
End If
'Przyciaganie do prawej krawedzi
If Form1.Left >= Screen.Width - Form1.Width - 500 Then
Form1.Left = Screen.Width - Form1.Width
End If
'Przyciaganie do dolnej krawedzi
If Form1.Top >= Screen.Height - Form1.Height - 500 Then
Form1.Top = Screen.Height - Form1.Height
End If
To wszystko. Oczywi?cie "moment przyci?gania" mo?na dowolnie edytowa?.
Uwaga !!! Przy przyci?ganiu do
dolnej okienko nie jest przyci?gane
do paska zada?, a do rzeczywistej kraw?dzi ekranu.
przyk?ad
Aby dodać komentarz zaloguj się. Jeśli nie masz konta, załóż je sobie. Tylko zarejestrowani użytkownicy mogą pisać komentarze. Powered by AkoComment 2.0! |