ufpbookinfo_update.dfm

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

object fPBookInfo_update: TfPBookInfo_update
  Left = 212
  Top = 94
  Width = 793
  Height = 600
  Caption = #21457#34892#31449#31649#29702#65293#24211#23384#32500#25252
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poScreenCenter
  Visible = True
  WindowState = wsMaximized
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Splitter1: TSplitter
    Left = 0
    Top = 281
    Width = 785
    Height = 3
    Cursor = crVSplit
    Align = alTop
    Color = clMaroon
    ParentColor = False
  end
  object pltop: TPanel
    Left = 0
    Top = 0
    Width = 785
    Height = 281
    Align = alTop
    BevelOuter = bvNone
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object GroupBox1: TGroupBox
      Left = 0
      Top = 0
      Width = 655
      Height = 281
      Align = alLeft
      Caption = #24211#23384#20449#24687
      Ctl3D = True
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 0
      object dtxtOpe: TDBText
        Left = 418
        Top = 199
        Width = 104
        Height = 17
        Color = clBtnFace
        DataField = 'OPERATOR'
        DataSource = dsPubBook
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object dtxtDate: TDBText
        Left = 419
        Top = 219
        Width = 136
        Height = 17
        Color = clBtnFace
        DataField = 'OPERATE_DATE'
        DataSource = dsPubBook
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object P_name: TStaticText
        Left = 334
        Top = 176
        Width = 76
        Height = 16
        Alignment = taRightJustify
        Caption = #20379#24212#21830#21517#31216#65306
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 39
      end
      object dedtBarcode: TDBEdit
        Left = 121
        Top = 29
        Width = 101
        Height = 20
        DataField = 'BOOK_BARCODE'
        DataSource = dsPubBook
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 0
      end
      object StaticText3: TStaticText
        Left = 58
        Top = 32
        Width = 52
        Height = 16
        Alignment = taRightJustify
        Caption = #26465#24418#30721#65306
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 1
      end
      object StaticText4: TStaticText
        Left = 70
        Top = 55
        Width = 40
        Height = 16
        Alignment = taRightJustify
        Caption = #20070#21517#65306
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 2
      end
      object dedtCnName: TDBEdit
        Left = 121
        Top = 53
        Width = 101
        Height = 20
        DataField = 'CN_NAME'
        DataSource = dsPubBook
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 3
      end
      object StaticText5: TStaticText
        Left = 70
        Top = 80
        Width = 40
        Height = 16
        Alignment = taRightJustify
        Caption = #26631#20215#65306
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 4
      end
      object dedtPrice: TDBEdit
        Left = 121
        Top = 77
        Width = 101
        Height = 20
        DataField = 'SHOW_PRICE'
        DataSource = dsPubBook
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 5
      end
      object StaticText6: TStaticText
        Left = 46
        Top = 104
        Width = 64
        Height = 16
        Alignment = taRightJustify
        Caption = #25991#29486#31867#22411#65306
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 6
      end
      object dcbxType: TDBComboBox
        Left = 121
        Top = 100
        Width = 102
        Height = 20
        DataField = 'BOOK_TYPE'
        DataSource = dsPubBook
        Enabled = False
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ItemHeight = 12
        Items.Strings = (
          #26631#20934
          #26631#20934#27719#32534
          #27861#35268
          #26222#36890#20070#31821)
        ParentFont = False
        TabOrder = 7
        OnExit = dcbxTypeExit
        OnKeyDown = dcbxTypeKeyDown
      end
      object StaticText7: TStaticText
        Left = 58
        Top = 128
        Width = 52
        Height = 16
        Alignment = taRightJustify
        Caption = #26631#20934#21495#65306
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 8
      end
      object dedtCode: TDBEdit
        Left = 121
        Top = 125
        Width = 101
        Height = 20
        DataField = 'BOOK_CODE'
        DataSource = dsPubBook
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 9
        OnExit = dedtCodeExit
        OnKeyDown = dcbxTypeKeyDown
      end
      object StaticText8: TStaticText
        Left = 70
        Top = 151
        Width = 40
        Height = 16
        Alignment = taRightJustify
        Caption = 'ISBN'#65306
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 10
      end
      object dedtISBN: TDBEdit
        Left = 121
        Top = 149
        Width = 101
        Height = 20
        DataField = 'ISBN_CODE'
        DataSource = dsPubBook
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 11
        OnKeyDown = dcbxTypeKeyDown
      end
      object StaticText17: TStaticText
        Left = 46
        Top = 201
        Width = 64
        Height = 16
        Alignment = taRightJustify
        Caption = #39302#34255#25968#37327#65306
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 13
      end
      object dedtQty: TDBEdit
        Left = 121
        Top = 197
        Width = 101
        Height = 20
        DataField = 'STORE_QUANTITY'
        DataSource = dsPubBook
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 14
        OnKeyDown = dcbxTypeKeyDown
      end
      object StaticText18: TStaticText
        Left = 46
        Top = 249
        Width = 64
        Height = 16
        Alignment = taRightJustify
        Caption = #39044#35686#25968#37327#65306
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 15
      end
      object dedtAQty: TDBEdit
        Left = 121
        Top = 245
        Width = 101
        Height = 20
        DataField = 'ALERT_QUANTITY'
        DataSource = dsPubBook
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 17
        OnKeyDown = dcbxTypeKeyDown
      end
      object StaticText9: TStaticText
        Left = 46
        Top = 175
        Width = 64
        Height = 16
        Alignment = taRightJustify
        Caption = #33521#25991#21517#31216#65306
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 18
      end
      object dedtEnName: TDBEdit
        Left = 121
        Top = 173
        Width = 101
        Height = 20
        DataField = 'EN_NAME'
        DataSource = dsPubBook
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 12
        OnKeyDown = dcbxTypeKeyDown
      end
      object StaticText22: TStaticText
        Left = 346
        Top = 199
        Width = 64
        Height = 16
        Alignment = taRightJustify
        Caption = #25805#20316#20154#21592#65306
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 19
      end
      object StaticText10: TStaticText
        Left = 358
        Top = 56
        Width = 52
        Height = 16
        Alignment = taRightJustify
        Caption = #32034#21462#21495#65306
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 21
      end
      object dedtGetID: TDBEdit
        Left = 417
        Top = 52
        Width = 101
        Height = 20
        DataField = 'GET_ID'
        DataSource = dsPubBook
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 22
        OnKeyDown = dcbxTypeKeyDown
      end
      object StaticText11: TStaticText
        Left = 370
        Top = 80
        Width = 40
        Height = 16
        Alignment = taRightJustify
        Caption = #36827#20215#65306
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 23