unit6.dfm

源码下载..可编译,可运行!下载后就可使用..可以学习交流.可以用做毕业设计!

object zscx: Tzscx
  Left = 352
  Top = 152
  Width = 406
  Height = 491
  Caption = #20303#23487#26597#35810
  Color = clTeal
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object FlatPanel1: TFlatPanel
    Left = 8
    Top = 8
    Width = 385
    Height = 209
    ParentColor = True
    TabOrder = 0
    object Label1: TLabel
      Left = 24
      Top = 16
      Width = 121
      Height = 13
      AutoSize = False
      Caption = #26597#35810#23398#29983#20303#23487#20301#32622
    end
    object Label2: TLabel
      Left = 72
      Top = 56
      Width = 81
      Height = 13
      AutoSize = False
      Caption = #25353#23398#21495#26597#35810
    end
    object Label3: TLabel
      Left = 72
      Top = 88
      Width = 81
      Height = 13
      AutoSize = False
      Caption = #25353#22995#21517#26597#35810
    end
    object FlatSpeedButton1: TFlatSpeedButton
      Left = 272
      Top = 48
      Width = 41
      Height = 19
      Caption = #26597#35810
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      OnClick = FlatSpeedButton1Click
    end
    object FlatSpeedButton2: TFlatSpeedButton
      Left = 272
      Top = 80
      Width = 41
      Height = 19
      Caption = #26597#35810
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      OnClick = FlatSpeedButton2Click
    end
    object FlatEdit1: TFlatEdit
      Left = 152
      Top = 48
      Width = 105
      Height = 19
      ColorFlat = clTeal
      ParentColor = True
      TabOrder = 0
      Text = 'FlatEdit1'
      OnKeyPress = FlatEdit1KeyPress
    end
    object FlatEdit2: TFlatEdit
      Left = 152
      Top = 80
      Width = 105
      Height = 19
      ColorFlat = clTeal
      ParentColor = True
      TabOrder = 1
      Text = 'FlatEdit2'
      OnKeyPress = FlatEdit2KeyPress
    end
    object FlatMemo1: TFlatMemo
      Left = 72
      Top = 112
      Width = 241
      Height = 89
      ColorFlat = clTeal
      ParentColor = True
      ReadOnly = True
      TabOrder = 2
    end
  end
  object FlatPanel2: TFlatPanel
    Left = 8
    Top = 232
    Width = 385
    Height = 225
    ParentColor = True
    TabOrder = 1
    object Label4: TLabel
      Left = 24
      Top = 16
      Width = 113
      Height = 13
      AutoSize = False
      Caption = #26597#35810#23487#33293#20303#23487#24773#20917
    end
    object Label5: TLabel
      Left = 80
      Top = 48
      Width = 57
      Height = 13
      AutoSize = False
      Caption = #23487#33293#27004#21495
    end
    object Label6: TLabel
      Left = 80
      Top = 80
      Width = 65
      Height = 13
      AutoSize = False
      Caption = #23487'   '#33293'  '#21495
    end
    object FlatSpeedButton3: TFlatSpeedButton
      Left = 264
      Top = 76
      Width = 57
      Height = 21
      Caption = #26597#35810
      OnClick = FlatSpeedButton3Click
    end
    object FlatComboBox1: TFlatComboBox
      Left = 144
      Top = 44
      Width = 97
      Height = 21
      Style = csDropDownList
      Color = clTeal
      ItemHeight = 13
      TabOrder = 0
      ItemIndex = -1
    end
    object FlatComboBox2: TFlatComboBox
      Left = 144
      Top = 76
      Width = 97
      Height = 21
      Style = csDropDownList
      Color = clTeal
      ItemHeight = 13
      TabOrder = 1
      ItemIndex = -1
      OnKeyPress = FlatComboBox2KeyPress
    end
    object DBGrid1: TDBGrid
      Left = 72
      Top = 104
      Width = 249
      Height = 113
      Color = clTeal
      DataSource = DataSource1
      FixedColor = clTeal
      TabOrder = 2
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
    end
  end
  object ADOQuery1: TADOQuery
    Connection = dm.ADOConnection1
    Parameters = <>
    Left = 280
    Top = 264
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 320
    Top = 264
  end
end