Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Media";
Текущий архив: 2007.03.25;
Скачать: [xml.tar.bz2];

Вниз

Прозрачность компонента.   Найти похожие ветки 

 
ronyn   (2006-07-25 00:06) [0]

Как сделать плавное появление (прорисовку) панели (или др. компонента) и плавное исчезновение?
                      Заранее благодарен.


 
@!!ex ©   (2006-07-25 09:20) [1]

Под XP и 2000 все той же регулировкой прозрачности окон.
Ведь практически любой визуальный компонент - окно.
Должно прокатить.


 
@!!ex ©   (2006-07-25 09:52) [2]


SetWindowLong(hWnd, GWL_EXSTYLE, WS_EX_LAYERED);
SetLayeredWindowAttributes(hWnd, 0, 100, LWA_COLORKEY);


Хм... Форму прозрачной сделать получилось... кнопу, панельку - нет.
Видимо я ошибся.


 
Степан   (2006-07-25 23:40) [3]

Ха, интересно. Я тоже всегда думал, что любой компонент очень легко сделать прозрачным под Win2k/XP, но оказалось, что нет... Вот тоже попытался... На форме работает, на ListView не хочет! Вот исходник, давайте подумаем!..

procedure TForm1.Button1Click(Sender: TObject);
begin
 SetWindowLong(ListView1.Handle, GWL_EXSTYLE, GetWindowLong(ListView1.Handle,
   GWL_EXSTYLE) or WS_EX_LAYERED);
 SetLayeredWindowAttributes(ListView1.Handle, 0, 128, LWA_ALPHA);
end;



Страницы: 1 вся ветка

Форум: "Media";
Текущий архив: 2007.03.25;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.04 c
2-1173020828
kop
2007-03-04 18:07
2007.03.25
DataPump


2-1172674149
ds120hp
2007-02-28 17:49
2007.03.25
Связь форм


2-1172731272
roman_ln
2007-03-01 09:41
2007.03.25
Защита программ и данных с использованием электронных ключей.


15-1172430056
Nic
2007-02-25 22:00
2007.03.25
ЖК-монитор, WinXP, проблемы


2-1172987136
Roman_S
2007-03-04 08:45
2007.03.25
Помогите правильно написать цикл перебора алфавита





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский