untsuggestword.dfm

简要说明:对医院幼儿心理情况做的一个调查,统计系统.

inherited frmSuggestWord: TfrmSuggestWord
  Left = 541
  Top = 268
  Caption = #24314#35758#25991#23383#35774#32622
  ClientHeight = 597
  ClientWidth = 877
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  inherited imgImgLeft: TImage
    Height = 561
  end
  inherited imgImgRight: TImage
    Left = 860
    Height = 561
  end
  inherited pnlPalTop: TPanel
    Width = 877
    inherited imgImgTC: TImage
      Width = 865
    end
    inherited imgImgTR: TImage
      Left = 871
    end
  end
  inherited pnlBack: TPanel
    Width = 843
    Height = 561
    inherited Panel2: TPanel
      Width = 843
      Height = 530
      object DBGrid1: TDBGrid
        Left = 8
        Top = 8
        Width = 857
        Height = 537
        DataSource = dsWord
        TabOrder = 0
        TitleFont.Charset = ANSI_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -12
        TitleFont.Name = #23435#20307
        TitleFont.Style = []
        Columns = <
          item
            Expanded = False
            FieldName = 'Word'
            Width = 800
            Visible = True
          end>
      end
    end
    inherited pnlBottom: TPanel
      Top = 530
      Width = 843
      inherited Bevel1: TBevel
        Width = 843
      end
      inherited btnCancel: TfcImageBtn
        RegionData = {
          400000002000000001000000020000002000000000000000000000004B000000
          1900000001000000000000004B0000000100000000000000010000004B000000
          19000000}
        DownRegionData = {
          400000002000000001000000020000002000000000000000000000004B000000
          1900000001000000000000004B0000000100000000000000010000004B000000
          19000000}
      end
      inherited btnOK: TfcImageBtn
        RegionData = {
          400000002000000001000000020000002000000000000000000000004B000000
          1900000001000000000000004B0000000100000000000000010000004B000000
          19000000}
        DownRegionData = {
          400000002000000001000000020000002000000000000000000000004B000000
          1900000001000000000000004B0000000100000000000000010000004B000000
          19000000}
      end
    end
  end
  inherited pnl1: TPanel
    Top = 579
    Width = 877
    inherited img2: TImage
      Width = 865
    end
    inherited img3: TImage
      Left = 871
    end
  end
  object adsWord: TADODataSet
    Connection = DM.cnn
    CommandText = 'select * from tSuggestWord'
    Parameters = <>
    Left = 40
    Top = 64
    object adsWordiAutoID: TAutoIncField
      FieldName = 'iAutoID'
      ReadOnly = True
    end
    object adsWordWord: TStringField
      DisplayLabel = #25991#23383
      FieldName = 'Word'
      Size = 2000
    end
  end
  object dsWord: TDataSource
    DataSet = adsWord
    Left = 128
    Top = 64
  end
end