uexportgoods.dfm

港口货物管理系统

    ParentFont = False
    TabOrder = 12
    Text = 'Edit2'
  end
  object Edit5: TEdit
    Left = 412
    Top = 84
    Width = 81
    Height = 23
    Font.Charset = ANSI_CHARSET
    Font.Color = clNavy
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    TabOrder = 7
    Text = 'Edit5'
  end
  object Edit6: TEdit
    Left = 69
    Top = 136
    Width = 97
    Height = 23
    Font.Charset = ANSI_CHARSET
    Font.Color = clNavy
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    TabOrder = 9
    Text = 'Edit6'
    OnExit = Edit6Exit
  end
  object ComboBox1: TComboBox
    Left = 238
    Top = 36
    Width = 114
    Height = 23
    Style = csDropDownList
    Font.Charset = ANSI_CHARSET
    Font.Color = clNavy
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ItemHeight = 15
    ParentFont = False
    TabOrder = 1
    OnClick = ComboBox1Click
  end
  object BitBtn1: TBitBtn
    Left = 156
    Top = 385
    Width = 114
    Height = 37
    Caption = #30830#35748#28155#21152
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -19
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
    TabOrder = 13
    OnClick = BitBtn1Click
  end
  object BitBtn3: TBitBtn
    Left = 358
    Top = 385
    Width = 114
    Height = 37
    Caption = #21024#38500#35760#24405
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -19
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
    TabOrder = 14
    OnClick = BitBtn3Click
  end
  object BitBtn4: TBitBtn
    Left = 556
    Top = 385
    Width = 114
    Height = 37
    Caption = #36864'    '#20986
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -19
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
    TabOrder = 16
    OnClick = BitBtn4Click
  end
  object DateTimePicker1: TDateTimePicker
    Left = 69
    Top = 36
    Width = 120
    Height = 23
    CalAlignment = dtaLeft
    Date = 38030.5267525463
    Time = 38030.5267525463
    DateFormat = dfLong
    DateMode = dmComboBox
    Font.Charset = ANSI_CHARSET
    Font.Color = clNavy
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    Kind = dtkDate
    ParseInput = False
    ParentFont = False
    TabOrder = 0
  end
  object DBLookupComboBox1: TDBLookupComboBox
    Left = 412
    Top = 36
    Width = 124
    Height = 23
    Font.Charset = ANSI_CHARSET
    Font.Color = clNavy
    Font.Height = -12
    Font.Name = 'Times New Roman'
    Font.Style = []
    KeyField = 'atnum'
    ListField = 'atnum;agname'
    ListSource = DataSource3
    ParentFont = False
    TabOrder = 2
    OnClick = DBLookupComboBox1Click
  end
  object ComboBox2: TComboBox
    Left = 561
    Top = 84
    Width = 89
    Height = 23
    Style = csDropDownList
    Font.Charset = ANSI_CHARSET
    Font.Color = clNavy
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ItemHeight = 15
    ItemIndex = 0
    ParentFont = False
    TabOrder = 8
    Text = #22330#8594#33337#33334
    Items.Strings = (
      #22330#8594#33337#33334
      #22330#8594#27773#36710
      #22330#8594#28779#36710)
  end
  object Memo1: TMemo
    Left = 663
    Top = 23
    Width = 161
    Height = 150
    Color = clMoneyGreen
    Font.Charset = ANSI_CHARSET
    Font.Color = clMaroon
    Font.Height = -12
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    ScrollBars = ssVertical
    TabOrder = 4
  end
  object Edit3: TEdit
    Left = 238
    Top = 84
    Width = 97
    Height = 23
    Font.Charset = ANSI_CHARSET
    Font.Color = clNavy
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    TabOrder = 6
    Text = 'Edit3'
  end
  object Edit1: TEdit
    Left = 294
    Top = 136
    Width = 91
    Height = 23
    Font.Charset = ANSI_CHARSET
    Font.Color = clNavy
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    TabOrder = 11
    Text = 'Edit1'
  end
  object DBLookupComboBox3: TDBLookupComboBox
    Left = 537
    Top = 36
    Width = 113
    Height = 23
    Font.Charset = ANSI_CHARSET
    Font.Color = clNavy
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ListSource = DataSource4
    ParentFont = False
    TabOrder = 3
    OnClick = DBLookupComboBox3Click
  end
  object CheckBox1: TCheckBox
    Left = 171
    Top = 139
    Width = 75
    Height = 17
    Caption = #25509#29677#36755#20837
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    TabOrder = 10
    OnClick = CheckBox1Click
  end
  object StatusBar1: TStatusBar
    Left = 8
    Top = 336
    Width = 809
    Height = 25
    Align = alNone
    Panels = <
      item
        Alignment = taCenter
        Text = #21512#35745#65306
        Width = 100
      end
      item
        Alignment = taCenter
        Width = 200
      end
      item
        Alignment = taCenter
        Width = 250
      end
      item
        Alignment = taCenter
        Width = 250
      end>
    SimplePanel = False
  end
  object ComboBox3: TComboBox
    Left = 69
    Top = 84
    Width = 118
    Height = 23
    Style = csDropDownList
    Font.Charset = ANSI_CHARSET
    Font.Color = clNavy
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ItemHeight = 15
    ParentFont = False
    TabOrder = 5
    OnClick = ComboBox3Click
  end
  object DataSource1: TDataSource
    DataSet = Table2
    Left = 93
    Top = 65535
  end
  object DataSource2: TDataSource
    Left = 149
    Top = 65535
  end
  object Query1: TQuery
    DatabaseName = 'port'
    Left = 197
    Top = 65535
  end
  object DataSource3: TDataSource
    DataSet = Query1
    Left = 245
    Top = 65533
  end
  object Table2: TTable
    Active = True
    DatabaseName = 'port'
    TableName = 'EXPORT.DB'
    Left = 24
    Top = 8
  end
  object Query2: TQuery
    DatabaseName = 'port'
    Left = 576
    Top = 8
  end
  object DataSource4: TDataSource
    DataSet = Query2
    Left = 520
  end
  object Table3: TTable
    Active = True
    DatabaseName = 'port'
    TableName = 'Mplan.DB'
    Left = 432
  end
  object Table5: TTable
    Active = True
    DatabaseName = 'port'
    TableName = 'MEXPORT.DB'
    Left = 624
    Top = 88
  end
  object Query3: TQuery
    Active = True
    DatabaseName = 'port'
    SQL.Strings = (
      'select distinct atname from mexport order by atname')
    Left = 24
    Top = 376
  end
  object Query4: TQuery
    Active = True
    DatabaseName = 'port'
    SQL.Strings = (
      'select distinct agoodd from agoodd order by agoodd')
    Left = 336
    Top = 64
  end
  object Table1: TTable
    Active = True
    DatabaseName = 'port'
    TableName = 'spotgoods.DB'
    Left = 80
    Top = 384
  end
end