【delphi开源代码栏目提醒】：本文主要为网学会员提供frameTest.pas，希望对需要frameTest.pas网友有所帮助，学习一下!

    unit frameTest;
    
    interface
    
    uses
      Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, 
      Dialogs;
    
    type
      TFrame1 = class(TFrame)
      private
        { Private declarations }
      public
        { Public declarations }
      end;
    
    implementation
    
    {$R *.dfm}
    
    end.