tbctrls.pas

themeengine6源码

unit tbctrls;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  te_controls, ksthemeforms, ksthemeedits, ksthemespeedbuttons,
  ksthemetoolbars, ksthemeitems, ksthememenus, ksthemecontrolbars;

type
  TfrmTB = class(TForm)
    NgForm1: TTeThemeForm;
    TeThemeControlBar1: TTeThemeControlBar;
    TeThemeMenuBar1: TTeThemeMenuBar;
    File1: TTeThemeItem;
    New1: TTeThemeItem;
    Open1: TTeThemeItem;
    Save1: TTeThemeItem;
    SaveAs1: TTeThemeItem;
    N2: TTeThemeItem;
    Print1: TTeThemeItem;
    PrintSetup1: TTeThemeItem;
    N1: TTeThemeItem;
    Exit1: TTeThemeItem;
    Edit1: TTeThemeItem;
    Undo1: TTeThemeItem;
    Repeatcommand1: TTeThemeItem;
    N5: TTeThemeItem;
    Cut1: TTeThemeItem;
    Copy1: TTeThemeItem;
    Paste1: TTeThemeItem;
    PasteSpecial1: TTeThemeItem;
    N4: TTeThemeItem;
    Find1: TTeThemeItem;
    Replace1: TTeThemeItem;
    GoTo1: TTeThemeItem;
    N3: TTeThemeItem;
    Links1: TTeThemeItem;
    Object1: TTeThemeItem;
    Window1: TTeThemeItem;
    NewWindow1: TTeThemeItem;
    Tile1: TTeThemeItem;
    Cascade1: TTeThemeItem;
    ArrangeAll1: TTeThemeItem;
    N6: TTeThemeItem;
    Hide1: TTeThemeItem;
    Show1: TTeThemeItem;
    Help1: TTeThemeItem;
    Contents1: TTeThemeItem;
    Index1: TTeThemeItem;
    Commands1: TTeThemeItem;
    Procedures1: TTeThemeItem;
    Keyboard1: TTeThemeItem;
    SearchforHelpOn1: TTeThemeItem;
    Tutorial1: TTeThemeItem;
    HowtoUseHelp1: TTeThemeItem;
    About1: TTeThemeItem;
    TeThemeToolBar1: TTeThemeToolBar;
    NgSpeedButton6: TTeThemeSpeedButton;
    NgSpeedButton5: TTeThemeSpeedButton;
    NgSpeedButton4: TTeThemeSpeedButton;
    NgSpeedButton3: TTeThemeSpeedButton;
    NgSpeedButton2: TTeThemeSpeedButton;
    NgSpeedButton1: TTeThemeSpeedButton;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  frmTB: TfrmTB;

implementation

uses Main;

{$R *.DFM}

end.