Добрый вечер!!! Я создаю форму, меняя стиль на :
Код:
1 2 3 4 5 6 7 8 | procedure TForm2 . CreateParams( var Params: TCreateParams);
begin
inherited CreateParams(Params);
Params . WindowClass . Style := Params . WindowClass . style or $20000 or CS_SAVEBITS;
Params . Style:= Params . Style or WS_POPUP;
Params . ExStyle:= Params . ExStyle or WS_EX_TOOLWINDOW or
WS_EX_TOPMOST ;
end ;
|
Вопрос такой. Эта форма появляется и исчезает плавно (использую таймер), так вот при исчезании формы фон за формой иногда не восстанавливается, т.е. при появлении был один фон потом пока форма была видна фон изменился, а по формой он не меняется. Как мне его восстановить его принудительно. Извиняюсь конечно если коряво объяснил.