Frame2u.pas
上传用户:fh681027
上传日期:2022-07-23
资源大小:1959k
文件大小:1k
源码类别:

Delphi控件源码

开发平台:

Delphi

  1. unit Frame2u;
  2. interface
  3. uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  4.   StdCtrls;
  5. type
  6.   TFrame2 = class(TFrame)
  7.     CheckBox1: TCheckBox;
  8.     CheckBox2: TCheckBox;
  9.     CheckBox3: TCheckBox;
  10.     CheckBox4: TCheckBox;
  11.     CheckBox5: TCheckBox;
  12.     Button1: TButton;
  13.     Button2: TButton;
  14.   private
  15.     { Private declarations }
  16.   public
  17.     { Public declarations }
  18.   end;
  19. implementation
  20. {$R *.DFM}
  21. initialization
  22.   RegisterClass (TFrame2);
  23. end.