Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как убрать тень в хинтах в Delphi 7, WinXP? [D7, WinXP]


Гас ©   (2002-12-17 12:29:00) 

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


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

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


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

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-17 16:27:00) [3]

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


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

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо