aboutboxform.pas

来自「Delphi树和酒店式的框架」· PAS 代码 · 共 34 行

unit AboutBoxForm;

interface

uses Windows, SysUtils, Classes, Graphics, Forms, Controls, StdCtrls,
  Buttons, ExtCtrls;

type
  TFrmAboutBox = class(TForm)
    Panel1: TPanel;
    IcoProgram: TImage;
    LblProductName: TLabel;
    LblCompany: TLabel;
    LblCopyright: TLabel;
    OKButton: TButton;
    LblNameHighlight: TLabel;
    LblNameShadow: TLabel;
    LblVersion: TLabel;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  FrmAboutBox: TFrmAboutBox;

implementation

{$R *.DFM}

end.