📄 frmmain.dfm
字号:
object FormMain: TFormMain
Left = 182
Top = 225
Width = 730
Height = 456
Caption = 'Experiment for TSPSA by Amber'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Graph: TImage
Left = 8
Top = 16
Width = 400
Height = 400
end
object Label1: TLabel
Left = 416
Top = 88
Width = 51
Height = 13
Caption = 'Parameter:'
end
object Label2: TLabel
Left = 416
Top = 248
Width = 28
Height = 13
Caption = 'State:'
end
object Label3: TLabel
Left = 416
Top = 16
Width = 3
Height = 13
end
object BitBtn1: TBitBtn
Left = 632
Top = 232
Width = 75
Height = 25
Caption = 'Compute'
TabOrder = 0
OnClick = BitBtn1Click
end
object Info: TMemo
Left = 417
Top = 264
Width = 290
Height = 149
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
Lines.Strings = (
''
''
''
''
''
''
'')
ReadOnly = True
ScrollBars = ssVertical
TabOrder = 1
end
object ValueList: TValueListEditor
Left = 416
Top = 104
Width = 289
Height = 121
Strings.Strings = (
'CityNum=100'
'DataFile='
'PrimeTemperature=300'
'MarkovLength=13000'
'DiminishedRate=0.9'
'AIM_Limit=100'
'Diminish_Times_Limit=2000')
TabOrder = 2
ColWidths = (
150
117)
end
object BitBtn2: TBitBtn
Left = 552
Top = 232
Width = 75
Height = 25
Caption = 'Step'
TabOrder = 3
OnClick = BitBtn2Click
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -