Каким образом мне сделать так, чтобы моё окно было с тенью и при этом при появление происходило её плавное появление, как менюшки в wiXP (& longhorn). Я делал так для появления тени:
| Код |
procedure TImHint.CreateParams(var Params: TCreateParams);
const
CS_DROPSHADOW = $00020000;
begin
inherited;
if DBKernel.readinteger('Options','PreviewSwohOptions',1)=1 then
Params.WindowClass.Style := Params.WindowClass.Style or CS_DROPSHADOW;
end;
|
И одновремено по таймеру менял layered формы, но при таком подходе появляется сразу тень, а потом плавно окошко, а при исчезновении в самую последнюю очередь исчезает тень, а хотелось бы всё это сделать одновременно... Просто layered у формы никак не действует на тень, а иначе я не знаю, как быть... Что делать? |