Transparent Form.Пожалуйста помогите тоже.

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
igor_m
Постоялец
Постоялец
 
Сообщения: 343
Зарегистрирован: 22.03.2002 (Пт) 12:40

Transparent Form.Пожалуйста помогите тоже.

Сообщение igor_m » 24.02.2007 (Сб) 1:29

Если можно, пример какой-то или принцип - как делается.

На главной форме у меня картинка на PictureBox(графики). На дополнительной тоже картинка будет тоже на PictureBox (просто хочется чтоб аналогично было - чтоб все расчеты и масштабы такие же были).
Как сделать чтоб вторая картинка (может форма, и PictureBox в том числе - не знаю) были полупрозрачными, чтоб вторую форму можно было надвинуть на основную и смотреть, что там в итоге получается?

Извиняюсь за простые вопросы, но самому долго придется разбираться.

BV
Thinker
Thinker
Аватара пользователя
 
Сообщения: 3987
Зарегистрирован: 12.09.2004 (Вс) 0:55
Откуда: Молдавия, г. Кишинёв

Сообщение BV » 24.02.2007 (Сб) 2:45

SetLayeredWindowAttributes?
const char *out = "|*0>78-,+<|"; size_t cc = char_traits<char>::length(out);
for (size_t i=0;i<cc;i++){cout<<static_cast<char>((out[i]^89));}cout<<endl;

EUGY
Бывалый
Бывалый
Аватара пользователя
 
Сообщения: 214
Зарегистрирован: 09.11.2006 (Чт) 22:51
Откуда: Мурманск

Сообщение EUGY » 24.02.2007 (Сб) 2:53

'Windows 95/98: Unsupported.
Option Explicit
Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long
Private Declare Function SetLayeredWindowAttributes Lib "user32" (ByVal hwnd As Long, ByVal clrref As Long, ByVal alfa As Long, ByVal action As Long) As Long
Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Private Const GWL_EXSTYLE = (-20)
Private Const WS_EX_LAYERED = &H80000

Private Sub Form_Load()
Call SetWindowLong(Me.hwnd, GWL_EXSTYLE, WS_EX_LAYERED Or GetWindowLong(Me.hwnd, GWL_EXSTYLE))
Call SetLayeredWindowAttributes(Me.hwnd, 0, 128, 2)
End Sub

Cytron
Бывалый
Бывалый
Аватара пользователя
 
Сообщения: 266
Зарегистрирован: 15.02.2007 (Чт) 21:09

Сообщение Cytron » 24.02.2007 (Сб) 9:56

Я однажды решил попробовать и применил transparent 60 % ко всем окнам. В итоге всё работало, но так медленно что пришлось перезагружать комп :D

igor_m
Постоялец
Постоялец
 
Сообщения: 343
Зарегистрирован: 22.03.2002 (Пт) 12:40

Сообщение igor_m » 24.02.2007 (Сб) 12:12

Все понятно.
Спас...
Спасибо!

keks-n
Доктор VB наук
Доктор VB наук
Аватара пользователя
 
Сообщения: 2509
Зарегистрирован: 19.09.2005 (Пн) 17:17
Откуда: г. Москва

Сообщение keks-n » 24.02.2007 (Сб) 14:15

RamMerlabs
Во многих компьютерных клубах ставят именно 98-ые форточки. Ибо для игр.
Изображение

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 26.02.2007 (Пн) 9:21

keks-n писал(а):Во многих компьютерных клубах ставят именно 98-ые форточки. Ибо для игр.

Странно это. Ибо многие игры хотят именно NT-системы.
Lasciate ogni speranza, voi ch'entrate.

tyomitch
Пользователь #1352
Пользователь #1352
Аватара пользователя
 
Сообщения: 12822
Зарегистрирован: 20.10.2002 (Вс) 17:02
Откуда: חיפה

Сообщение tyomitch » 26.02.2007 (Пн) 11:25

А у меня есть куча игр, в том числе досовский Принц Персии, которые идут только под Win9x.
Изображение

zan
Бывалый
Бывалый
 
Сообщения: 224
Зарегистрирован: 24.08.2006 (Чт) 4:55

Сообщение zan » 27.02.2007 (Вт) 4:14

tyomitch писал(а):досовский Принц Персии, которые идут только под Win9x.

[offtop]Странно, у меня он запускается и на 2k и XP[/offtop]

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 27.02.2007 (Вт) 9:44

tyomitch писал(а):А у меня есть куча игр, в том числе досовский Принц Персии, которые идут только под Win9x.

Я его запускал под DosBox :)
И навряд ли это самая популярная игра в игровых клубах.
Lasciate ogni speranza, voi ch'entrate.


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: Google-бот и гости: 34

    TopList