data.~dfm

成都研究院全直径测试仪控制软件 delphi开发

object datafrm: Tdatafrm
  Left = 286
  Top = 171
  Width = 566
  Height = 449
  Caption = #25968#25454#31649#29702
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 70
    Top = 13
    Width = 83
    Height = 13
    AutoSize = False
    Caption = #25968#25454#26597#35810
  end
  object Label2: TLabel
    Left = 70
    Top = 40
    Width = 75
    Height = 13
    AutoSize = False
    Caption = #36873#25321#21024#38500
  end
  object Label3: TLabel
    Left = 154
    Top = 38
    Width = 108
    Height = 13
    Caption = #22635#20837#35201#21024#38500#30340#24207#21495#65306
  end
  object StringGrid1: TStringGrid
    Left = 6
    Top = 77
    Width = 547
    Height = 260
    ColCount = 14
    Ctl3D = False
    DefaultColWidth = 60
    DefaultRowHeight = 18
    FixedCols = 0
    RowCount = 15
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentCtl3D = False
    ParentFont = False
    TabOrder = 0
  end
  object BitBtn1: TBitBtn
    Left = 224
    Top = 363
    Width = 84
    Height = 27
    Caption = #36755#20986#25968#25454
    TabOrder = 1
    OnClick = BitBtn1Click
  end
  object ComboBox1: TComboBox
    Left = 154
    Top = 6
    Width = 116
    Height = 21
    ItemHeight = 13
    TabOrder = 2
    Text = #20117#21495
    Items.Strings = (
      #20117#21495
      #23721#26679#21495)
  end
  object Button1: TButton
    Left = 390
    Top = 6
    Width = 68
    Height = 20
    Caption = #26597'  '#35810
    TabOrder = 3
    OnClick = Button1Click
  end
  object Edit1: TEdit
    Left = 282
    Top = 6
    Width = 96
    Height = 21
    TabOrder = 4
  end
  object Edit2: TEdit
    Left = 282
    Top = 38
    Width = 96
    Height = 21
    TabOrder = 5
  end
  object Button2: TButton
    Left = 390
    Top = 38
    Width = 67
    Height = 20
    Caption = #21024'  '#38500
    TabOrder = 6
    OnClick = Button2Click
  end
  object ExcelApplication1: TExcelApplication
    AutoConnect = False
    ConnectKind = ckRunningOrNew
    AutoQuit = False
    Left = 96
    Top = 344
  end
  object ExcelWorksheet1: TExcelWorksheet
    AutoConnect = False
    ConnectKind = ckRunningOrNew
    Left = 128
    Top = 344
  end
  object SaveDialog1: TSaveDialog
    Filter = '*.xls|xls'
    Left = 168
    Top = 344
  end
  object ExcelWorkbook1: TExcelWorkbook
    AutoConnect = False
    ConnectKind = ckRunningOrNew
    Left = 64
    Top = 344
  end
end