hwpreview.pas.svn-base

来自「一个用Delphi开发的ERP软件」· SVN-BASE 代码 · 共 61 行

unit HwPreview;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Menus, StdCtrls, FR_Dock, FR_Ctrls, ExtCtrls, FR_View;

type
  THwPreviewForm = class(TForm)
    TPanel: TPanel;
    Panel1: TPanel;
    ZoomBtn: TfrTBButton;
    frTBSeparator1: TfrTBSeparator;
    LoadBtn: TfrTBButton;
    SaveBtn: TfrTBButton;
    PrintBtn: TfrTBButton;
    frTBSeparator2: TfrTBSeparator;
    FindBtn: TfrTBButton;
    HelpBtn: TfrTBButton;
    frTBSeparator3: TfrTBSeparator;
    ExitBtn: TfrTBButton;
    PageSetupBtn: TfrTBButton;
    PreviewPanel: TPanel;
    ScrollBox1: TScrollBox;
    BPanel: TPanel;
    Bevel1: TBevel;
    Label1: TLabel;
    ProcMenu: TPopupMenu;
    N2001: TMenuItem;
    N1501: TMenuItem;
    N1001: TMenuItem;
    N751: TMenuItem;
    N501: TMenuItem;
    N251: TMenuItem;
    N101: TMenuItem;
    N1: TMenuItem;
    N2: TMenuItem;
    N3: TMenuItem;
    N4: TMenuItem;
    N5: TMenuItem;
    N6: TMenuItem;
    N7: TMenuItem;
    OpenDialog: TOpenDialog;
    SaveDialog: TSaveDialog;
    frPreview1: TfrPreview;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  HwPreviewForm: THwPreviewForm;

implementation

{$R *.dfm}

end.