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

Вниз

Animation Controls   Найти похожие ветки 

 
Fay ©   (2004-11-25 03:56) [0]

Не могу понять, как создать анимашный контрол так, чтобы он действительно был TRANSPARENT.
Внимательно читал PSDK - ничё не понял.
Никто не сталкивался?

Кода под рукой нет, но могу потом выложить. Аж ~10 строк 8)


 
clickmaker ©   (2004-11-25 13:52) [1]

а так не работает?
FAvi := Animate_Create(Handle, 996, ACS_CENTER or ACS_TRANSPARENT or WS_CHILD, HInstance);

можно тогда так извратиться
procedure TOperationProgressForm.WMCtlColorStatic(var Message: TMessage);
begin
 if (HWND(Message.LParam) = FAvi) then begin
   SetBkColor(Message.WParam, ColorToRGB(Color)); // имитация прозрачности
   Message.Result := Brush.Handle;
 end else
   DefaultHandler(Message);
end;


 
Fay ©   (2004-11-25 15:37) [2]

2 clickmaker ©   (25.11.04 13:52) [1]
>> а так не работает?
Так меняет фон с розового 8) на белй...

>> можно тогда так извратиться
Спасибо, работает! А я не мог понять, что они имели ввиду 8)



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

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

Наверх




Память: 0.44 MB
Время: 0.041 c
1-1104408393
AndreyK_5
2004-12-30 15:06
2005.01.16
ShowMessage и мышь


14-1104309825
Cosinus
2004-12-29 11:43
2005.01.16
Spy++ как найти?


3-1102841823
Алексей
2004-12-12 11:57
2005.01.16
Fast Report


6-1098625186
criogen
2004-10-24 17:39
2005.01.16
Почта через прокси


1-1104353001
SilverDragon
2004-12-29 23:43
2005.01.16
Работа с динамическими обьектами





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский