D2007 通過字串建立窗體類物件
1、需要在程式初始化的時候將類註冊，註冊到物件 RegGroups:（TRegGroups）中，以便查詢。
註冊類使用的函式:RegisterClass ，窗體初始化操作放在initialization 中。

unit Unit2;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;

type
  TfrmReg = class(TForm)
  private
    { Private declarations }
 

  public
    { Public declarations }
  end;

var
  frmReg: TfrmReg;

implementation

{$R *.dfm}

initialization //初始化開始
  RegisterClass(TfrmReg) ; //註冊類物件

end.

2、利用FindClass根據類名來查詢類物件。

//根據類名建立物件
procedure TForm1.Button1Click(Sender: TObject);
var
  FormClass : Tformclass ;
  Form : TForm ;
begin
   FormClass := Tformclass(findclass('TfrmReg'
 
)) ;
   Application.Createform(FormClass,Form) ;
   Form.Show ;
end;

initialization —— 在單元中放在檔案結尾前，包含用來初始化單元的程式碼，它在主程式執行前執行並且只執行一次。

finalization —— 在單元中放在 initialization 和 end. 之間，包含了單元退出時的程式碼。在程式退出時執行並且只執行一次。