Здравствуйте, Bungle, Вы писали:

B>Как заставить окна выдвигаться из-за границ экрана, а так же, как достигнуть плавности их появления

B>Реализовация задачи на API, или средствами VCL

B>Зараннее спасибо ВСЕМ!!! Помогите ЛАМЕРУ


При открытии формы (OnCreate):
TRect r1,r2;
r1 = Rect(Left+Width/2,Top+Height/2,Left+Width/2,Top+Height/2);
r2 = BoundsRect;
DrawAnimatedRects(Handle,IDANI_CAPTION,&r1,&r2);

Форма будет как будто развертываться из середины.

А чтобы она при закрытии свертывалась в свою середину, то пишем в OnClose:

TRect r1,r2;
r1 = Rect(Left+Width/2,Top+Height/2,Left+Width/2,Top+Height/2);
r2 = BoundsRect;
DrawAnimatedRects(Handle,IDANI_CAPTION,&r2,&r1);  // меняется только последовательность последних параметров