frmbook.dfm

这也是一个图书管理系统,不过比上一个更加具有价值,是难得的尤物

inherited BookFrm: TBookFrm
  Left = 184
  Top = 104
  Width = 800
  Height = 535
  Caption = 'BookFrm'
  OldCreateOrder = True
  Position = poScreenCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 15
  inherited PageControl1: TPageControl
    Width = 792
    Height = 508
    ActivePage = tsEnter
    TabIndex = 0
    inherited tsEnter: TTabSheet
      inline fmMyBook1: TfmMyBook
        Left = 0
        Top = 0
        Width = 784
        Height = 480
        Align = alClient
        Color = clMoneyGreen
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -14
        Font.Name = #23435#20307
        Font.Style = []
        ParentColor = False
        ParentFont = False
        TabOrder = 0
        inherited DBNavigator1: TDBNavigator
          Left = 32
          Hints.Strings = ()
        end
        inherited DBMemo1: TDBMemo
          DataField = #22791#27880
          DataSource = fmMyBook1.DataSource1
        end
      end
    end
    inherited tsBrowse: TTabSheet
      inherited Splitter1: TSplitter
        Height = 480
      end
      inherited Tree: TTreeView
        Height = 480
        OnClick = TreeClick
      end
      inherited DBGrid2: TDBGrid
        Width = 639
        Height = 480
        DataSource = fmMyBook1.DataSource1
        Columns = <
          item
            Expanded = False
            FieldName = #22270#20070#21517#31216
            Width = 246
            Visible = True
          end
          item
            Expanded = False
            FieldName = #35793#33879#32773
            Width = 84
            Visible = True
          end
          item
            Expanded = False
            FieldName = #31867#21035
            Width = 36
            Visible = True
          end
          item
            Expanded = False
            FieldName = #20986#29256#31038
            Visible = True
          end
          item
            Expanded = False
            FieldName = #20986#29256#26102#38388
            Visible = True
          end
          item
            Expanded = False
            FieldName = #21360#27425
            Width = 36
            Visible = True
          end
          item
            Expanded = False
            FieldName = #21360#25968
            Visible = True
          end
          item
            Expanded = False
            FieldName = #31295#37228
            Visible = True
          end
          item
            Expanded = False
            FieldName = #25910#30410
            Visible = True
          end
          item
            Expanded = False
            FieldName = #29366#24577
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ISBN'
            Visible = True
          end>
      end
    end
    inherited tsQuery: TTabSheet
      object Label1: TLabel
        Left = 80
        Top = 64
        Width = 45
        Height = 15
        Caption = #20986#29256#31038
      end
      object Label2: TLabel
        Left = 80
        Top = 104
        Width = 30
        Height = 15
        Caption = #29366#24577
      end
      object Label3: TLabel
        Left = 80
        Top = 144
        Width = 30
        Height = 15
        Caption = #31867#21035
      end
      object Label4: TLabel
        Left = 80
        Top = 184
        Width = 30
        Height = 15
        Caption = #20316#32773
      end
      object Label5: TLabel
        Left = 79
        Top = 220
        Width = 60
        Height = 15
        Caption = #20986#29256#26102#38388
      end
      object Label8: TLabel
        Left = 72
        Top = 24
        Width = 90
        Height = 15
        Caption = #32452#21512#26597#35810#36873#25321
      end
      object Label9: TLabel
        Left = 416
        Top = 8
        Width = 48
        Height = 15
        Caption = 'Label9'
      end
      object cbPress: TComboBox
        Left = 152
        Top = 56
        Width = 252
        Height = 23
        ItemHeight = 15
        TabOrder = 0
      end
      object cbState: TComboBox
        Left = 152
        Top = 96
        Width = 252
        Height = 23
        ItemHeight = 15
        TabOrder = 1
      end
      object cbSort: TComboBox
        Left = 152
        Top = 136
        Width = 252
        Height = 23
        ItemHeight = 15
        TabOrder = 2
      end
      object cbWriter: TComboBox
        Left = 152
        Top = 176
        Width = 252
        Height = 23
        ItemHeight = 15
        TabOrder = 3
      end
      object btnQuery: TButton
        Left = 96
        Top = 296
        Width = 75
        Height = 25
        Caption = #26597#35810
        TabOrder = 4
      end
      object cbYear: TComboBox
        Left = 152
        Top = 216
        Width = 252
        Height = 23
        ItemHeight = 15
        TabOrder = 5
      end
    end
  end
end