zhuanyefind.dfm

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

object zyfufindForm: TzyfufindForm
  Left = 225
  Top = 186
  Width = 397
  Height = 375
  Caption = #19987#19994#26381#21153#26597#35810
  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 GroupBox1: TGroupBox
    Left = 8
    Top = 8
    Width = 369
    Height = 105
    Caption = #26597#35810#26465#20214
    TabOrder = 0
    object Label1: TLabel
      Left = 14
      Top = 29
      Width = 26
      Height = 13
      Caption = #26085#26399
    end
    object Label2: TLabel
      Left = 200
      Top = 27
      Width = 26
      Height = 13
      Caption = #21333#20301
    end
    object Edit1: TEdit
      Left = 56
      Top = 24
      Width = 97
      Height = 21
      TabOrder = 0
    end
    object Edit2: TEdit
      Left = 254
      Top = 24
      Width = 92
      Height = 21
      TabOrder = 1
    end
    object Button1: TButton
      Left = 16
      Top = 64
      Width = 75
      Height = 25
      Caption = #26597#35810
      TabOrder = 2
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 272
      Top = 64
      Width = 75
      Height = 25
      Caption = #21462#28040
      TabOrder = 3
      OnClick = Button2Click
    end
    object CheckBox1: TCheckBox
      Left = 130
      Top = 69
      Width = 97
      Height = 17
      Caption = #27169#31946#26597#35810
      TabOrder = 4
    end
  end
  object DBGrid1: TDBGrid
    Left = 8
    Top = 128
    Width = 369
    Height = 209
    DataSource = DataSource1
    TabOrder = 1
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
  end
  object ADOQuery1: TADOQuery
    Active = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\qxfw\qxfw.mdb;Pe' +
      'rsist Security Info=False'
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from zyfw')
    Left = 176
    Top = 32
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 224
    Top = 64
  end
end