X-Git-Url: https://deadsoftware.ru/gitweb?a=blobdiff_plain;ds=sidebyside;f=src%2Feditor%2Ff_main.pas;h=95d468df1917067c9c67c1b4bb77d8423009a1e8;hb=ecf69fd49c810dc4fe78092ec1f0204cbb719e01;hp=32c13a2751b0f54851c87a98e2e5d105c10073ee;hpb=c31a0cde6506576625aab584c2c45aac9168f2dd;p=d2df-editor.git diff --git a/src/editor/f_main.pas b/src/editor/f_main.pas index 32c13a2..95d468d 100644 --- a/src/editor/f_main.pas +++ b/src/editor/f_main.pas @@ -2737,6 +2737,9 @@ begin s := config.ReadStr('Editor', 'Language', ''); gLanguage := s; + Compress := config.ReadBool('Editor', 'Compress', True); + Backup := config.ReadBool('Editor', 'Backup', True); + RecentCount := config.ReadInt('Editor', 'RecentCount', 5); if RecentCount > 10 then RecentCount := 10; @@ -6178,7 +6181,7 @@ begin if MessageBox(0, PChar(Format(_lc[I_MSG_DELETE_MAP_PROMT], [MapName, OpenDialog.FileName])), PChar(_lc[I_MSG_DELETE_MAP]), MB_ICONQUESTION or MB_YESNO or MB_DEFBUTTON2) <> mrYes then Exit; - g_DeleteResource(FileName, '', utf2win(MapName), res); + g_DeleteResource(FileName, '', MapName, res); if res <> 0 then begin MessageBox(0, PChar('Cant delete map res=' + IntToStr(res)), PChar('Map not deleted!'), MB_ICONINFORMATION or MB_OK or MB_DEFBUTTON1);