unit1.dfm

运筹学算法与编程实践附书源码

object Form1: TForm1
  Left = 185
  Top = 109
  Width = 661
  Height = 467
  Caption = #31351#20030#27861#35299'0-1'#35268#21010#65293'>'#25968#25454#36755#20837
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = [fsBold]
  OldCreateOrder = False
  Position = poScreenCenter
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 16
  object Panel3: TPanel
    Left = 0
    Top = 57
    Width = 653
    Height = 88
    Align = alTop
    BevelInner = bvLowered
    TabOrder = 0
    object StringGrid1: TStringGrid
      Left = 113
      Top = 2
      Width = 538
      Height = 84
      Align = alClient
      ColCount = 4
      FixedColor = cl3DLight
      RowCount = 2
      Font.Charset = GB2312_CHARSET
      Font.Color = clGreen
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goColSizing, goRowMoving, goEditing, goTabs, goAlwaysShowEditor]
      ParentFont = False
      TabOrder = 1
      RowHeights = (
        24
        24)
    end
    object Panel1: TPanel
      Left = 2
      Top = 2
      Width = 111
      Height = 84
      Align = alLeft
      BevelInner = bvLowered
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      object RadioGroup1: TRadioGroup
        Left = 16
        Top = 8
        Width = 81
        Height = 65
        Caption = #30446#26631#20989#25968
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clGreen
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ItemIndex = 0
        Items.Strings = (
          'Max'
          'Min')
        ParentFont = False
        TabOrder = 0
        OnClick = RadioGroup1Click
      end
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 653
    Height = 57
    Align = alTop
    BevelInner = bvLowered
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    object Label1: TLabel
      Left = 8
      Top = 24
      Width = 121
      Height = 16
      AutoSize = False
      Caption = #35831#36755#20837#21464#37327#20010#25968#65306
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGreen
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label2: TLabel
      Left = 208
      Top = 24
      Width = 161
      Height = 16
      AutoSize = False
      Caption = #35831#36755#20837#32422#26463#26465#20214#20010#25968#65306
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGreen
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Edit1: TEdit
      Left = 144
      Top = 16
      Width = 49
      Height = 24
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      Text = '3'
    end
    object Edit2: TEdit
      Left = 376
      Top = 16
      Width = 49
      Height = 24
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      Text = '2'
    end
    object BitBtn2: TBitBtn
      Left = 456
      Top = 16
      Width = 65
      Height = 25
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 2
      OnClick = BitBtn2Click
      Kind = bkOK
    end
  end
  object Panel4: TPanel
    Left = 0
    Top = 145
    Width = 653
    Height = 295
    Align = alClient
    BevelInner = bvLowered
    TabOrder = 2
    object StringGrid2: TStringGrid
      Left = 2
      Top = 41
      Width = 563
      Height = 252
      Align = alClient
      ColCount = 3
      FixedColor = cl3DLight
      FixedCols = 0
      Font.Charset = GB2312_CHARSET
      Font.Color = clGreen
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goColSizing, goRowMoving, goColMoving, goEditing, goTabs, goAlwaysShowEditor]
      ParentFont = False
      TabOrder = 2
    end
    object Panel5: TPanel
      Left = 565
      Top = 41
      Width = 86
      Height = 252
      Align = alRight
      BevelInner = bvLowered
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      object BitBtn1: TBitBtn
        Left = 8
        Top = 112
        Width = 65
        Height = 25
        Caption = #36864#20986
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 0
        Kind = bkClose
      end
      object BitBtn3: TBitBtn
        Left = 8
        Top = 24
        Width = 65
        Height = 25
        Caption = #35745#31639
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 1
        OnClick = BitBtn3Click
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
          000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
          00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
          F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
          0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
          FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
          FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
          0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
          00333377737FFFFF773333303300000003333337337777777333}
        NumGlyphs = 2
      end
    end
    object Panel6: TPanel
      Left = 2
      Top = 2
      Width = 649
      Height = 39
      Align = alTop
      Alignment = taLeftJustify
      BevelInner = bvLowered
      Caption = #35831#22312#19979#38754#30340#34920#26684#37324#36755#20837#32422#26463#26465#20214#21508#21442#25968#65288#36816#31639#31526#29992'1'#12289'0'#12289'-1'#34920#31034#22823#20110#12289#31561#20110#12289#23567#20110#65289#65306
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGreen
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
    end
  end
end