1 object MapTestForm: TMapTestForm
6 BorderIcons = [biSystemMenu]
8 Caption = 'Настройки теста в игре'
12 Font.Color = clWindowText
14 Font.Name = 'MS Sans Serif'
15 OnActivate = FormActivate
17 Position = poScreenCenter
18 LCLVersion = '1.6.4.0'
29 object bCancel: TButton
36 OnClick = bCancelClick
39 object GroupBox1: TGroupBox
47 object LabelTime: TLabel
52 Caption = 'Лимит времени:'
55 object LabelSecs: TLabel
63 object LabelScore: TLabel
68 Caption = 'Лимит очков:'
71 object LabelPath: TLabel
76 Caption = 'Путь к Doom2DF.exe:'
79 object rbDM: TRadioButton
84 Caption = 'Deathmatch'
89 object rbTDM: TRadioButton
94 Caption = 'Team Deathmatch'
97 object rbCTF: TRadioButton
102 Caption = 'Capture the Flag'
105 object rbCOOP: TRadioButton
110 Caption = 'Cooperative'
113 object cbTwoPlayers: TCheckBox
118 Caption = 'Два игрока'
121 object cbTeamDamage: TCheckBox
126 Caption = 'Урон своей команде'
129 object cbAllowExit: TCheckBox
134 Caption = 'Выход из уровня'
139 object cbWeaponStay: TCheckBox
144 Caption = 'Оружие остается'
147 object cbMonstersDM: TCheckBox
152 Caption = 'Монстры в DM'
163 object edScore: TEdit
171 object UpDown2: TUpDown
183 object UpDown1: TUpDown
195 object edD2dexe: TEdit
203 object bChooseD2d: TButton
209 Font.Color = clWindowText
211 Font.Name = 'MS Sans Serif'
212 Font.Style = [fsBold]
213 OnClick = bChooseD2dClick
217 object cbMapOnce: TCheckBox
222 Caption = 'Закрыть игру после выхода из карты'
226 object FindD2dDialog: TOpenDialog
227 Title = 'Выберите файл игры Doom 2D: Forever'
229 Filter = 'Doom2DF.exe|Doom2DF.exe'
230 Options = [ofHideReadOnly, ofNoChangeDir, ofEnableSizing]