unit1.~dfm

小弟撰寫的類神經網路backpropagataion,可以train如xor等互斥問題,使用bcb所完成,因為開發介面較為便利, 大部分使用類別的方法撰寫,所以若有興趣移植到vc的朋友,應該也不會有

object Form1: TForm1
  Left = 318
  Top = 0
  Width = 799
  Height = 766
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 8
    Top = 232
    Width = 761
    Height = 273
    Caption = 'Training data'
    TabOrder = 0
    object ListBox1: TListBox
      Left = 16
      Top = 24
      Width = 209
      Height = 209
      ItemHeight = 13
      TabOrder = 0
    end
    object Button1: TButton
      Left = 16
      Top = 240
      Width = 65
      Height = 25
      Caption = 'Training'
      TabOrder = 1
      OnClick = Button1Click
    end
    object ListBox2: TListBox
      Left = 240
      Top = 24
      Width = 273
      Height = 209
      ItemHeight = 13
      TabOrder = 2
    end
    object ListBox3: TListBox
      Left = 528
      Top = 24
      Width = 217
      Height = 209
      ItemHeight = 13
      TabOrder = 3
    end
  end
  object GroupBox2: TGroupBox
    Left = 8
    Top = 8
    Width = 761
    Height = 217
    Caption = 'Input'
    TabOrder = 1
    object Label1: TLabel
      Left = 16
      Top = 48
      Width = 53
      Height = 13
      Caption = 'Learn Rate'
    end
    object Label2: TLabel
      Left = 16
      Top = 88
      Width = 48
      Height = 13
      Caption = 'Error Rate'
    end
    object Label3: TLabel
      Left = 16
      Top = 168
      Width = 60
      Height = 13
      Caption = 'Max Counter'
    end
    object Label4: TLabel
      Left = 16
      Top = 128
      Width = 60
      Height = 13
      Caption = 'Hidden num.'
    end
    object Label5: TLabel
      Left = 160
      Top = 48
      Width = 48
      Height = 13
      Caption = 'Data Num'
    end
    object Label6: TLabel
      Left = 160
      Top = 88
      Width = 53
      Height = 13
      Caption = 'Input Index'
    end
    object Label7: TLabel
      Left = 152
      Top = 128
      Width = 61
      Height = 13
      Caption = 'Output Index'
    end
    object Input_Vaule: TLabel
      Left = 312
      Top = 64
      Width = 57
      Height = 13
      Caption = 'Input_Vaule'
    end
    object Output_Vaule: TLabel
      Left = 312
      Top = 104
      Width = 65
      Height = 13
      Caption = 'Output_Vaule'
    end
    object ComboBox2: TComboBox
      Left = 216
      Top = 48
      Width = 65
      Height = 21
      ItemHeight = 13
      TabOrder = 0
      Text = '4'
      Items.Strings = (
        '1'
        '2'
        '3'
        '4'
        '5'
        '6'
        '7'
        '8'
        '9'
        '10')
    end
    object Edit1: TEdit
      Left = 88
      Top = 48
      Width = 57
      Height = 21
      TabOrder = 1
      Text = '0.6'
    end
    object Edit2: TEdit
      Left = 88
      Top = 88
      Width = 57
      Height = 21
      TabOrder = 2
      Text = '0.4'
    end
    object Edit3: TEdit
      Left = 88
      Top = 128
      Width = 57
      Height = 21
      TabOrder = 3
      Text = '20'
    end
    object Edit4: TEdit
      Left = 88
      Top = 168
      Width = 57
      Height = 21
      TabOrder = 4
      Text = '500'
    end
    object ComboBox3: TComboBox
      Left = 216
      Top = 128
      Width = 65
      Height = 21
      ItemHeight = 13
      TabOrder = 5
      Text = '1'
      Items.Strings = (
        '1'
        '2'
        '3'
        '4'
        '5'
        '6'
        '7'
        '8'
        '9'
        '10')
    end
    object ComboBox1: TComboBox
      Left = 216
      Top = 88
      Width = 65
      Height = 21
      ItemHeight = 13
      TabOrder = 6
      Text = '2'
      Items.Strings = (
        '1'
        '2'
        '3'
        '4'
        '5'
        '6'
        '7'
        '8'
        '9'
        '10')
    end
    object Edit5: TEdit
      Left = 384
      Top = 64
      Width = 57
      Height = 21
      TabOrder = 7
      Text = '01'
    end
    object Edit6: TEdit
      Left = 384
      Top = 104
      Width = 57
      Height = 21
      TabOrder = 8
      Text = '1'
    end
    object Button3: TButton
      Left = 472
      Top = 88
      Width = 41
      Height = 17
      Caption = '--->'
      TabOrder = 9
      OnClick = Button3Click
    end
    object ListBox5: TListBox
      Left = 536
      Top = 16
      Width = 209
      Height = 193
      ItemHeight = 13
      TabOrder = 10
    end
  end
  object GroupBox3: TGroupBox
    Left = 8
    Top = 512
    Width = 761
    Height = 209
    Caption = 'Output'
    TabOrder = 2
    object ListBox4: TListBox
      Left = 16
      Top = 24
      Width = 193
      Height = 145
      ItemHeight = 13
      TabOrder = 0
    end
    object Button2: TButton
      Left = 16
      Top = 176
      Width = 75
      Height = 25
      Caption = 'Test'
      TabOrder = 1
      OnClick = Button2Click
    end
  end
end