smain.~dfm

用delphi编写的人工智能中的过河问题的源码

object Form1: TForm1
  Left = 233
  Top = 109
  BorderStyle = bsDialog
  Caption = #20462#36947#22763#36807#27827#38382#39064
  ClientHeight = 579
  ClientWidth = 507
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 507
    Height = 579
    Align = alClient
    BevelInner = bvLowered
    BevelOuter = bvSpace
    BorderWidth = 2
    TabOrder = 0
    object Panel2: TPanel
      Left = 4
      Top = 4
      Width = 301
      Height = 571
      Align = alLeft
      TabOrder = 0
      object Label1: TLabel
        Left = 45
        Top = 24
        Width = 210
        Height = 29
        AutoSize = False
        Caption = #20462#36947#22763#36807#27827#38382#39064
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -29
        Font.Name = #26999#20307'_GB2312'
        Font.Style = []
        ParentFont = False
      end
      object GroupBox1: TGroupBox
        Left = 15
        Top = 64
        Width = 270
        Height = 265
        Caption = #28436#31034#22270
        TabOrder = 0
        object Panel4: TPanel
          Left = 2
          Top = 15
          Width = 90
          Height = 248
          Align = alLeft
          Caption = #24038#23736
          TabOrder = 0
          object sbLM1: TSpeedButton
            Left = 33
            Top = 17
            Width = 25
            Height = 24
            Flat = True
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
          end
          object sbLM2: TSpeedButton
            Left = 32
            Top = 49
            Width = 25
            Height = 24
            Flat = True
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
          end
          object sbLM3: TSpeedButton
            Left = 32
            Top = 81
            Width = 25
            Height = 24
            Flat = True
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
          end
          object sbLC1: TSpeedButton
            Left = 32
            Top = 145
            Width = 25
            Height = 24
            Flat = True
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
          end
          object sbLC2: TSpeedButton
            Left = 32
            Top = 177
            Width = 25
            Height = 24
            Flat = True
          end
          object sbLC3: TSpeedButton
            Left = 32
            Top = 209
            Width = 25
            Height = 24
            Flat = True
          end
        end
        object Panel5: TPanel
          Left = 178
          Top = 15
          Width = 90
          Height = 248
          Align = alRight
          Caption = #21491#23736
          TabOrder = 1
          object sbRM1: TSpeedButton
            Left = 33
            Top = 17
            Width = 25
            Height = 24
            Flat = True
          end
          object sbRM2: TSpeedButton
            Left = 33
            Top = 48
            Width = 25
            Height = 24
            Flat = True
          end
          object sbRM3: TSpeedButton
            Left = 33
            Top = 80
            Width = 25
            Height = 24
            Flat = True
          end
          object sbRC1: TSpeedButton
            Left = 33
            Top = 144
            Width = 25
            Height = 24
            Flat = True
          end
          object sbRC2: TSpeedButton
            Left = 33
            Top = 176
            Width = 25
            Height = 24
            Flat = True
          end
          object sbRC3: TSpeedButton
            Left = 33
            Top = 208
            Width = 25
            Height = 24
            Flat = True
          end
        end
        object Panel6: TPanel
          Left = 92
          Top = 15
          Width = 86
          Height = 248
          Align = alClient
          Caption = #27827#36947
          Color = clWhite
          TabOrder = 2
          object sbB1: TSpeedButton
            Left = 14
            Top = 40
            Width = 25
            Height = 24
            Flat = True
          end
          object sbB2: TSpeedButton
            Left = 46
            Top = 40
            Width = 25
            Height = 24
            Flat = True
          end
        end
      end
      object GroupBox2: TGroupBox
        Left = 16
        Top = 336
        Width = 270
        Height = 233
        Caption = #28436#31034#27969#31243
        TabOrder = 1
        object RichEdit1: TRichEdit
          Left = 7
          Top = 20
          Width = 257
          Height = 209
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          ReadOnly = True
          ScrollBars = ssVertical
          TabOrder = 0
        end
      end
    end
    object Panel3: TPanel
      Left = 305
      Top = 4
      Width = 198
      Height = 571
      Align = alClient
      TabOrder = 1
      object GroupBox3: TGroupBox
        Left = 1
        Top = 1
        Width = 196
        Height = 120
        Align = alTop
        Caption = #28436#31034#25805#20316
        TabOrder = 0
        object Button1: TButton
          Left = 15
          Top = 24
          Width = 75
          Height = 33
          Caption = #33258#21160#28436#31034
          TabOrder = 0
          OnClick = Button1Click
        end
        object Button2: TButton
          Left = 15
          Top = 72
          Width = 75
          Height = 33
          Caption = #33258#25105#20171#32461
          TabOrder = 1
          OnClick = Button2Click
        end
        object Button3: TButton
          Left = 105
          Top = 72
          Width = 75
          Height = 33
          Caption = #36864#20986
          TabOrder = 2
          OnClick = Button3Click
        end
        object Button4: TButton
          Left = 105
          Top = 24
          Width = 75
          Height = 33
          Caption = #20445#23384#32467#26524
          TabOrder = 3
          OnClick = Button4Click
        end
      end
      object RichEdit2: TRichEdit
        Left = 1
        Top = 121
        Width = 196
        Height = 449
        Align = alClient
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        ReadOnly = True
        TabOrder = 1
      end
    end
  end
  object SaveDialog1: TSaveDialog
    Left = 268
    Top = 4
  end
end