printbassunit.dfm

一个用delphi 开发的商场销售系统 涵盖很多功能

object PrintBassForm: TPrintBassForm
  Left = 224
  Top = 141
  Width = 690
  Height = 431
  Caption = #36890#29992#25253#34920#39044#35272#31383#21475
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  OldCreateOrder = False
  WindowState = wsMaximized
  OnClose = FormClose
  OnDeactivate = FormDeactivate
  OnResize = FormResize
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object ControlBar1: TControlBar
    Left = 0
    Top = 0
    Width = 682
    Height = 25
    Align = alTop
    BevelEdges = []
    TabOrder = 0
    object ToolBar_print: TToolBar
      Left = 11
      Top = 2
      Width = 669
      Height = 21
      AutoSize = True
      ButtonHeight = 21
      ButtonWidth = 55
      Caption = 'ToolBar_print'
      EdgeBorders = []
      Flat = True
      ShowCaptions = True
      TabOrder = 0
      object TB_allscr: TToolButton
        Left = 0
        Top = 0
        AutoSize = True
        Caption = #25972#39029
        ImageIndex = 0
        OnClick = TB_allscrClick
      end
      object TB_auto: TToolButton
        Left = 35
        Top = 0
        AutoSize = True
        Caption = #39029#23485
        ImageIndex = 2
        OnClick = TB_autoClick
      end
      object TB_100: TToolButton
        Left = 70
        Top = 0
        AllowAllUp = True
        AutoSize = True
        Caption = #33258#21160
        ImageIndex = 1
        MenuItem = showscal
        Style = tbsDropDown
        OnClick = TB_100Click
      end
      object ToolButton5: TToolButton
        Left = 118
        Top = 0
        Width = 8
        Caption = 'ToolButton5'
        ImageIndex = 4
        Style = tbsSeparator
      end
      object TB_first: TToolButton
        Left = 126
        Top = 0
        AutoSize = True
        Caption = #31532#19968#39029
        ImageIndex = 3
        OnClick = TB_firstClick
      end
      object TB_PRI: TToolButton
        Left = 173
        Top = 0
        AutoSize = True
        Caption = #19978#19968#39029
        ImageIndex = 4
        OnClick = TB_PRIClick
      end
      object TB_NEXT: TToolButton
        Left = 220
        Top = 0
        AutoSize = True
        Caption = #19979#19968#39029
        ImageIndex = 5
        OnClick = TB_NEXTClick
      end
      object TB_LAST: TToolButton
        Left = 267
        Top = 0
        AutoSize = True
        Caption = #26368#21518#19968#39029
        ImageIndex = 6
        OnClick = TB_LASTClick
      end
      object ToolButton9: TToolButton
        Left = 326
        Top = 0
        Width = 8
        Caption = 'ToolButton9'
        ImageIndex = 7
        Style = tbsSeparator
      end
      object TB_PRINTSETUP: TToolButton
        Left = 334
        Top = 0
        AutoSize = True
        Caption = #25171#21360#35774#32622
        ImageIndex = 7
        OnClick = TB_PRINTSETUPClick
      end
      object TB_PRINT: TToolButton
        Left = 393
        Top = 0
        AutoSize = True
        Caption = #24320#22987#25171#21360
        ImageIndex = 8
        OnClick = TB_PRINTClick
      end
      object ToolButton12: TToolButton
        Left = 452
        Top = 0
        Width = 8
        Caption = 'ToolButton12'
        ImageIndex = 9
        Style = tbsSeparator
      end
      object TB_EXIT: TToolButton
        Left = 460
        Top = 0
        AutoSize = True
        Caption = #36864#20986
        ImageIndex = 11
        OnClick = TB_EXITClick
      end
    end
  end
  object QRP_print: TQRPreview
    Left = 0
    Top = 25
    Width = 682
    Height = 357
    Cursor = crHandPoint
    HorzScrollBar.Tracking = True
    VertScrollBar.Tracking = True
    Align = alClient
    TabOrder = 1
    OnDblClick = QRP_printDblClick
    OnMouseDown = QRP_printMouseDown
    OnMouseMove = QRP_printMouseMove
    OnMouseUp = QRP_printMouseUp
    OnPageAvailable = QRP_printPageAvailable
    PageNumber = 1
    Zoom = 100
  end
  object StBar_print: TStatusBar
    Left = 0
    Top = 382
    Width = 682
    Height = 22
    Panels = <
      item
        Alignment = taCenter
        Text = #25253#34920#25171#21360#36755#20986
        Width = 150
      end
      item
        Width = 50
      end>
  end
  object MM_show: TMainMenu
    Left = 29
    Top = 79
    object showscal: TMenuItem
      Caption = #33258#21160
      GroupIndex = 1
      ImageIndex = 1
      RadioItem = True
      object show_10: TMenuItem
        Caption = '10%'
        GroupIndex = 1
        RadioItem = True
        OnClick = show_10Click
      end
      object show_20: TMenuItem
        Caption = '20%'
        GroupIndex = 1
        RadioItem = True
        OnClick = show_10Click
      end
      object show_50: TMenuItem
        Caption = '50%'
        GroupIndex = 1
        RadioItem = True
        OnClick = show_10Click
      end
      object show_75: TMenuItem
        Caption = '75%'
        GroupIndex = 1
        RadioItem = True
        OnClick = show_10Click
      end
      object show_100: TMenuItem
        Caption = '100%'
        Checked = True
        GroupIndex = 1
        RadioItem = True
        OnClick = show_10Click
      end
      object show_150: TMenuItem
        Caption = '150%'
        GroupIndex = 1
        RadioItem = True
        OnClick = show_10Click
      end
      object show_200: TMenuItem
        Caption = '200%'
        GroupIndex = 1
        RadioItem = True
        OnClick = show_10Click
      end
      object show_400: TMenuItem
        Caption = '400%'
        GroupIndex = 1
        RadioItem = True
        OnClick = show_10Click
      end
    end
  end
end