unit1.~dfm

用delphi语言实现运筹学黄金分割法程序

object Form1: TForm1
  Left = 384
  Top = 192
  Width = 445
  Height = 181
  AutoSize = True
  Caption = #40644#37329#20998#21106#27861
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 437
    Height = 154
    ActivePage = TabSheet1
    Align = alClient
    TabIndex = 0
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = 'TabSheet1'
      object Label1: TLabel
        Left = 46
        Top = 43
        Width = 70
        Height = 13
        AutoSize = False
        Caption = #26368#39640#27425#25968'n'
      end
      object Label3: TLabel
        Left = 34
        Top = 12
        Width = 87
        Height = 13
        AutoSize = False
        Caption = #21306#38388#31471#28857'a,b'
      end
      object Label4: TLabel
        Left = 54
        Top = 74
        Width = 62
        Height = 13
        AutoSize = False
        Caption = #20801#35768#35823#24046
      end
      object Button1: TButton
        Left = 256
        Top = 107
        Width = 75
        Height = 25
        Caption = #30830#23450
        TabOrder = 0
        OnClick = Button1Click
      end
      object Edit1: TEdit
        Left = 120
        Top = 8
        Width = 49
        Height = 21
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 1
      end
      object Edit2: TEdit
        Left = 184
        Top = 8
        Width = 49
        Height = 21
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 2
      end
      object Edit3: TEdit
        Left = 120
        Top = 39
        Width = 49
        Height = 21
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 3
        OnKeyPress = Edit3KeyPress
      end
      object Edit4: TEdit
        Left = 120
        Top = 70
        Width = 49
        Height = 21
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 4
      end
      object Button4: TButton
        Left = 343
        Top = 107
        Width = 75
        Height = 25
        Caption = #36864#20986
        TabOrder = 5
        OnClick = Button4Click
      end
    end
    object TabSheet2: TTabSheet
      Caption = 'TabSheet2'
      ImageIndex = 1
      object Label2: TLabel
        Left = 24
        Top = 16
        Width = 209
        Height = 13
        AutoSize = False
        Caption = #30001#39640#33267#20302#36755#20837'n'#27425#39033#21069#38754#30340#31995#25968#65306
      end
      object Button2: TButton
        Left = 256
        Top = 107
        Width = 75
        Height = 25
        Caption = #35745#31639
        TabOrder = 0
        OnClick = Button2Click
      end
      object Button3: TButton
        Left = 343
        Top = 107
        Width = 75
        Height = 25
        Caption = #36864#20986
        TabOrder = 1
        OnClick = Button3Click
      end
    end
  end
end