pricemove.dfm

企业商品管理系统

object Frm_PriceMove: TFrm_PriceMove
  Left = 198
  Top = 140
  Width = 703
  Height = 515
  Caption = #21830#21697#35843#20215
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object CoolBar1: TCoolBar
    Left = 0
    Top = 0
    Width = 695
    Height = 42
    AutoSize = True
    Bands = <
      item
        Control = ToolBar1
        ImageIndex = -1
        MinHeight = 38
        Width = 691
      end>
    object ToolBar1: TToolBar
      Left = 9
      Top = 0
      Width = 678
      Height = 38
      AutoSize = True
      ButtonHeight = 36
      ButtonWidth = 59
      Caption = 'ToolBar1'
      Flat = True
      Images = ImageList1
      ShowCaptions = True
      TabOrder = 0
      object ToolButton1: TToolButton
        Left = 0
        Top = 0
        Caption = '    '#28155#21152'    '
        ImageIndex = 0
        OnClick = ToolButton1Click
      end
      object ToolButton2: TToolButton
        Left = 59
        Top = 0
        Caption = #21024#38500
        ImageIndex = 1
        OnClick = ToolButton2Click
      end
      object ToolButton6: TToolButton
        Left = 118
        Top = 0
        Width = 8
        Caption = 'ToolButton6'
        ImageIndex = 5
        Style = tbsSeparator
      end
      object ToolButton3: TToolButton
        Left = 126
        Top = 0
        Caption = #20445#23384
        ImageIndex = 2
        OnClick = ToolButton3Click
      end
      object ToolButton4: TToolButton
        Left = 185
        Top = 0
        Caption = #21462#28040
        ImageIndex = 3
        OnClick = ToolButton4Click
      end
      object ToolButton9: TToolButton
        Left = 244
        Top = 0
        Width = 8
        Caption = 'ToolButton9'
        ImageIndex = 5
        Style = tbsSeparator
      end
      object ToolButton5: TToolButton
        Left = 252
        Top = 0
        Caption = #36864#20986
        ImageIndex = 4
        OnClick = ToolButton5Click
      end
    end
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 469
    Width = 695
    Height = 19
    Panels = <>
  end
  object Panel1: TPanel
    Left = 0
    Top = 97
    Width = 573
    Height = 372
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 2
    object DBGrid1: TDBGrid
      Left = 0
      Top = 0
      Width = 573
      Height = 372
      Align = alClient
      DataSource = DSDetail
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'MR_Code'
          Title.Caption = #20135#21697#32534#21495
          Width = 56
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'MR_Name'
          Title.Caption = #20135#21697#21517#31216
          Width = 82
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'MR_Spce'
          Title.Caption = #35268#26684
          Width = 78
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'MR_Unit'
          Title.Caption = #35745#37327#21333#20301
          Width = 70
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'MR_Cards'
          Title.Caption = #20135#22320#21697#29260
          Width = 88
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'MR_OutPrice'
          Title.Caption = #38144#21806#20215
          Width = 86
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'MR_NewPrice'
          Title.Caption = #26032#38144#21806#20215
          Width = 80
          Visible = True
        end>
    end
  end
  object GroupBox1: TGroupBox
    Left = 0
    Top = 42
    Width = 695
    Height = 55
    Align = alTop
    TabOrder = 3
    object Label1: TLabel
      Left = 24
      Top = 24
      Width = 139
      Height = 13
      Caption = #21830#21697#35843#20215#21333#32534#21495#65306'         '
    end
    object Label2: TLabel
      Left = 304
      Top = 24
      Width = 80
      Height = 13
      Caption = #25805#20316#21592#65306'        '
    end
    object DBEdit1: TDBEdit
      Left = 128
      Top = 20
      Width = 121
      Height = 21
      DataField = 'MR_PriceMoveID'
      DataSource = DSMaster
      TabOrder = 0
    end
    object DBEdit2: TDBEdit
      Left = 360
      Top = 20
      Width = 121
      Height = 21
      DataField = 'Operator'
      DataSource = DSMaster
      TabOrder = 1
    end
  end
  object Panel3: TPanel
    Left = 573
    Top = 97
    Width = 122
    Height = 372
    Align = alRight
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 4
    object SpeedButton2: TSpeedButton
      Left = 25
      Top = 27
      Width = 72
      Height = 26
      Caption = #28155#21152
      OnClick = SpeedButton2Click
    end
    object SpeedButton3: TSpeedButton
      Left = 25