急！可不可以通過改變一個字符串變量，通過它的值控制不同的Form？

Question

急！可不可以通過改變一個字符串變量，通過它的值控制不同的Form？

Answer 1

if form1.edit1.Text='a' then
     form2.show
  else
      form3.show;

Answer 2

procedure TForm1.BitBtn1Click(Sender: TObject);
VAR
  AFORM: TFORM;
begin
   { make sure the classes are registered so that GetClass will work -- }
   { Usually, this goes in the initialization section where it is only executed once }
  RegisterClasses([TORDERFORM, TPOSTFORM]);
  AFORM := TFORM(GetClass(Edit2.Text));
  AFORM.SHOW;
 end;

Answer 3

不明白你指的是什么，不会真是单纯的 就像xiaofeng007(小丰) 说的那样？
如果不是，请举个例子先