paschbf.dfm

一个图书批发商的通用软件

object frchbf: Tfrchbf
  Left = 122
  Top = 184
  Width = 544
  Height = 339
  Caption = #20914#32418#25253#24223
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 12
  object Panel1: TPanel
    Left = 0
    Top = 26
    Width = 536
    Height = 95
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 4
    object GroupBox1: TGroupBox
      Left = 0
      Top = 0
      Width = 536
      Height = 95
      Align = alClient
      Caption = #26597#35810#26465#20214
      TabOrder = 0
      object Label1: TLabel
        Left = 24
        Top = 44
        Width = 60
        Height = 12
        Caption = #36873#25321#21517#31216#65306
      end
      object cxLookupComboBox2: TcxLookupComboBox
        Left = 95
        Top = 40
        Width = 250
        Height = 20
        Properties.DropDownAutoSize = True
        Properties.DropDownListStyle = lsEditList
        Properties.KeyFieldNames = 'bookid'
        Properties.ListColumns = <
          item
            Caption = #32534#21495
            Fixed = True
            HeaderAlignment = taCenter
            Width = 100
            FieldName = 'bookid'
          end
          item
            Caption = #22270#20070#21517#31216
            Fixed = True
            HeaderAlignment = taCenter
            Width = 200
            FieldName = 'bookname'
          end>
        Properties.ListOptions.AnsiSort = True
        Properties.ListOptions.CaseInsensitive = True
        Properties.ListSource = DataSource3
        Style.BorderStyle = ebs3D
        TabOrder = 0
      end
    end
  end
  object GroupBox2: TGroupBox
    Left = 0
    Top = 121
    Width = 536
    Height = 184
    Align = alClient
    Caption = #20914#32418#25253#24223
    TabOrder = 5
    object Label2: TLabel
      Left = 37
      Top = 37
      Width = 60
      Height = 12
      Caption = #22270#20070#21517#31216#65306
    end
    object Label3: TLabel
      Left = 37
      Top = 71
      Width = 60
      Height = 12
      Caption = #24211#23384#25968#37327#65306
    end
    object Label4: TLabel
      Left = 37
      Top = 106
      Width = 60
      Height = 12
      Caption = #20914#32418#25253#24223#65306
    end
    object Edit1: TEdit
      Left = 96
      Top = 32
      Width = 300
      Height = 20
      ReadOnly = True
      TabOrder = 0
    end
    object Edit2: TEdit
      Left = 96
      Top = 68
      Width = 300
      Height = 20
      ReadOnly = True
      TabOrder = 1
      OnKeyPress = Edit2KeyPress
    end
    object Edit3: TEdit
      Left = 96
      Top = 104
      Width = 300
      Height = 20
      TabOrder = 2
      OnKeyPress = Edit2KeyPress
    end
  end
  object dxBarManager1: TdxBarManager
    Scaled = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    Bars = <
      item
        AllowClose = False
        AllowCustomizing = False
        AllowQuickCustomizing = False
        AllowReset = False
        Caption = #24037#20855#26639
        DockedDockingStyle = dsTop
        DockedLeft = 0
        DockedTop = 0
        DockingStyle = dsTop
        FloatLeft = 29
        FloatTop = 200
        FloatClientWidth = 56
        FloatClientHeight = 88
        ItemLinks = <
          item
            Item = dxBarLargeButton1
            Visible = True
          end
          item
            Item = dxBarLargeButton5
            Visible = True
          end
          item
            Item = dxBarLargeButton4
            Visible = True
          end>
        Name = #24037#20855#26639
        OneOnRow = True
        Row = 0
        UseOwnFont = False
        Visible = True
        WholeRow = False
      end>
    Categories.Strings = (
      'Default')
    Categories.ItemsVisibles = (
      2)
    Categories.Visibles = (
      True)
    Images = dmData.ImageList
    LargeImages = dmData.ImageList
    PopupMenuLinks = <>
    Style = bmsFlat
    UseSystemFont = True
    Left = 284
    Top = 65528
    DockControlHeights = (
      0
      0
      26
      0)
    object dxBarLargeButton1: TdxBarLargeButton
      Caption = #26597#35810
      Category = 0
      Hint = #26597#35810
      Visible = ivAlways
      OnClick = dxBarLargeButton1Click
      AutoGrayScale = False
      GlyphLayout = glLeft
      LargeImageIndex = 0
    end
    object dxBarLargeButton2: TdxBarLargeButton
      Caption = #20445#23384
      Category = 0
      Hint = #20445#23384
      Visible = ivAlways
      AutoGrayScale = False
      GlyphLayout = glLeft
      LargeImageIndex = 1
    end
    object dxBarLargeButton3: TdxBarLargeButton
      Caption = #21024#38500
      Category = 0
      Hint = #21024#38500
      Visible = ivAlways
      AutoGrayScale = False
      GlyphLayout = glLeft
      LargeImageIndex = 2
    end
    object dxBarLargeButton5: TdxBarLargeButton
      Caption = #30830#23450
      Category = 0
      Hint = #30830#23450
      Visible = ivAlways
      ImageIndex = 5
      OnClick = dxBarLargeButton5Click
      AutoGrayScale = False
      GlyphLayout = glLeft
      LargeImageIndex = 5
    end
    object dxBarLargeButton6: TdxBarLargeButton
      Caption = #25171#21360
      Category = 0
      Hint = #25171#21360
      Visible = ivAlways
      GlyphLayout = glLeft
      LargeImageIndex = 6
    end
    object dxBarLargeButton4: TdxBarLargeButton
      Caption = #36864#20986
      Category = 0
      Hint = #36864#20986
      Visible = ivAlways
      OnClick = dxBarLargeButton4Click
      AutoGrayScale = False
      GlyphLayout = glLeft
      LargeImageIndex = 3
    end
    object dxBarButton1: TdxBarButton
      Caption = #22686#21152
      Category = 0
      Hint = #22686#21152
      Visible = ivAlways
    end
  end
  object ADOQuery4: TADOQuery
    Connection = dmData.adcDatabase
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select bookid,bookname from tbBookClass')
    Left = 272
    Top = 16
  end
  object DataSource3: TDataSource
    DataSet = ADOQuery4
    Left = 296
    Top = 16
  end
  object ADOQuery1: TADOQuery
    Connection = dmData.adcDatabase
    Parameters = <>
    Left = 376
    Top = 24
  end
end