Quote (opius)
AnimateWindow(Application.MainForm.Handle, 2000, AW_BLEND or AW_SLIDE);
попробую
Quote (Jaw)
1)Сохранить твою анивацию в гиф и сделать заставкой на раб. стол.
мне надо так чтобы поверх остальных окон рисовало я пытался сделать форме белый цвет и выставить TransparentColor:=clwhite;
но оно почемуто страшно лагало