som.dfm

使用SOM(Self-Organization Map)進行資料分群

      object Edit_R: TEdit
        Left = 144
        Top = 88
        Width = 40
        Height = 21
        Font.Charset = CHINESEBIG5_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ImeName = #20013#25991' ('#32321#39636') - '#20489#38945
        ParentFont = False
        TabOrder = 5
        Text = '2.5'
      end
      object Edit_SIZE: TEdit
        Left = 144
        Top = 56
        Width = 40
        Height = 21
        Font.Charset = CHINESEBIG5_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ImeName = #20013#25991' ('#32321#39636') - '#20489#38945
        ParentFont = False
        TabOrder = 6
        Text = '3'
      end
      object Edit_learn: TEdit
        Left = 144
        Top = 24
        Width = 40
        Height = 21
        Font.Charset = CHINESEBIG5_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ImeName = #20013#25991' ('#32321#39636') - '#20489#38945
        ParentFont = False
        TabOrder = 7
        Text = '100'
      end
      object CheckBox_Output1: TCheckBox
        Left = 8
        Top = 312
        Width = 217
        Height = 17
        Caption = #26159#21542#36664#20986#20998#32676#22519#34892#32080#26524
        Font.Charset = CHINESEBIG5_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 8
      end
    end
    object GroupBox2: TGroupBox
      Left = 1
      Top = 337
      Width = 242
      Height = 225
      Align = alClient
      Caption = #22519#34892#32080#26524
      Font.Charset = CHINESEBIG5_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      object Memo1: TMemo
        Left = 2
        Top = 18
        Width = 238
        Height = 205
        Align = alClient
        Font.Charset = CHINESEBIG5_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ImeName = #20013#25991' ('#32321#39636') - '#33521#25976
        ParentFont = False
        ScrollBars = ssBoth
        TabOrder = 0
      end
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 585
    Height = 563
    Align = alClient
    Caption = 'Panel2'
    TabOrder = 1
    object Chart1: TChart
      Left = 1
      Top = 1
      Width = 583
      Height = 561
      AnimatedZoom = True
      BackWall.Brush.Color = clWhite
      BackWall.Brush.Style = bsClear
      Title.Font.Charset = DEFAULT_CHARSET
      Title.Font.Color = clBlue
      Title.Font.Height = -16
      Title.Font.Name = 'Arial'
      Title.Font.Style = []
      Title.Text.Strings = (
        'TChart')
      BottomAxis.ExactDateTime = False
      LeftAxis.Title.Font.Charset = DEFAULT_CHARSET
      LeftAxis.Title.Font.Color = clBlack
      LeftAxis.Title.Font.Height = -16
      LeftAxis.Title.Font.Name = 'Arial'
      LeftAxis.Title.Font.Style = []
      Legend.ShadowSize = 1
      Legend.Visible = False
      RightAxis.Automatic = False
      RightAxis.AutomaticMaximum = False
      RightAxis.AutomaticMinimum = False
      TopAxis.Automatic = False
      TopAxis.AutomaticMaximum = False
      TopAxis.AutomaticMinimum = False
      TopAxis.Title.Font.Charset = DEFAULT_CHARSET
      TopAxis.Title.Font.Color = clBlack
      TopAxis.Title.Font.Height = -13
      TopAxis.Title.Font.Name = 'Arial'
      TopAxis.Title.Font.Style = []
      View3D = False
      View3DOptions.Elevation = 338
      Align = alClient
      TabOrder = 0
      object Series1: TPointSeries
        Marks.ArrowLength = 0
        Marks.BackColor = clWhite
        Marks.Font.Charset = DEFAULT_CHARSET
        Marks.Font.Color = clBlack
        Marks.Font.Height = -8
        Marks.Font.Name = 'Arial'
        Marks.Font.Style = []
        Marks.Frame.Visible = False
        Marks.Style = smsValue
        Marks.Transparent = True
        Marks.Visible = False
        SeriesColor = clRed
        OnGetPointerStyle = Series1GetPointerStyle
        Pointer.InflateMargins = True
        Pointer.Pen.Visible = False
        Pointer.Style = psRectangle
        Pointer.Visible = True
        XValues.DateTime = False
        XValues.Name = 'X'
        XValues.Multiplier = 1
        XValues.Order = loAscending
        YValues.DateTime = False
        YValues.Name = 'Y'
        YValues.Multiplier = 1
        YValues.Order = loNone
      end
    end
  end
  object ToolBar1: TToolBar
    Left = 0
    Top = 563
    Width = 829
    Height = 45
    Align = alBottom
    ButtonHeight = 39
    Caption = 'ToolBar1'
    TabOrder = 2
    object Btn_Run: TBitBtn
      Left = 0
      Top = 2
      Width = 153
      Height = 39
      Caption = #22519#34892' Run'
      Font.Charset = CHINESEBIG5_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = Btn_RunClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
        555555555555555555555555555555555555555555FF55555555555559055555
        55555555577FF5555555555599905555555555557777F5555555555599905555
        555555557777FF5555555559999905555555555777777F555555559999990555
        5555557777777FF5555557990599905555555777757777F55555790555599055
        55557775555777FF5555555555599905555555555557777F5555555555559905
        555555555555777FF5555555555559905555555555555777FF55555555555579
        05555555555555777FF5555555555557905555555555555777FF555555555555
        5990555555555555577755555555555555555555555555555555}
      NumGlyphs = 2
    end
    object BitBtnReset: TBitBtn
      Left = 153
      Top = 2
      Width = 160
      Height = 39
      Caption = #37325#32622' Reset'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      OnClick = BitBtnResetClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
        555557777F777555F55500000000555055557777777755F75555005500055055
        555577F5777F57555555005550055555555577FF577F5FF55555500550050055
        5555577FF77577FF555555005050110555555577F757777FF555555505099910
        555555FF75777777FF555005550999910555577F5F77777775F5500505509990
        3055577F75F77777575F55005055090B030555775755777575755555555550B0
        B03055555F555757575755550555550B0B335555755555757555555555555550
        BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
        50BB555555555555575F555555555555550B5555555555555575}
      NumGlyphs = 2
    end
    object BitBtn_Close: TBitBtn
      Left = 313
      Top = 2
      Width = 164
      Height = 39
      Caption = #32080#26463' Close'
      Font.Charset = CHINESEBIG5_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      OnClick = BitBtn_CloseClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
        03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB
        0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB
        0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB
        0333337F777FFFFF7F3333000000000003333377777777777333}
      NumGlyphs = 2
    end
  end
  object MainMenu1: TMainMenu
    Left = 184
    Top = 8
    object N1: TMenuItem
      Caption = #27284#26696
      object N579txt: TMenuItem
        Caption = '579'
        OnClick = N579txtClick
      end
      object N50txt1: TMenuItem
        Caption = '50'
        OnClick = N50txt1Click
      end
    end
    object N2: TMenuItem
      Caption = #32080#26463
      OnClick = N2Click
    end
  end
  object OpenDialog1: TOpenDialog
    Left = 224
    Top = 8
  end
end