📄 unit1.~dfm

📁 很好运筹学的DEOPHI原代码.包括动态规划,原始单纯形法,对策论,决策论等
💻 ~DFM
字号:
object Form1: TForm1
  Left = 241
  Top = 152
  Width = 577
  Height = 346
  Caption = #29983#20135#25209#37327#27169#22411
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 16
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 569
    Height = 319
    Align = alClient
    BevelOuter = bvLowered
    TabOrder = 0
    object Label1: TLabel
      Left = 32
      Top = 20
      Width = 73
      Height = 25
      AutoSize = False
      Caption = #27169#22411#31867#22411#65306
    end
    object ComboBox1: TComboBox
      Left = 114
      Top = 13
      Width = 121
      Height = 28
      BevelInner = bvLowered
      BevelKind = bkTile
      BevelOuter = bvSpace
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ItemHeight = 20
      ItemIndex = 0
      ParentFont = False
      TabOrder = 0
      Text = #19981#20801#35768#32570#36135
      OnChange = ComboBox1Change
      Items.Strings = (
        #19981#20801#35768#32570#36135
        #20801#35768#32570#36135)
    end
    object GroupBox1: TGroupBox
      Left = 8
      Top = 48
      Width = 265
      Height = 225
      Ctl3D = True
      ParentCtl3D = False
      TabOrder = 1
      object Label2: TLabel
        Left = 24
        Top = 29
        Width = 73
        Height = 17
        AutoSize = False
        Caption = #29983#20135#36153'Cc'
      end
      object Label3: TLabel
        Left = 24
        Top = 54
        Width = 81
        Height = 17
        AutoSize = False
        Caption = #20445#31649#36153'Cp'
      end
      object Label4: TLabel
        Left = 24
        Top = 79
        Width = 73
        Height = 17
        AutoSize = False
        Caption = #32570#36135#36153'Cs'
      end
      object Label6: TLabel
        Left = 10
        Top = 117
        Width = 215
        Height = 16
        AutoSize = False
        Caption = #21333#20301#26102#38388#20869#23545#36135#29289#30340#38656#27714#37327'D'
      end
      object Label10: TLabel
        Left = 10
        Top = 173
        Width = 207
        Height = 16
        AutoSize = False
        Caption = #21333#20301#26102#38388#20869#36135#29289#30340#34917#20805#37327'P'
      end
      object Edit1: TEdit
        Left = 96
        Top = 24
        Width = 121
        Height = 24
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 0
        Text = '5'
      end
      object Edit2: TEdit
        Left = 96
        Top = 49
        Width = 121
        Height = 24
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 1
        Text = '0.4'
      end
      object Edit3: TEdit
        Left = 96
        Top = 74
        Width = 121
        Height = 24
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 2
      end
      object Edit5: TEdit
        Left = 160
        Top = 137
        Width = 89
        Height = 24
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 3
        Text = '100'
      end
      object Edit10: TEdit
        Left = 160
        Top = 193
        Width = 89
        Height = 24
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 4
        Text = '500'
      end
    end
    object BitBtn1: TBitBtn
      Left = 184
      Top = 280
      Width = 81
      Height = 33
      Caption = #35745#31639
      TabOrder = 2
      OnClick = BitBtn1Click
      Kind = bkOK
    end
    object BitBtn2: TBitBtn
      Left = 280
      Top = 280
      Width = 81
      Height = 33
      Caption = #36864#20986
      Default = True
      ModalResult = 3
      TabOrder = 3
      OnClick = BitBtn2Click
      Glyph.Data = {
        DE010000424DDE01000000000000760000002800000024000000120000000100
        0400000000006801000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333333333333333000033338833333333333333333F333333333333
        0000333911833333983333333388F333333F3333000033391118333911833333
        38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
        911118111118333338F3338F833338F3000033333911111111833333338F3338
        3333F8330000333333911111183333333338F333333F83330000333333311111
        8333333333338F3333383333000033333339111183333333333338F333833333
        00003333339111118333333333333833338F3333000033333911181118333333
        33338333338F333300003333911183911183333333383338F338F33300003333
        9118333911183333338F33838F338F33000033333913333391113333338FF833
        38F338F300003333333333333919333333388333338FFF830000333333333333
        3333333333333333333888330000333333333333333333333333333333333333
        0000}
      NumGlyphs = 2
    end
    object GroupBox3: TGroupBox
      Left = 272
      Top = 46
      Width = 289
      Height = 227
      Caption = #36755#20986
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 4
      object Label8: TLabel
        Left = 28
        Top = 51
        Width = 113
        Height = 20
        AutoSize = False
        Caption = #26368#20248#29983#20135#25209#37327'Q'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label9: TLabel
        Left = 27
        Top = 81
        Width = 114
        Height = 24
        AutoSize = False
        Caption = #26368#20248#29983#20135#21608#26399't'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label11: TLabel
        Left = 44
        Top = 107
        Width = 105
        Height = 21
        AutoSize = False
        Caption = #26368#23567#24635#36153#29992'f'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label7: TLabel
        Left = 11
        Top = 156
        Width = 123
        Height = 20
        Caption = #26368#22823#20801#35768#32570#36135#37327'S'
      end
      object Label5: TLabel
        Left = 43
        Top = 132
        Width = 93
        Height = 20
        Caption = #26368#22823#23384#20648#37327'M'
      end
      object Edit6: TEdit
        Left = 143
        Top = 50
        Width = 121
        Height = 24
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ParentFont = False
        TabOrder = 0
      end
      object Edit7: TEdit
        Left = 143
        Top = 76
        Width = 121
        Height = 24
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ParentFont = False
        TabOrder = 1
      end
      object Edit9: TEdit
        Left = 143
        Top = 154
        Width = 121
        Height = 24
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ParentFont = False
        TabOrder = 2
      end
      object Edit8: TEdit
        Left = 143
        Top = 102
        Width = 121
        Height = 24
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ParentFont = False
        TabOrder = 3
      end
      object Edit4: TEdit
        Left = 143
        Top = 128
        Width = 121
        Height = 24
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ParentFont = False
        TabOrder = 4
      end
    end
  end
end
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -