fljc.dfm

气象信息服务(delphi) 气象信息服务(delphi)

object fljcForm: TfljcForm
  Left = 205
  Top = 166
  Width = 496
  Height = 342
  Caption = #38450#38647#26816#27979
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 104
    Top = 32
    Width = 13
    Height = 13
    Caption = #24180
  end
  object Label2: TLabel
    Left = 235
    Top = 32
    Width = 13
    Height = 13
    Caption = #26376
  end
  object Label3: TLabel
    Left = 351
    Top = 32
    Width = 13
    Height = 13
    Caption = #26085
  end
  object Label4: TLabel
    Left = 16
    Top = 80
    Width = 26
    Height = 13
    Caption = #21333#20301
  end
  object Label5: TLabel
    Left = 206
    Top = 80
    Width = 26
    Height = 13
    Caption = #24615#36136
  end
  object Label6: TLabel
    Left = 16
    Top = 112
    Width = 39
    Height = 13
    Caption = #32852#31995#20154
  end
  object Label7: TLabel
    Left = 206
    Top = 112
    Width = 52
    Height = 13
    Caption = #32852#31995#30005#35805
  end
  object Label8: TLabel
    Left = 16
    Top = 144
    Width = 26
    Height = 13
    Caption = #25910#36153
  end
  object Label9: TLabel
    Left = 206
    Top = 145
    Width = 52
    Height = 13
    Caption = #26816#27979#32467#26524
  end
  object Label10: TLabel
    Left = 16
    Top = 183
    Width = 65
    Height = 13
    Caption = #26816#27979#25253#21578#20070
  end
  object DBEdit1: TDBEdit
    Left = 16
    Top = 32
    Width = 73
    Height = 21
    DataField = 'yy'
    DataSource = DataSource1
    TabOrder = 0
  end
  object DBEdit2: TDBEdit
    Left = 141
    Top = 31
    Width = 80
    Height = 21
    DataField = 'mm'
    DataSource = DataSource1
    TabOrder = 1
  end
  object DBEdit3: TDBEdit
    Left = 265
    Top = 31
    Width = 68
    Height = 21
    DataField = 'dd'
    DataSource = DataSource1
    TabOrder = 2
  end
  object DBEdit4: TDBEdit
    Left = 62
    Top = 77
    Width = 117
    Height = 21
    DataField = 'dw'
    DataSource = DataSource1
    TabOrder = 3
  end
  object DBEdit5: TDBEdit
    Left = 277
    Top = 76
    Width = 134
    Height = 21
    DataField = 'xz'
    DataSource = DataSource1
    TabOrder = 4
  end
  object DBEdit6: TDBEdit
    Left = 60
    Top = 111
    Width = 120
    Height = 21
    DataField = 'lxr'
    DataSource = DataSource1
    TabOrder = 5
  end
  object DBEdit7: TDBEdit
    Left = 276
    Top = 110
    Width = 134
    Height = 21
    DataField = 'lxdh'
    DataSource = DataSource1
    TabOrder = 6
  end
  object DBEdit8: TDBEdit
    Left = 61
    Top = 143
    Width = 120
    Height = 21
    DataField = 'sf'
    DataSource = DataSource1
    TabOrder = 7
  end
  object DBEdit9: TDBEdit
    Left = 277
    Top = 143
    Width = 134
    Height = 21
    DataField = 'jcjg'
    DataSource = DataSource1
    TabOrder = 8
  end
  object DBEdit10: TDBMemo
    Left = 99
    Top = 182
    Width = 185
    Height = 89
    DataField = 'jcbgs'
    DataSource = DataSource1
    TabOrder = 9
  end
  object DBNavigator1: TDBNavigator
    Left = 64
    Top = 280
    Width = 240
    Height = 25
    DataSource = DataSource1
    TabOrder = 10
  end
  object ADODataSet1: TADODataSet
    Active = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\qxfw\qxfw.mdb;Pe' +
      'rsist Security Info=False'
    CursorType = ctStatic
    CommandText = 'select *from fljc'
    Parameters = <>
    Left = 328
    Top = 224
    object ADODataSet1yy: TWideStringField
      FieldName = 'yy'
      Size = 8
    end
    object ADODataSet1mm: TWideStringField
      FieldName = 'mm'
      Size = 8
    end
    object ADODataSet1dd: TWideStringField
      FieldName = 'dd'
      Size = 8
    end
    object ADODataSet1dw: TWideStringField
      FieldName = 'dw'
      Size = 10
    end
    object ADODataSet1xz: TWideStringField
      FieldName = 'xz'
      Size = 10
    end
    object ADODataSet1lxr: TWideStringField
      FieldName = 'lxr'
      Size = 10
    end
    object ADODataSet1lxdh: TWideStringField
      FieldName = 'lxdh'
      Size = 10
    end
    object ADODataSet1sf: TIntegerField
      FieldName = 'sf'
    end
    object ADODataSet1jcjg: TWideStringField
      FieldName = 'jcjg'
      Size = 10
    end
    object ADODataSet1jcbgs: TMemoField
      FieldName = 'jcbgs'
      BlobType = ftMemo
    end
  end
  object DataSource1: TDataSource
    DataSet = ADODataSet1
    Left = 264
    Top = 208
  end
end