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 = '2.0.2.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
182 object UpDown1: TUpDown
193 object edD2dexe: TEdit
201 object bChooseD2d: TButton
207 Font.Color = clWindowText
209 Font.Name = 'MS Sans Serif'
210 Font.Style = [fsBold]
211 OnClick = bChooseD2dClick
215 object edD2DArgs: TEdit
222 object cbMapOnce: TCheckBox
227 Caption = 'Закрыть игру после выхода из карты'
230 object LabelArgs: TLabel
235 Caption = 'Параметры запуска:'
239 object FindD2dDialog: TOpenDialog
240 Title = 'Выберите файл игры Doom 2D: Forever'
242 Filter = 'Doom2DF.exe|Doom2DF.exe;Doom2DF'
243 Options = [ofHideReadOnly, ofNoChangeDir, ofEnableSizing]