请问关于效果的问题

Question

我希望得到的效果是：Form中的内容实现滚动的效果
方向是自下向上，方法是不断重复滚动
内容：一些文字和不超过三张的图片//bow~~!!

Answer 1

用Timer来移动 Label 和 Image就可以实现了。

Answer 2

DelphiX 效果一流,因为是内包的drectX.

Answer 3

用一个或者多个循环,来控制你要变化得控件得top,left,height,width

Answer 4

简单的可以用TImer来控制Timer1OnTimer(sernder:Tobject)
begin
   label1.left:=label1.left+1;
   picture.top:=picture.top+1;
end;还有就是用directX技术来做
好难的我不会
呵呵！

Answer 5

DelphiX是日本畜生写的，所以打死我也不用！我宁愿自己写

Answer 6

楼主，其实你要的要求很容易，你去看看《Delphi 5开发人员指南》一书，上面的自己编写VCL一章中就有范例，不过 只是滚动文字，看会了滚动文字，滚动图片不是也差不多知道应该如何做了吗

Answer 7

把文字和图片放在Panel上，然后复制一个，再如下写代码就可以了：procedure TForm1.FormCreate(Sender: TObject);
begin
  panel2.Top:=panel1.Top+panel1.Height;
end;procedure TForm1.Timer1Timer(Sender: TObject);
begin
  panel1.Top:=panel1.Top-2;
  panel2.Top:=panel2.Top-2;
  if (panel1.Top+panel1.Height)<0 then
    panel1.Top:=panel2.Top+panel2.Height;
  if (panel2.Top+panel2.Height)<0 then
    panel2.Top:=panel1.Top+panel1.Height;
end;