⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 searchku.~dfm

📁 一个图书批发商的通用软件
💻 ~DFM
字号:
object frmSearchKu: TfrmSearchKu
  Left = 192
  Top = 262
  Width = 650
  Height = 375
  Caption = #24211#23384#26597#35810
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 0
    Top = 26
    Width = 642
    Height = 115
    Align = alTop
    Caption = #26597#35810#26465#20214
    TabOrder = 0
    object cxLookupComboBox1: TcxLookupComboBox
      Left = 105
      Top = 76
      Width = 130
      Height = 21
      Properties.DropDownAutoSize = True
      Properties.DropDownListStyle = lsEditList
      Properties.IncrementalFiltering = False
      Properties.KeyFieldNames = 'ClientName'
      Properties.ListColumns = <
        item
          Caption = #20986#29256#31038#21517#31216
          FieldName = 'ClientName'
        end>
      Properties.ListSource = DataSource2
      Style.BorderStyle = ebs3D
      TabOrder = 0
    end
    object cxLookupComboBox2: TcxLookupComboBox
      Left = 104
      Top = 47
      Width = 130
      Height = 21
      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 = 1
    end
    object CheckBox1: TRadioButton
      Left = 32
      Top = 51
      Width = 71
      Height = 17
      Caption = #22270#20070#32534#21495
      TabOrder = 2
    end
    object CheckBox3: TRadioButton
      Left = 32
      Top = 78
      Width = 73
      Height = 17
      Caption = #22270#20070#29256#21035
      TabOrder = 3
    end
    object RadioButton1: TRadioButton
      Left = 32
      Top = 24
      Width = 57
      Height = 17
      Caption = #20840#37096
      Checked = True
      TabOrder = 4
      TabStop = True
    end
  end
  object DBGrid1: TDBGrid
    Left = 0
    Top = 141
    Width = 642
    Height = 200
    Align = alClient
    DataSource = DataSource1
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
    ParentFont = False
    ReadOnly = True
    TabOrder = 5
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'BookId'
        Title.Alignment = taCenter
        Title.Caption = #22270#20070#32534#21495
        Width = 89
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'BookName'
        Title.Alignment = taCenter
        Title.Caption = #22270#20070#21517#31216
        Width = 131
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'BookEdition'
        Title.Alignment = taCenter
        Title.Caption = #29256#21035
        Width = 100
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'BookCount'
        Title.Alignment = taCenter
        Title.Caption = #25968#37327
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'BookPrice'
        Title.Alignment = taCenter
        Title.Caption = #21333#20215
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'bonus'
        Title.Alignment = taCenter
        Title.Caption = #20914#32418#25253#24223
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'AddBook'
        Title.Alignment = taCenter
        Title.Caption = #21152#25439
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'TotalMoney'
        Title.Alignment = taCenter
        Title.Caption = #30721#27915
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Bundles'
        Title.Alignment = taCenter
        Title.Caption = #21253'+'#20876
        Visible = True
      end>
  end
  object ADOQuery1: TADOQuery
    Active = True
    Connection = dmData.adcDatabase
    CursorType = ctStatic
    AfterOpen = ADOQuery1AfterOpen
    Parameters = <>
    SQL.Strings = (
      'select * from tbHouseSave')
    Left = 336
    Top = 48
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 384
    Top = 56
  end
  object ADOQuery2: TADOQuery
    Connection = dmData.adcDatabase
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from tbPublish')
    Left = 384
    Top = 32
  end
  object DataSource2: TDataSource
    DataSet = ADOQuery2
    Left = 472
    Top = 40
  end
  object ADOQuery3: TADOQuery
    Connection = dmData.adcDatabase
    Parameters = <>
    Left = 328
    Top = 16
  end
  object ADOQuery4: TADOQuery
    Connection = dmData.adcDatabase
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select bookid,bookname from tbBookClass')
    Left = 440
    Top = 8
  end
  object DataSource3: TDataSource
    DataSet = ADOQuery4
    Left = 448
    Top = 56
  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 = 164
        FloatTop = 129
        FloatClientWidth = 33
        FloatClientHeight = 88
        ItemLinks = <
          item
            Item = dxBarLargeButton1
            Visible = True
          end
          item
            Item = dxBarLargeButton6
            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)
    LargeImages = dmData.ImageList
    PopupMenuLinks = <>
    Style = bmsFlat
    UseSystemFont = True
    Left = 356
    DockControlHeights = (
      0
      0
      26
      0)
    object dxBarLargeButton1: TdxBarLargeButton
      Caption = #32479#35745
      Category = 0
      Hint = #32479#35745
      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 = #21047#26032
      Category = 0
      Hint = #21047#26032
      Visible = ivAlways
      AutoGrayScale = False
      GlyphLayout = glLeft
      LargeImageIndex = 5
    end
    object dxBarLargeButton6: TdxBarLargeButton
      Caption = #25171#21360
      Category = 0
      Hint = #25171#21360
      Visible = ivAlways
      OnClick = dxBarLargeButton6Click
      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
  end
  object frPrintGrid1: TfrPrintGrid
    DBGrid = DBGrid1
    FitWidth.Enabled = False
    FitWidth.ShrinkOptions = [frsoProportional, frsoShrinkOnly]
    FitWidth.ResizePercent = 30
    FitWidth.ApplyBeforeOnCustomize = False
    PageSize = 9
    PageWidth = 0
    PageHeight = 0
    PageMargins.Left = 6
    PageMargins.Top = 6
    PageMargins.Right = 0
    PageMargins.Bottom = 0
    Title.Font.Charset = ANSI_CHARSET
    Title.Font.Color = clWindowText
    Title.Font.Height = -16
    Title.Font.Name = #23435#20307
    Title.Font.Style = [fsBold]
    Title.Color = clWhite
    Title.Frame = []
    Title.FrameWidth = 1
    PageHeader.Font.Charset = ANSI_CHARSET
    PageHeader.Font.Color = clWindowText
    PageHeader.Font.Height = -12
    PageHeader.Font.Name = #23435#20307
    PageHeader.Font.Style = [fsBold]
    PageHeader.Color = clWhite
    PageHeader.Frame = []
    PageHeader.FrameWidth = 1
    PageHeader.Align = taLeftJustify
    PageHeader.Text = 'lll'
    PageFooter.Font.Charset = ANSI_CHARSET
    PageFooter.Font.Color = clWindowText
    PageFooter.Font.Height = -12
    PageFooter.Font.Name = #23435#20307
    PageFooter.Font.Style = []
    PageFooter.Color = clWhite
    PageFooter.Frame = []
    PageFooter.FrameWidth = 1
    PageFooter.Align = taRightJustify
    Header.Font.Charset = ANSI_CHARSET
    Header.Font.Color = clWhite
    Header.Font.Height = -12
    Header.Font.Name = #23435#20307
    Header.Font.Style = [fsBold]
    Header.Color = clNavy
    Header.Frame = [frLeft, frTop, frRight, frBottom]
    Header.FrameWidth = 1
    Body.Font.Charset = ANSI_CHARSET
    Body.Font.Color = clWindowText
    Body.Font.Height = -12
    Body.Font.Name = #23435#20307
    Body.Font.Style = []
    Body.Color = clWhite
    Body.Frame = [frLeft, frTop, frRight, frBottom]
    Body.FrameWidth = 1
    Left = 280
    Top = 40
  end
end

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -