unit1.dfm

最短路径之娃娃找草莓Demodelphi源码 控件类源码windows平台

object Form1: TForm1
  Left = 172
  Top = 96
  Width = 815
  Height = 636
  Caption = 'AI  '#34394#31481#21644#23578
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object tempmap: TImage
    Left = 562
    Top = 562
    Width = 40
    Height = 40
    Visible = False
  end
  object Edit: TEdit
    Left = 504
    Top = 24
    Width = 57
    Height = 21
    TabOrder = 0
    Text = #25968#23383#22320#22270
    Visible = False
  end
  object SeSkinScrollBox1: TSeSkinScrollBox
    Left = 0
    Top = 0
    Width = 670
    Height = 609
    Align = alClient
    TabOrder = 1
    SkinObject = 'ScrollBox'
    object Image: TImage
      Left = 5
      Top = 5
      Width = 1200
      Height = 1200
    end
    object display: TImage
      Left = 0
      Top = 0
      Width = 1205
      Height = 1205
      Align = alClient
      Stretch = True
      Visible = False
    end
  end
  object SeSkinPanel1: TSeSkinPanel
    Left = 670
    Top = 0
    Width = 137
    Height = 609
    Performance = kspNoBuffer
    Transparent = False
    Align = alRight
    AnimateRoll = False
    BevelWidth = 1
    BorderWidth = 3
    ButtonKind = pbkRoll
    Caption = #33756#21333
    Rolled = False
    ParentRoll = False
    ShowBevel = True
    ShowButton = False
    ShowCaption = True
    SkinObject = 'Panel'
    NormalHeight = {00000000}
    object Button1: TButton
      Left = 15
      Top = 24
      Width = 78
      Height = 21
      Caption = #23450#21046#22320#22270
      TabOrder = 0
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 15
      Top = 66
      Width = 78
      Height = 21
      Caption = #25628#32034#36335#24452
      TabOrder = 1
      OnClick = Button2Click
    end
    object Button5: TButton
      Left = 15
      Top = 133
      Width = 78
      Height = 21
      Caption = #36864#20986
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      OnClick = Button5Click
    end
    object ListBox1: TListBox
      Left = 13
      Top = 160
      Width = 104
      Height = 73
      ItemHeight = 13
      TabOrder = 3
    end
    object messagelistbox: TListBox
      Left = 13
      Top = 232
      Width = 104
      Height = 69
      ItemHeight = 13
      TabOrder = 4
    end
    object ScrollBox1: TScrollBox
      Left = 13
      Top = 304
      Width = 125
      Height = 161
      TabOrder = 5
      object Edit2: TEdit
        Left = 4
        Top = 17
        Width = 100
        Height = 19
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = '@DotumChe'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        Text = 'A00101000000000'
      end
      object Edit3: TEdit
        Left = 4
        Top = 32
        Width = 100
        Height = 19
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = '@DotumChe'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        Text = '110101000000000'
      end
      object Edit4: TEdit
        Left = 4
        Top = 47
        Width = 100
        Height = 19
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = '@DotumChe'
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        Text = '000101000000000'
      end
      object Edit5: TEdit
        Left = 4
        Top = 61
        Width = 100
        Height = 19
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = '@DotumChe'
        Font.Style = []
        ParentFont = False
        TabOrder = 3
        Text = '011001000000000'
      end
      object Edit6: TEdit
        Left = 4
        Top = 75
        Width = 100
        Height = 19
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = '@DotumChe'
        Font.Style = []
        ParentFont = False
        TabOrder = 4
        Text = '000011110011100'
      end
      object Edit7: TEdit
        Left = 4
        Top = 89
        Width = 100
        Height = 19
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = '@DotumChe'
        Font.Style = []
        ParentFont = False
        TabOrder = 5
        Text = '000010111001100'
      end
      object Edit1: TEdit
        Left = 4
        Top = -1
        Width = 100
        Height = 19
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = '@DotumChe'
        Font.Style = []