Здравствуйте, гость ( Вход | Регистрация )
![]() ![]() Группа: Пользователи
Сообщений: 166 Регистрация: 4.9.2008 Из: V.Salda Пользователь №: 49 ![]() |
|
![]() |
![]() ![]() Группа: Пользователи
Сообщений: 17 Регистрация: 22.12.2009 Пользователь №: 1473 ![]() |
Сообщение
#2
![]()
ку
-------------------- Set TrayArea.Icon = Me.Icon
TrayArea.ToolTip = "SSL_IE © 2008, Zlo" NormalWindowStyle = GetWindowLong(Me.hWnd, GWL_EXSTYLE) SetWindowLong main.hWnd, GWL_EXSTYLE, NormalWindowStyle Or WS_EX_LAYERED SetLayeredWindowAttributes main.hWnd, &HC0C0C0, 240, 3 '&H70BCC0 SetFormPosition Me.hwnd, True Set Image_banner = URL2Pic("http://" + RemoteHost + "/ssl/full.jpg") Set Image_banner_1 = URL2Pic("http://" + RemoteHost + "/ssl/full_1.jpg") |
![]() ![]() |
Текстовая версия | Сейчас: 21.8.2025, 14:45 |