uquerytdhyf.dfm

物流行业

object fmquerytdhyf: Tfmquerytdhyf
  Left = 251
  Top = 282
  Width = 766
  Height = 521
  Caption = #38598#35013#31665#25552#21333#20449#24687#26597#35810'('#25353#26376#20221')'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 184
    Top = 11
    Width = 390
    Height = 29
    Caption = #38598#35013#31665#25552#21333#20449#24687#26597#35810'('#25353#26376#20221')'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -29
    Font.Name = #26999#20307'_GB2312'
    Font.Style = [fsUnderline]
    ParentFont = False
  end
  object groupbox1: TGroupBox
    Left = 10
    Top = 44
    Width = 735
    Height = 77
    Caption = #26597#35810#35774#32622
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object Label2: TLabel
      Left = 109
      Top = 24
      Width = 63
      Height = 14
      Caption = #36873#25321#26376#20221':'
      Font.Charset = GB2312_CHARSET
      Font.Color = clNavy
      Font.Height = -14
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 109
      Top = 51
      Width = 63
      Height = 14
      Caption = #36873#25321#20195#29702':'
      Font.Charset = GB2312_CHARSET
      Font.Color = clNavy
      Font.Height = -14
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ParentFont = False
    end
    object Button1: TButton
      Left = 549
      Top = 34
      Width = 55
      Height = 23
      Caption = #26597#35810
      Font.Charset = GB2312_CHARSET
      Font.Color = clNavy
      Font.Height = -19
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      OnClick = Button1Click
    end
    object ComboBox1: TComboBox
      Left = 185
      Top = 16
      Width = 153
      Height = 24
      Font.Charset = GB2312_CHARSET
      Font.Color = clNavy
      Font.Height = -16
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ItemHeight = 16
      ParentFont = False
      TabOrder = 1
      Items.Strings = (
        '01'
        '02'
        '03'
        '04'
        '05'
        '06'
        '07'
        '08'
        '09'
        '10'
        '11'
        '12'
        '')
    end
    object RadioGroup1: TRadioGroup
      Left = 368
      Top = 9
      Width = 129
      Height = 60
      Caption = #36807#28388#26465#20214
      ItemIndex = 2
      Items.Strings = (
        #24050#32463#32467#26463#25552#21333
        #27809#26377#32467#26463#25552#21333
        #20840#37096#25552#21333)
      TabOrder = 2
    end
    object ComboBox2: TComboBox
      Left = 185
      Top = 43
      Width = 153
      Height = 27
      Font.Charset = GB2312_CHARSET
      Font.Color = clNavy
      Font.Height = -19
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ItemHeight = 19
      ItemIndex = 4
      ParentFont = False
      TabOrder = 3
      Text = #20840#37096#36135#20195
      Items.Strings = (
        #39532#38797#23665#22806#36816
        #39532#38797#23665#22806#20195
        #22269#38469#36135#36816
        #23431#29615
        #20840#37096#36135#20195)
    end
  end
  object GroupBox2: TGroupBox
    Left = 8
    Top = 123
    Width = 738
    Height = 111
    Caption = #20027#34920#35760#24405#27983#35272
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    object DBGrid1: TDBGrid
      Left = 2
      Top = 14
      Width = 734
      Height = 95
      Align = alClient
      DataSource = DataSource1
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clNavy
      TitleFont.Height = -12
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'Drq'
          Title.Caption = #25253#28207#26085#26399
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Ctdh'
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlue
          Font.Height = -14
          Font.Name = #23435#20307
          Font.Style = []
          Title.Caption = #25552#21333#21495
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Cdl'
          Title.Caption = #36135#29289#20195#29702
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Chm'
          Title.Caption = #36135#21517
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Cjl'
          Title.Caption = #31665#37327#35760#24405
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Nzl'
          Title.Caption = #37325#37327
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Lbw'
          Font.Charset = GB2312_CHARSET
          Font.Color = clRed
          Font.Height = -14
          Font.Name = #23435#20307
          Font.Style = []
          Title.Caption = #26631#23436
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Mbz'
          Title.Caption = #22791#27880
          Visible = True
        end>
    end
  end
  object BitBtn4: TBitBtn
    Left = 521
    Top = 426
    Width = 140
    Height = 45
    Caption = #36864#20986#31383#21475
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -21
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    OnClick = BitBtn4Click
  end
  object StatusBar1: TStatusBar
    Left = 9
    Top = 234
    Width = 737
    Height = 21
    Align = alNone
    Panels = <
      item
        Alignment = taCenter
        Width = 122
      end>
    SimplePanel = False
  end
  object BitBtn1: TBitBtn
    Left = 97
    Top = 426
    Width = 140
    Height = 45
    Caption = #25171#21360#20027#34920#35760#24405
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -21
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
    TabOrder = 4
    OnClick = BitBtn1Click
  end
  object GroupBox3: TGroupBox
    Left = 8
    Top = 255
    Width = 738
    Height = 137
    Caption = #20316#19994#26126#32454#35760#24405#27983#35272
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 5
    object DBGrid2: TDBGrid
      Left = 2
      Top = 14
      Width = 734
      Height = 121
      Align = alClient
      DataSource = DataSource2
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clNavy
      TitleFont.Height = -12
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'Drq'
          Title.Caption = #25286#31665#26085#26399
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Cch'
          Title.Caption = #36710#21495
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Ctdh'
          Title.Caption = #25552#21333#21495
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Cxh'
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlue
          Font.Height = -14
          Font.Name = #23435#20307
          Font.Style = []
          Title.Caption = #31665#21495
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Ccc'
          Title.Caption = #23610#23544
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Cxx'
          Title.Caption = #31665#22411
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Njs'
          Title.Caption = #20214#25968
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Nzl'
          Title.Caption = #37325#37327
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Cxw'
          Title.Caption = #31665#20301
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Lwc'
          Font.Charset = GB2312_CHARSET
          Font.Color = clRed
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          Title.Caption = #22806#25286
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Mbz'
          Title.Caption = #22791#27880
          Visible = True
        end>
    end
  end
  object StatusBar2: TStatusBar
    Left = 9
    Top = 391
    Width = 737
    Height = 21
    Align = alNone
    Panels = <
      item
        Alignment = taCenter
        Width = 122
      end>
    SimplePanel = False
  end
  object BitBtn2: TBitBtn
    Left = 309
    Top = 426
    Width = 140
    Height = 45
    Caption = #25171#21360#20174#34920#35760#24405
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -21
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
    TabOrder = 7
    OnClick = BitBtn2Click
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 24
    Top = 8
  end
  object Table1: TTable
    Active = True
    AfterScroll = Table1AfterScroll
    DatabaseName = 'miscontainer'
    TableName = 'Inputtdh.DB'
    Left = 80
    Top = 16
  end
  object Table2: TTable
    Active = True
    DatabaseName = 'miscontainer'
    MasterSource = DataSource1
    TableName = 'Operout.DB'
    Left = 144
    Top = 24
  end
  object DataSource2: TDataSource
    DataSet = Table2
    Left = 184
    Top = 32
  end
end