index b35dc4688d0d695c5d20f7696d5ab6a9c6ed274e..f22f5fd38cae93ac41bcc9faff9502d574e9f089 100644 (file)
--- a/src/editor/f_maptest.pas
+++ b/src/editor/f_maptest.pas
ComCtrls;
type
+
+ { TMapTestForm }
+
TMapTestForm = class (TForm)
bOK: TButton;
bCancel: TButton;
GroupBox1: TGroupBox;
+ LabelArgs: TLabel;
// Режим игры:
rbDM: TRadioButton;
rbTDM: TRadioButton;
implementation
uses
- f_main, CONFIG;
+ f_main, g_options, CONFIG;
{$R *.lfm}
n: Integer;
begin
- config := TConfig.CreateFile(EditorDir+'Editor.cfg');
+ config := TConfig.CreateFile(CfgFileName);
if rbTDM.Checked then
s := 'TDM'
config.WriteStr('TestRun', 'Args', edD2DArgs.Text);
TestD2DArgs := edD2DArgs.Text;
- config.SaveFile(EditorDir+'Editor.cfg');
+ config.SaveFile(CfgFileName);
config.Free();
Close();
end;
config: TConfig;
begin
- config := TConfig.CreateFile(EditorDir+'Editor.cfg');
+ config := TConfig.CreateFile(CfgFileName);
TestGameMode := config.ReadStr('TestRun', 'GameMode', 'DM');
TestLimTime := config.ReadStr('TestRun', 'LimTime', '0');