X-Git-Url: https://deadsoftware.ru/gitweb?p=d2df-editor.git;a=blobdiff_plain;f=src%2Feditor%2Ff_options.pas;h=feffc4b02ee4064d0366689e4828cad70d01cae5;hp=91cc695d1e442dc03753e43b1de29ff63e8443a9;hb=9d717c612a7756b30839103d1d6e8d89e2596393;hpb=7bc9ae2fc0204a6412aa1cb5f05f0ffa8d1870ac diff --git a/src/editor/f_options.pas b/src/editor/f_options.pas index 91cc695..feffc4b 100644 --- a/src/editor/f_options.pas +++ b/src/editor/f_options.pas @@ -77,7 +77,7 @@ procedure RegisterFileType(ext: String; FileName: String); implementation uses - f_main, StdConvs, CONFIG, g_language, g_resources; + f_main, StdConvs, CONFIG, g_language, g_resources, g_options; {$R *.lfm} @@ -207,7 +207,7 @@ begin else DotSize := 1; - config := TConfig.CreateFile(EditorDir+'Editor.cfg'); + config := TConfig.CreateFile(CfgFileName); config.WriteInt('Editor', 'DotColor', DotColor); config.WriteBool('Editor', 'DotEnable', DotEnable); @@ -232,7 +232,7 @@ begin MainForm.RefreshRecentMenu(); end; - config.SaveFile(EditorDir+'Editor.cfg'); + config.SaveFile(CfgFileName); config.Free(); Close(); end;