home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC-Online 1998 February
/
PCOnline_02_1998.iso
/
filesbbs
/
win95
/
mtuspeed.exe
/
MTUSpeed.exe
/
0
/
RCDATA
/
TFORM1
/
TFORM1.txt
< prev
Wrap
Text File
|
1997-08-21
|
24KB
|
929 lines
object Form1: TForm1
Left = 224
Top = 142
Hint = 'Right Click for Menu'
HorzScrollBar.Visible = False
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = 'Version No'
ClientHeight = 376
ClientWidth = 348
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Icon.Data = {<image000.ico>}
PopupMenu = PopupMTU
Position = poScreenCenter
OnClose = FormClose
OnCreate = FormCreate
OnShow = ShowForm
PixelsPerInch = 96
TextHeight = 13
object TLabel
Left = 313
Top = 10
Width = 3
Height = 13
Alignment = taRightJustify
end
object Panel14: TPanel
Left = 0
Top = 296
Width = 348
Height = 80
BevelInner = bvLowered
BevelOuter = bvNone
BorderWidth = 1
TabOrder = 0
object BtnMaxMTU: TButton
Left = 10
Top = 45
Width = 105
Height = 25
Hint = 'Change MaxMTU Value'
Caption = 'Change &MaxMTU'
ParentShowHint = False
ShowHint = True
TabOrder = 0
OnClick = BtnMTUClick
end
object BtnDefault: TButton
Left = 10
Top = 10
Width = 105
Height = 25
Hint = 'Set Basic Values'
Caption = '&Basic Settings'
ParentShowHint = False
ShowHint = True
TabOrder = 1
OnClick = BtnDefaultClick
end
object BtnRemove: TButton
Left = 233
Top = 10
Width = 105
Height = 25
Hint = 'Return to Default Windows95 Settings'
Caption = '&Remove Settings'
ParentShowHint = False
ShowHint = True
TabOrder = 3
OnClick = BtnRemoveClick
end
object BtnRegUpdate: TButton
Left = 233
Top = 45
Width = 105
Height = 25
Hint = 'Write changes to the Registry'
Caption = '&Update Registry'
ParentShowHint = False
ShowHint = True
TabOrder = 4
OnClick = BtnRegUpdateClick
end
object BtnOptimal: TButton
Left = 122
Top = 10
Width = 105
Height = 25
Hint = 'Set Optimum values which should'#13#10'work for most people'
Caption = '&Optimum Settings'
ParentShowHint = False
ShowHint = True
TabOrder = 2
OnClick = BtnOptimalClick
end
object BtnRWIN: TButton
Left = 122
Top = 45
Width = 105
Height = 25
Hint = 'Change RWIN Value'
Caption = 'Change &RWIN'
Enabled = False
ParentShowHint = False
ShowHint = True
TabOrder = 5
OnClick = BtnRWINClick
end
end
object PageControl1: TPageControl
Left = 0
Top = 0
Width = 348
Height = 296
ActivePage = TabSheet1
TabOrder = 1
object TabSheet1: TTabSheet
Caption = 'MTU Settings'
object Panel12: TPanel
Left = 5
Top = 5
Width = 330
Height = 255
BevelInner = bvLowered
BevelOuter = bvNone
BorderWidth = 1
TabOrder = 0
object Label8: TLabel
Left = 115
Top = 82
Width = 53
Height = 13
Hint = 'Recommended value is 576'
Alignment = taRightJustify
Caption = 'MaxMTU ='
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = True
end
object LabelMaxMTU: TLabel
Left = 175
Top = 82
Width = 70
Height = 13
Caption = 'LabelMaxMTU'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
end
object LabelTrackBar: TLabel
Left = 79
Top = 170
Width = 171
Height = 13
Alignment = taCenter
Caption = 'Slide the Trackbar to change RWIN'
Font.Color = clWindowText
Font.Height = 11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
end
object Label1: TLabel
Left = 94
Top = 210
Width = 6
Height = 13
Caption = '2'
end
object Label2: TLabel
Left = 224
Top = 210
Width = 12
Height = 13
Alignment = taRightJustify
Caption = '10'
end
object LabelKey: TLabel
Left = 40
Top = 30
Width = 79
Height = 13
Caption = 'Registry Settings'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsUnderline]
ParentFont = False
ParentShowHint = False
ShowHint = False
end
object LabelKeyNum: TLabel
Left = 251
Top = 5
Width = 66
Height = 13
Alignment = taRightJustify
Caption = 'LabelKeyNum'
end
object Panel9: TPanel
Left = 39
Top = 108
Width = 251
Height = 51
BevelInner = bvLowered
BevelOuter = bvNone
BorderWidth = 1
TabOrder = 0
object Label12: TLabel
Left = 25
Top = 8
Width = 30
Height = 13
Alignment = taCenter
Caption = 'RWIN'
ParentShowHint = False
ShowHint = False
end
object Label11: TLabel
Left = 82
Top = 8
Width = 6
Height = 13
Alignment = taCenter
Caption = '='
ParentShowHint = False
ShowHint = False
end
object Label13: TLabel
Left = 110
Top = 8
Width = 41
Height = 13
Alignment = taCenter
Caption = 'Multiplier'
ParentShowHint = False
ShowHint = False
end
object Label14: TLabel
Left = 170
Top = 8
Width = 5
Height = 13
Alignment = taCenter
Caption = 'x'
ParentShowHint = False
ShowHint = False
end
object Label10: TLabel
Left = 200
Top = 8
Width = 23
Height = 13
Alignment = taCenter
Caption = 'MSS'
ParentShowHint = False
ShowHint = False
end
object LabelRWIN: TLabel
Left = 12
Top = 28
Width = 56
Height = 13
Alignment = taCenter
AutoSize = False
Caption = 'LabelRWIN'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
end
object Label15: TLabel
Left = 82
Top = 28
Width = 6
Height = 13
Alignment = taCenter
Caption = '='
ParentShowHint = False
ShowHint = False
end
object LabelMult: TLabel
Left = 107
Top = 28
Width = 46
Height = 13
Alignment = taCenter
AutoSize = False
Caption = 'LabelMult'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
end
object Label16: TLabel
Left = 170
Top = 28
Width = 5
Height = 13
Alignment = taCenter
Caption = 'x'
ParentShowHint = False
ShowHint = False
end
object LabelMSS: TLabel
Left = 187
Top = 28
Width = 49
Height = 13
Alignment = taCenter
AutoSize = False
Caption = 'LabelMSS'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
end
end
object TrackBarMult: TTrackBar
Left = 89
Top = 186
Width = 150
Height = 22
Hint = 'Recommended value is 4'
Min = 2
Orientation = trHorizontal
ParentShowHint = False
PageSize = 1
Frequency = 1
Position = 4
SelEnd = 0
SelStart = 0
ShowHint = True
TabOrder = 1
TickMarks = tmBottomRight
TickStyle = tsAuto
OnChange = TrackBarChange
end
object ComboBox1: TComboBox
Left = 40
Top = 45
Width = 251
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 2
OnChange = ComboBox1Change
end
object MTUCheckBox: TCheckBox
Left = 15
Top = 228
Width = 116
Height = 17
Hint = 'If checked, forces MaxMTU to be the same for all keys.'
Caption = 'Apply to all keys?'
ParentShowHint = False
ShowHint = True
TabOrder = 3
OnClick = MTUCheckBoxClick
end
object RWINCheckBox: TCheckBox
Left = 165
Top = 228
Width = 147
Height = 17
Hint =
'Determines whether Optimal and Basic buttons enable or disable R' +
'WIN'
Alignment = taLeftJustify
Caption = 'RWIN enabled by default?'
ParentShowHint = False
ShowHint = True
TabOrder = 4
end
end
end
object TabSheet2: TTabSheet
Caption = 'Registry Options'
object Panel1: TPanel
Left = 5
Top = 5
Width = 330
Height = 255
BevelInner = bvLowered
BevelOuter = bvNone
BorderWidth = 1
Caption = 'Panel1'
TabOrder = 0
object Label7: TLabel
Left = 14
Top = 137
Width = 105
Height = 13
Alignment = taRightJustify
Caption = 'MTUBlackHoleDetect'
Font.Color = clWindowText
Font.Height = 11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
end
object Label6: TLabel
Left = 31
Top = 107
Width = 88
Height = 13
Alignment = taRightJustify
Caption = 'MTUAutoDiscover'
Font.Color = clWindowText
Font.Height = 11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
end
object Label5: TLabel
Left = 89
Top = 78
Width = 30
Height = 13
Alignment = taRightJustify
Caption = 'RWIN'
Font.Color = clWindowText
Font.Height = 11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
end
object Label4: TLabel
Left = 75
Top = 50
Width = 44
Height = 13
Alignment = taRightJustify
Caption = 'MaxMTU'
Font.Color = clWindowText
Font.Height = 11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
end
object Label23: TLabel
Left = 57
Top = 167
Width = 62
Height = 13
Alignment = taRightJustify
Caption = 'Time To Live'
Font.Color = clWindowText
Font.Height = 11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
end
object Label21: TLabel
Left = 23
Top = 197
Width = 96
Height = 13
Alignment = taRightJustify
Caption = 'Time To Live - Hops'
ParentShowHint = False
ShowHint = False
end
object Label3: TLabel
Left = 43
Top = 227
Width = 76
Height = 13
Alignment = taRightJustify
Caption = 'NDI Cache Size'
ParentShowHint = False
ShowHint = False
end
object Panel2: TPanel
Left = 125
Top = 8
Width = 200
Height = 30
BevelInner = bvLowered
BevelOuter = bvNone
BorderWidth = 1
ParentShowHint = False
PopupMenu = PopupMTU
ShowHint = False
TabOrder = 0
object Label17: TLabel
Left = 14
Top = 9
Width = 33
Height = 13
Caption = 'Enable'
Font.Color = clWindowText
Font.Height = 11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
end
object Label19: TLabel
Left = 80
Top = 9
Width = 35
Height = 13
Alignment = taCenter
Caption = 'Disable'
Font.Color = clWindowText
Font.Height = 11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
end
object Label20: TLabel
Left = 145
Top = 9
Width = 40
Height = 13
Alignment = taRightJustify
Caption = 'Remove'
Font.Color = clWindowText
Font.Height = 11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
end
end
object Panel3: TPanel
Left = 125
Top = 38
Width = 200
Height = 30
Hint = 'MaxMTU Enable or Remove'
BevelInner = bvLowered
BevelOuter = bvNone
BorderWidth = 1
ParentShowHint = False
PopupMenu = PopupMTU
ShowHint = True
TabOrder = 1
object RadioYesMTU: TRadioButton
Left = 20
Top = 7
Width = 17
Height = 17
Alignment = taLeftJustify
ParentShowHint = False
ShowHint = False
TabOrder = 0
OnClick = RadioClick
end
object RadioRemoveMTU: TRadioButton
Left = 155
Top = 7
Width = 17
Height = 17
Alignment = taLeftJustify
Checked = True
ParentShowHint = False
ShowHint = False
TabOrder = 1
TabStop = True
OnClick = RadioClick
end
end
object Panel4: TPanel
Left = 125
Top = 68
Width = 200
Height = 30
Hint = 'RWIN enable or remove'
BevelInner = bvLowered
BevelOuter = bvNone
BorderWidth = 1
ParentShowHint = False
PopupMenu = PopupMTU
ShowHint = True
TabOrder = 2
object RadioYesRWIN: TRadioButton
Left = 20
Top = 7
Width = 17
Height = 17
Alignment = taLeftJustify
ParentShowHint = False
ShowHint = False
TabOrder = 0
OnClick = RadioClick
end
object RadioRemoveRWIN: TRadioButton
Left = 155
Top = 7
Width = 17
Height = 17
Alignment = taLeftJustify
Checked = True
ParentShowHint = False
ShowHint = False
TabOrder = 1
TabStop = True
OnClick = RadioClick
end
end
object Panel5: TPanel
Left = 125
Top = 98
Width = 200
Height = 30
Hint = 'Recommended setting is disabled'
BevelInner = bvLowered
BevelOuter = bvNone
BorderWidth = 1
ParentShowHint = False
PopupMenu = PopupMTU
ShowHint = True
TabOrder = 3
object RadioYesAUTO: TRadioButton
Left = 20
Top = 7
Width = 17
Height = 17
Alignment = taLeftJustify
ParentShowHint = False
ShowHint = False
TabOrder = 0
OnClick = AutoClick
end
object RadioNoAUTO: TRadioButton
Left = 88
Top = 7
Width = 17
Height = 17
Alignment = taLeftJustify
ParentShowHint = False
ShowHint = False
TabOrder = 1
OnClick = RadioClick
end
object RadioRemoveAUTO: TRadioButton
Left = 155
Top = 7
Width = 17
Height = 17
Alignment = taLeftJustify
Checked = True
ParentShowHint = False
ShowHint = False
TabOrder = 2
TabStop = True
OnClick = RadioClick
end
end
object Panel13: TPanel
Left = 125
Top = 128
Width = 200
Height = 30
Hint = 'Recommended setting is disabled'
BevelInner = bvLowered
BevelOuter = bvNone
BorderWidth = 1
ParentShowHint = False
PopupMenu = PopupMTU
ShowHint = True
TabOrder = 4
object RadioYesBH: TRadioButton
Left = 20
Top = 7
Width = 17
Height = 17
Alignment = taLeftJustify
ParentShowHint = False
ShowHint = False
TabOrder = 0
OnClick = AutoClick
end
object RadioNoBH: TRadioButton
Left = 88
Top = 6
Width = 17
Height = 17
Alignment = taLeftJustify
ParentShowHint = False
ShowHint = False
TabOrder = 1
OnClick = RadioClick
end
object RadioRemoveBH: TRadioButton
Left = 155
Top = 7
Width = 17
Height = 17
Alignment = taLeftJustify
Checked = True
ParentShowHint = False
ShowHint = False
TabOrder = 2
TabStop = True
OnClick = RadioClick
end
end
object Panel11: TPanel
Left = 125
Top = 158
Width = 200
Height = 30
Hint = 'Recommended setting is enabled'
BevelInner = bvLowered
BevelOuter = bvNone
BorderWidth = 1
ParentShowHint = False
PopupMenu = PopupMTU
ShowHint = True
TabOrder = 5
object RadioYesTTL: TRadioButton
Left = 20
Top = 5
Width = 17
Height = 17
Alignment = taLeftJustify
TabOrder = 0
OnClick = RadioTTLClick
end
object RadioRemoveTTL: TRadioButton
Left = 155
Top = 5
Width = 17
Height = 17
Alignment = taLeftJustify
Checked = True
ParentShowHint = False
ShowHint = False
TabOrder = 1
TabStop = True
OnClick = RadioTTLClick
end
end
object Panel8: TPanel
Left = 125
Top = 188
Width = 200
Height = 30
Hint = 'Default is 32. Set 64 if you are getting a lot of timeouts'
BevelInner = bvLowered
BevelOuter = bvNone
BorderWidth = 1
ParentShowHint = False
PopupMenu = PopupMTU
ShowHint = True
TabOrder = 6
object Radio32TTL: TRadioButton
Left = 25
Top = 6
Width = 42
Height = 17
Caption = '32'
Enabled = False
TabOrder = 0
OnClick = RadioTTLClick
end
object Radio64TTL: TRadioButton
Left = 160
Top = 6
Width = 35
Height = 17
Caption = '64'
Enabled = False
TabOrder = 1
OnClick = RadioTTLClick
end
end
object Panel7: TPanel
Left = 125
Top = 218
Width = 200
Height = 30
Hint = 'Recommended NDI Cache is 16'
BevelInner = bvLowered
BevelOuter = bvNone
BorderWidth = 1
ParentShowHint = False
PopupMenu = PopupMTU
ShowHint = True
TabOrder = 7
object RadioZeroNDI: TRadioButton
Left = 25
Top = 6
Width = 27
Height = 17
Caption = '0'
TabOrder = 0
OnClick = RadioNDIClick
end
object Radio16NDI: TRadioButton
Left = 70
Top = 6
Width = 32
Height = 17
Caption = '16'
TabOrder = 1
OnClick = RadioNDIClick
end
object Radio32NDI: TRadioButton
Left = 115
Top = 6
Width = 32
Height = 17
Caption = '32'
TabOrder = 2
OnClick = RadioNDIClick
end
object Radio64NDI: TRadioButton
Left = 160
Top = 6
Width = 32
Height = 17
Caption = '64'
TabOrder = 3
OnClick = RadioNDIClick
end
end
end
end
end
object PopupMTU: TPopupMenu
OnPopup = PopupMTUPopup
Left = 215
Top = 9
object PopupRegUpdate: TMenuItem
Caption = 'Update Registry'
Enabled = False
ShortCut = 0
OnClick = BtnRegUpdateClick
end
object PopupReReadReg: TMenuItem
Caption = 'Re-read Registry'
ShortCut = 0
OnClick = PopupReReadRegClick
end
object N3: TMenuItem
Caption = '-'
ShortCut = 0
end
object PopupChangeMaxMTU: TMenuItem
Caption = 'Change MaxMTU'
ShortCut = 0
OnClick = BtnMTUClick
end
object PopupChangeRWIN: TMenuItem
Caption = 'Change RWIN'
ShortCut = 0
OnClick = BtnRWINClick
end
object PopupSetBasic: TMenuItem
Caption = 'Basic Settings'
ShortCut = 0
OnClick = BtnDefaultClick
end
object PopupSetOptimum: TMenuItem
Caption = 'Optimum Settings'
ShortCut = 0
OnClick = BtnOptimalClick
end
object PopupRemoveSettings: TMenuItem
Caption = 'Remove Settings'
ShortCut = 0
OnClick = BtnRemoveClick
end
object N1: TMenuItem
Caption = '-'
ShortCut = 0
end
object PopupViewReadMe: TMenuItem
Caption = 'View ReadMe'
ShortCut = 0
OnClick = ViewReadmeClick
end
object PopupAbout: TMenuItem
Caption = 'About...'
ShortCut = 0
OnClick = AboutMenuClick
end
object N2: TMenuItem
Caption = '-'
ShortCut = 0
end
object PopupExit: TMenuItem
Caption = 'Exit'
ShortCut = 0
OnClick = MenuExitOption
end
end
end
