print_temp.dfm

商场管理系统源码 一套值得初学者学习的源码包含全部源码,控件

object Frm_Print_temp: TFrm_Print_temp
  Left = 263
  Top = 148
  Width = 697
  Height = 480
  BorderIcons = [biSystemMenu, biMaximize]
  Caption = 'ThinkNET'#19987#29992#25253#34920#25171#21360#31383#21475
  Color = clBtnFace
  Constraints.MinHeight = 400
  Constraints.MinWidth = 600
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  FormStyle = fsStayOnTop
  OldCreateOrder = False
  WindowState = wsMaximized
  OnClose = FormClose
  OnDeactivate = FormDeactivate
  OnResize = FormResize
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object ControlBar1: TControlBar
    Left = 0
    Top = 0
    Width = 689
    Height = 44
    Align = alTop
    BevelEdges = []
    TabOrder = 0
    object ToolBar_print: TToolBar
      Left = 11
      Top = 2
      Width = 664
      Height = 35
      AutoSize = True
      ButtonHeight = 35
      ButtonWidth = 55
      Caption = 'ToolBar_print'
      EdgeBorders = []
      Flat = True
      Images = ImageList_print
      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_OPEN: TToolButton
        Left = 460
        Top = 0
        AutoSize = True
        Caption = #25171#24320
        Enabled = False
        ImageIndex = 9
        OnClick = TB_OPENClick
      end
      object TB_SAVE: TToolButton
        Left = 495
        Top = 0
        AutoSize = True
        Caption = #20445#23384
        ImageIndex = 10
        OnClick = TB_SAVEClick
      end
      object ToolButton15: TToolButton
        Left = 530
        Top = 0
        Width = 8
        Caption = 'ToolButton15'
        ImageIndex = 11
        Style = tbsSeparator
      end
      object TB_about: TToolButton
        Left = 538
        Top = 0
        AutoSize = True
        Caption = #20851#20110
        ImageIndex = 12
        OnClick = TB_aboutClick
      end
      object TB_EXIT: TToolButton
        Left = 573
        Top = 0
        AutoSize = True
        Caption = #36864#20986
        ImageIndex = 11
        OnClick = TB_EXITClick
      end
    end
  end
  object StBar_print: TStatusBar
    Left = 0
    Top = 431
    Width = 689
    Height = 22
    Panels = <
      item
        Alignment = taCenter
        Text = #27491#22312#39044#35272'...'
        Width = 80
      end
      item
        Alignment = taRightJustify
        Text = #29256#26435#25152#26377#65306#27721#29579#24120#24030#20998#20844#21496
        Width = 150
      end
      item
        Text = #25253#34920#19987#29992#25171#21360#39044#35272#31243#24207#20013#25991#22686#24378#29256#65288#29256#26412#65306'1.03'#65289#65307#20316#32773#65306#26472#25928#22269' [e-mail]'
        Width = 50
      end>
    SimplePanel = False
  end
  object QRP_print: TQRPreview
    Left = 0
    Top = 44
    Width = 689
    Height = 387
    Cursor = crHandPoint
    HorzScrollBar.Tracking = True
    VertScrollBar.Tracking = True
    Align = alClient
    TabOrder = 2
    OnDblClick = QRP_printDblClick
    OnMouseDown = QRP_printMouseDown
    OnMouseMove = QRP_printMouseMove
    OnMouseUp = QRP_printMouseUp
    OnPageAvailable = QRP_printPageAvailable
    PageNumber = 1
    Zoom = 100
  end
  object ImageList_print: TImageList
    Left = 37
    Top = 74
    Bitmap = {
      494C01010D000E00040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
      0000000000003600000028000000400000004000000001001800000000000030
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000