【求助】请教两个问题

Question

1.如何在程序启动时同时弹出两个Form出来。
2.如何实现使Form1.caption的内容不停地从右到左滚动。
label是这样的。
procedure TForm1.Timer1Timer(Sender: TObject);
begin
if Label2.Left+Label2.Width>0 Then Label2.Left:=Label2.Left-10
else Label2.Left:=GroupBox1.Width;
end;
惭愧啊，不懂的如何举一反三。

Answer 1

Form的Caption“滚动”可以用加入不同数量的空格来表示啊！

Answer 2

1，主要是你在APPLICATION里的窗体创建顺序，如果都创建了，你就直接show出来就可以了啊2，Form的Caption“滚动”可以用加入不同数量的空格来表示啊！
=========================================================
Cool!!!隐式地改变Caption的长度
达到位置变换的目的

Answer 3

to kshape
   都创建了，但是一次只能show一个form。在form1里oncreate事件中form2.show会出错。
   我的本意是这样的程序运行首先出来主窗体，但里面的功能都被禁止。在出来一个登录窗体login。输入用户名与密码，正确则关掉login窗体，这是主窗体里的功能则有条件开启。

Answer 4

to kshape
   都创建了，但是一次只能show一个form。在form1里oncreate事件中form2.show会出错。
   我的本意是这样的程序运行首先出来主窗体，但里面的功能都被禁止。在出来一个登录窗体login。输入用户名与密码，正确则关掉login窗体，这是主窗体里的功能则有条件开启。
------------------>
我目前做的一個程序就是你說的這個樣子。
不要在oncreate裡，而是在onactive 裡show，可以設一個boolean變量，用來控制要不要show出這個login form,你應該明白的說