about.~dfm

九宫格的A*算法实现 可以选择两个估价函数

object frm_about: Tfrm_about
  Left = 354
  Top = 200
  BorderStyle = bsDialog
  Caption = #20851#20110
  ClientHeight = 248
  ClientWidth = 314
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  Icon.Data = {
    0000010001002020100000000000E80200001600000028000000200000004000
    0000010004000000000080020000000000000000000000000000000000000000
    000000008000008000000080800080000000800080008080000080808000C0C0
    C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000330000000000000000000000033303303303300000000000000
    0003303330333003003300000000000000033003330330002333000000000000
    0030000033003033333000000000000033333330000003330003330000000803
    33333333333333300233330000000F033333333333333302333BB03000004F83
    33333333333333333BB003BB00004FF3333333333333B33BB0033BBB00004FF3
    33333333B3BB3BB0033BBBB000004FF83B333B3B3B3BBBB03BBBBB0300F04FFF
    33B3B3B3BBBBBBBBBBBB00330FF04FFF8B3B3333BBBBBBBBBB0033330FF044FF
    F8BBB03033BBBBB330333330FFF444FFF8BB0BB3003B330003333330FF44444F
    F88B3BBB300000033333B33FFF44444FFF3BB0BBB3000333B33BB38FF4444444
    FF003B0BB333333BBBBBB3FFF44444444FF00030BBBBBBBBBBBBBBFF44444444
    0000000303BBB3300000BFF444444400000000000000000000000FF444440000
    0000000000000000000000444444000000000000000000000000000044440000
    0000000000000000000000000444000000000000000000000000000000040000
    000000000000000000000000000000000000000000000000000000000000FFFF
    FFFFFFFFFFFFFFFF1FFFFF8003FFFC0000FFF800007FF800007FE000003F0000
    001F0000001F0000000F00000007000000070000000000000000000000000000
    00000000000000000000000000000000000000000000000000000000000000C0
    00000FE01F003FFFFF80FFFFFFC0FFFFFFF0FFFFFFF8FFFFFFFEFFFFFFFF}
  OldCreateOrder = True
  Position = poMainFormCenter
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object Panel1: TPanel
    Left = 16
    Top = 16
    Width = 281
    Height = 201
    BevelOuter = bvNone
    ParentColor = True
    TabOrder = 0
    object ProgramIcon: TImage
      Left = 8
      Top = 16
      Width = 32
      Height = 32
      AutoSize = True
      IsControl = True
    end
    object ProductName: TLabel
      Left = 56
      Top = 0
      Width = 60
      Height = 12
      Caption = #36719#20214#21517#31216#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      IsControl = True
    end
    object Version: TLabel
      Left = 56
      Top = 16
      Width = 60
      Height = 12
      Caption = #36719#20214#24615#36136#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      IsControl = True
    end
    object Copyright: TLabel
      Left = 56
      Top = 32
      Width = 60
      Height = 12
      Caption = #29256#26435#25152#26377#65306
      IsControl = True
    end
    object Bevel1: TBevel
      Left = 0
      Top = 112
      Width = 281
      Height = 7
      Shape = bsBottomLine
    end
    object lblOs: TLabel
      Left = 8
      Top = 72
      Width = 60
      Height = 12
      Caption = #25805#20316#31995#32479#65306
      IsControl = True
    end
    object lblMemory: TLabel
      Left = 8
      Top = 96
      Width = 60
      Height = 12
      Caption = #21487#29992#20869#23384#65306
      IsControl = True
    end
    object Others: TLabel
      Left = 8
      Top = 128
      Width = 265
      Height = 57
      AutoSize = False
      Caption = 'Others'
      WordWrap = True
    end
    object Author: TLabel
      Left = 56
      Top = 48
      Width = 60
      Height = 12
      Caption = #20316'    '#32773#65306
      IsControl = True
    end
    object Bevel2: TBevel
      Left = 0
      Top = 192
      Width = 281
      Height = 1
      Shape = bsBottomLine
    end
  end
  object BitBtn1: TBitBtn
    Left = 105
    Top = 216
    Width = 88
    Height = 25
    Caption = #30830#23450'[&O]'
    Default = True
    ModalResult = 2
    TabOrder = 1
    OnClick = BitBtn1Click
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000010000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333330000333333333333333333333333F33333333333
      00003333344333333333333333388F3333333333000033334224333333333333
      338338F3333333330000333422224333333333333833338F3333333300003342
      222224333333333383333338F3333333000034222A22224333333338F338F333
      8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
      33333338F83338F338F33333000033A33333A222433333338333338F338F3333
      0000333333333A222433333333333338F338F33300003333333333A222433333
      333333338F338F33000033333333333A222433333333333338F338F300003333
      33333333A222433333333333338F338F00003333333333333A22433333333333
      3338F38F000033333333333333A223333333333333338F830000333333333333
      333A333333333333333338330000333333333333333333333333333333333333
      0000}
    NumGlyphs = 2
  end
end