u_toolbarframe.pas

来自「超信人力资源管理系统,一个用Delphi编写的人事管理系统」· PAS 代码 · 共 30 行

unit U_ToolbarFrame;

interface

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

type
  TF_Toolbarframe = class(TFrame)
    Panel1: TPanel;
    Btn_new: TSpeedButton;
    Btn_Edit: TSpeedButton;
    Btn_Save: TSpeedButton;
    Btn_Cancel: TSpeedButton;
    Btn_Delete: TSpeedButton;
    Btn_Find: TSpeedButton;
    Btn_Print: TSpeedButton;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

implementation

{$R *.dfm}

end.