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

Вниз

Как убрать тень в хинтах в Delphi 7, WinXP?   Найти похожие ветки 

 
Гас   (2002-12-17 12:29) [0]

Здравствуйте мастера! Если пытаюсь сделать непрямоугольные подсказки, то эта тень все портит. Подскажите, пожалуйста, как исправить?


 
BlackTiger   (2002-12-17 14:30) [1]

Боюсь, что никак. Если уж Stardock не смог победить "загругленности" форм (а у них опыт по этой части ой какой, они первые начали сникилизацию интерфейса).
Тень - явление системное. Тебе надо писать свой "alfa-blending", перекрывающий системный.


 
Гас   (2002-12-17 16:27) [2]

А что это за Stardock?
Думаю, у хинта должно быть свойство типа Style (StyleOld, StyleNew..) И alfablending мне не нужен..


 
Ученик   (2002-12-17 20:05) [3]

procedure TMyHintWindow.CreateParams(var Params: TCreateParams); // override;
begin
inherited CreateParams(Params);
with Params do
begin
Style := WS_POPUP or WS_DISABLED;
if CheckWin32Version(5, 1) then
WindowClass.Style := WindowClass.style and not CS_DROPSHADOW;

ExStyle := WS_EX_TOOLWINDOW;
WindowClass.hbrBackground := 0
end;


 
Гас   (2002-12-18 09:31) [4]

Спасибо, Ученик, я думал уже, что никто не знает.
Самому пришлось исходники смотреть... :))



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

Форум: "Основная";
Текущий архив: 2002.12.30;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.008 c
1-99197
Hammer1
2002-12-19 09:54
2002.12.30
Бинарный файл


4-99417
Обсолютный ноль
2002-11-06 14:48
2002.12.30
Вопросик...


1-99088
Yakudza
2002-12-19 16:03
2002.12.30
TButton


3-99006
s_o
2002-12-10 15:57
2002.12.30
работа с базами данных


14-99329
KGB
2002-12-10 11:22
2002.12.30
Набор компонентов ABC





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