main.~dfm

本程序采用Delphi开发

object FrmMain: TFrmMain
  Left = 352
  Top = 256
  Width = 303
  Height = 335
  BorderIcons = [biSystemMenu]
  Caption = #25163#26426#12289#21306#21495#12289#36523#20221#35777#21495#26597#35810#24037#20855
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCanResize = FormCanResize
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 295
    Height = 301
    ActivePage = TabSheet4
    Align = alClient
    TabIndex = 3
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = #37038#25919#32534#30721
      object Label1: TLabel
        Left = 9
        Top = 221
        Width = 66
        Height = 13
        Caption = #26597#25214#26041#24335'(&M):'
      end
      object Label2: TLabel
        Left = 11
        Top = 248
        Width = 64
        Height = 13
        Caption = #26597#25214#20869#23481'(&T):'
      end
      object BitBtn1: TBitBtn
        Left = 217
        Top = 220
        Width = 54
        Height = 42
        Caption = #26597#25214'(&S)'
        TabOrder = 0
        OnClick = BitBtn1Click
      end
    end
    object TabSheet2: TTabSheet
      Caption = #25163#26426
      ImageIndex = 1
      object Panel2: TPanel
        Left = 0
        Top = 0
        Width = 287
        Height = 273
        Align = alClient
        Color = clWhite
        TabOrder = 0
        object Label4: TLabel
          Left = 11
          Top = 14
          Width = 66
          Height = 13
          Caption = #25163#26426#21495#30721'(&M):'
        end
        object BitBtn2: TBitBtn
          Left = 217
          Top = 8
          Width = 54
          Height = 25
          Caption = #26597#25214'(&S)'
          TabOrder = 1
          OnClick = BitBtn2Click
        end
        object Memo1: TMemo
          Left = 16
          Top = 40
          Width = 257
          Height = 225
          Ctl3D = False
          ImeName = '?D?? (?'#242#236'?) - ?'#65504#232#237'?'#8242#242'?'
          ParentCtl3D = False
          TabOrder = 0
        end
      end
    end
    object TabSheet3: TTabSheet
      Caption = #36523#20221#35777
      ImageIndex = 2
      object Panel3: TPanel
        Left = 0
        Top = 0
        Width = 287
        Height = 273
        Align = alClient
        Color = clWhite
        TabOrder = 0
        object Label5: TLabel
          Left = 11
          Top = 13
          Width = 94
          Height = 13
          Caption = #36523#20221#35777#21495#21069'6'#20301'(&C):'
        end
        object BitBtn3: TBitBtn
          Left = 217
          Top = 6
          Width = 54
          Height = 25
          Caption = #26597#25214'(&S)'
          TabOrder = 1
          OnClick = BitBtn3Click
        end
        object Memo2: TMemo
          Left = 16
          Top = 40
          Width = 257
          Height = 225
          Ctl3D = False
          ImeName = '?D?? (?'#242#236'?) - ?'#65504#232#237'?'#8242#242'?'
          ParentCtl3D = False
          TabOrder = 0
        end
      end
    end
    object TabSheet4: TTabSheet
      Caption = #20851#20110
      ImageIndex = 3
      object Panel1: TPanel
        Left = 0
        Top = 0
        Width = 287
        Height = 273
        Align = alClient
        Color = clWhite
        TabOrder = 0
        object Label6: TLabel
          Left = 24
          Top = 33
          Width = 156
          Height = 13
          Caption = #26412#24037#20855#20813#36153#20351#29992#65292#27426#36814#20256#25773#65281
        end
        object Label8: TLabel
          Left = 40
          Top = 64
          Width = 80
          Height = 39
          Caption = #30456#20851#25991#20214':'#13#10'   ETopCode.exe'#13#10'   Code.BM'
        end
      end
    end
  end
  object DataSource1: TDataSource
    Left = 184
    Top = 96
  end
  object ADOConnection1: TADOConnection
    LoginPrompt = False
    Mode = cmShareDenyNone
    Left = 80
    Top = 176
  end
  object ADOQuery1: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'Select * from AreaData')
    Left = 128
    Top = 136
  end
end