Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.12.30;
Скачать: CL | DM;

Вниз

Как убрать тень в хинтах в 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;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.015 c
1-99186
Pat
2002-12-19 00:19
2002.12.30
InstallShield Express for Delphi5


4-99399
PONTIY
2002-11-14 13:56
2002.12.30
Как отловить инициализацию пользоваталем ShutDown?


1-99105
Soul2
2002-12-18 05:30
2002.12.30
TStringList invert.


1-99153
Berg
2002-12-18 17:30
2002.12.30
Тип TStringList


1-99112
Groove
2002-12-18 08:49
2002.12.30
TStringlist.SaveToFile _ чЁкаво?