请问如何实现一个窗体或者面板从屏幕一侧，平滑移入，而且不闪烁

Question

设置一Timer，在OnTime事件中，移动具体的位置就可以了么！

Answer 1

在timer的ontime事件中，放置如下代码即可！
form1.Left:=800;
   for i:=800 downto 0 do
     begin
        form1.Left:=i;
     end;

Answer 2

sdqhlyf(彩波) 
在timer的ontime事件中，放置如下代码即可！
form1.Left:=800;
   for i:=800 downto 0 do
     begin
        form1.Left:=i;
     end;行不通。

Answer 3

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  if move_now=true then//用于判断是否继续往右移动的变量
    if form1.Left<330 then form1.Left:=form1.Left+20
    else
      timer1.Enabled:=false
  else
    if form1.Left<776 then form1.Left:=form1.Left+30
    else
      begin
        timer1.Enabled:=false;
        form1.Close;//关闭之前向右移走
      end;
end;

Answer 4

//动画显示窗口
         windows.AnimateWindow(mainfrm.WindowHandle,400,16);
修改后边的两个数字，就可以显示不同的效果了！

Answer 5

windows.AnimateWindow(mainfrm.WindowHandle,400,16);
这种方法我试过了，请详细解释一下。THANKS！！！