ufpbookinfo_update.dfm

一个功能较全的图书进销存软件,功能还算完备

      end
      object dedtInP: TDBEdit
        Left = 417
        Top = 76
        Width = 101
        Height = 20
        DataField = 'IN_PRICE'
        DataSource = dsPubBook
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 24
        OnKeyDown = dcbxTypeKeyDown
      end
      object StaticText12: TStaticText
        Left = 370
        Top = 104
        Width = 40
        Height = 16
        Alignment = taRightJustify
        Caption = #39029#25968#65306
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 25
      end
      object dedtPage: TDBEdit
        Left = 417
        Top = 100
        Width = 101
        Height = 20
        DataField = 'PAGES'
        DataSource = dsPubBook
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 26
        OnKeyDown = dcbxTypeKeyDown
      end
      object StaticText13: TStaticText
        Left = 370
        Top = 129
        Width = 40
        Height = 16
        Alignment = taRightJustify
        Caption = #24065#31181#65306
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 27
      end
      object dcbxMType: TDBComboBox
        Left = 417
        Top = 124
        Width = 103
        Height = 20
        DataField = 'MONEY_TYPE'
        DataSource = dsPubBook
        Enabled = False
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ItemHeight = 12
        ParentFont = False
        TabOrder = 28
        OnExit = dcbxMTypeExit
        OnKeyDown = dcbxTypeKeyDown
      end
      object StaticText14: TStaticText
        Left = 370
        Top = 152
        Width = 40
        Height = 16
        Alignment = taRightJustify
        Caption = #36733#20307#65306
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 29
      end
      object dcbxZaiti: TDBComboBox
        Left = 417
        Top = 148
        Width = 103
        Height = 20
        DataField = 'ZAITI'
        DataSource = dsPubBook
        Enabled = False
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ItemHeight = 12
        ParentFont = False
        TabOrder = 30
        OnExit = dcbxZaitiExit
        OnKeyDown = dcbxTypeKeyDown
      end
      object p_ID: TStaticText
        Left = 334
        Top = 175
        Width = 76
        Height = 16
        Alignment = taRightJustify
        Caption = #20379#24212#21830#32534#21495#65306
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 31
      end
      object cbxPro_name: TComboBox
        Left = 417
        Top = 172
        Width = 103
        Height = 20
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ItemHeight = 12
        ParentFont = False
        TabOrder = 32
        Text = 'cbxPro_name'
        OnChange = cbxPro_nameChange
        OnExit = cbxPro_nameExit
        OnKeyDown = dcbxTypeKeyDown
      end
      object StaticText21: TStaticText
        Left = 346
        Top = 218
        Width = 64
        Height = 16
        Alignment = taRightJustify
        Caption = #25805#20316#26102#38388#65306
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 33
      end
      object StaticText1: TStaticText
        Left = 46
        Top = 225
        Width = 64
        Height = 16
        Alignment = taRightJustify
        Caption = #39302#34255#20449#24687#65306
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 34
      end
      object dedtInfo: TDBEdit
        Left = 121
        Top = 221
        Width = 101
        Height = 20
        DataField = 'STORE_INFO'
        DataSource = dsPubBook
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 16
        OnKeyDown = dcbxTypeKeyDown
      end
      object StaticText2: TStaticText
        Left = 322
        Top = 33
        Width = 88
        Height = 16
        Alignment = taRightJustify
        Caption = #25968#25454#25991#20214#24207#21495#65306
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 35
      end
      object dedtDID: TDBEdit
        Left = 417
        Top = 28
        Width = 101
        Height = 20
        DataField = 'DATAFILE_ID'
        DataSource = dsPubBook
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 20
        OnKeyDown = dcbxTypeKeyDown
      end
      object StaticText20: TStaticText
        Left = 346
        Top = 240
        Width = 64
        Height = 16
        Caption = #26377#25928#29366#24577#65306
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 36
        Visible = False
      end
      object dchkbxStatus1: TDBCheckBox
        Left = 418
        Top = 240
        Width = 100
        Height = 15
        Caption = #26377#25928
        DataField = 'STATUS'
        DataSource = dsPubBook
        Enabled = False
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 37
        ValueChecked = 'True'
        ValueUnchecked = 'False'
        Visible = False
        OnKeyDown = dchkbxStatus1KeyDown
      end
      object dcbxPro_ID: TDBComboBox
        Left = 417
        Top = 172
        Width = 103
        Height = 20
        DataField = 'SUPPLIER_ID'
        DataSource = dsPubBook
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ItemHeight = 12
        ParentFont = False
        TabOrder = 38
      end
    end
    object Panel2: TPanel
      Left = 655
      Top = 0
      Width = 130
      Height = 281
      Align = alClient
      BevelOuter = bvNone
      TabOrder = 1
      object Splitter2: TSplitter
        Left = 0
        Top = 0
        Height = 281
        Color = clMaroon
        ParentColor = False
      end
      object UpdateBtn: TBitBtn
        Left = 18
        Top = 31
        Width = 100
        Height = 25
        Caption = #20462#25913'[&M]'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        OnClick = UpdateBtnClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
          000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
          00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
          F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
          0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
          FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
          FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
          0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
          00333377737FFFFF773333303300000003333337337777777333}
        NumGlyphs = 2
      end
      object ApplyBtn: TBitBtn
        Left = 18
        Top = 72
        Width = 100
        Height = 25
        Caption = #20445#23384'[&S]'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        OnClick = ApplyBtnClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          333333FFFFFFFFFFFFF33000077777770033377777777777773F000007888888
          00037F3337F3FF37F37F00000780088800037F3337F77F37F37F000007800888
          00037F3337F77FF7F37F00000788888800037F3337777777337F000000000000
          00037F3FFFFFFFFFFF7F00000000000000037F77777777777F7F000FFFFFFFFF
          00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
          00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
          00037F7F333333337F7F000FFFFFFFFF07037F7F33333333777F000FFFFFFFFF
          0003737FFFFFFFFF7F7330099999999900333777777777777733}
        NumGlyphs = 2
      end
      object CancelBtn: TBitBtn
        Left = 18
        Top = 112
        Width = 100
        Height = 25
        Caption = #21462#28040'[&C]'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        OnClick = CancelBtnClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
          3333333777333777FF3333993333339993333377FF3333377FF3399993333339
          993337777FF3333377F3393999333333993337F777FF333337FF993399933333
          399377F3777FF333377F993339993333399377F33777FF33377F993333999333
          399377F333777FF3377F993333399933399377F3333777FF377F993333339993
          399377FF3333777FF7733993333339993933373FF3333777F7F3399933333399
          99333773FF3333777733339993333339933333773FFFFFF77333333999999999
          3333333777333777333333333999993333333333377777333333}
        NumGlyphs = 2
      end
      object ExitBtn: TBitBtn
        Left = 18
        Top = 160
        Width = 100
        Height = 25
        Caption = #36864#20986'[&X]'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 3
        OnClick = ExitBtnClick
        Glyph.Data = {
          DE010000424DDE01000000000000760000002800000024000000120000000100
          0400000000006801000000000000000000001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388888888877
          F7F787F8888888888333333F00004444400888FFF444448888888888F333FF8F
          000033334D5007FFF4333388888888883338888F0000333345D50FFFF4333333
          338F888F3338F33F000033334D5D0FFFF43333333388788F3338F33F00003333
          45D50FEFE4333333338F878F3338F33F000033334D5D0FFFF43333333388788F
          3338F33F0000333345D50FEFE4333333338F878F3338F33F000033334D5D0FFF
          F43333333388788F3338F33F0000333345D50FEFE4333333338F878F3338F33F
          000033334D5D0EFEF43333333388788F3338F33F0000333345D50FEFE4333333
          338F878F3338F33F000033334D5D0EFEF43333333388788F3338F33F00003333
          4444444444333333338F8F8FFFF8F33F00003333333333333333333333888888
          8888333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
          333333333333888888F3333F00003333330000003333333333338FFFF8F3333F
          0000}
        NumGlyphs = 2
      end
    end
  end
  object plbottom: TPanel
    Left = 0
    Top = 284
    Width = 785
    Height = 289
    Align = alClient
    BevelOuter = bvNone
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    object DBGrid1: TDBGrid
      Left = 0
      Top = 0
      Width = 785
      Height = 289
      Align = alClient
      DataSource = dsPubBook
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
    end
  end
  object dsPubBook: TDataSource
    AutoEdit = False
    DataSet = dmpublish.adsPubBook
    Left = 608
    Top = 32
  end
end