i10n: use resourcestring and gettext for localization

[d2df-editor.git] / src / editor / f_savemap.pas

diff --git a/src/editor/f_savemap.pas b/src/editor/f_savemap.pas
index 14336d9e3581cffa64f538bcdebd7cfe9d227d74..a508c24bc2a2240d477dab6a5e650c4b6c041c84 100644 (file)
--- a/src/editor/f_savemap.pas
+++ b/src/editor/f_savemap.pas
@@ -69,9 +69,9 @@ begin
   for a := 0 to lbMapList.Count-1 do
     if eMapName.Text = lbMapList.Items[a] then
     begin
-      ok := MessageBox(0, PChar(Format(_lc[I_MSG_MAP_EXISTS],
+      ok := Application.MessageBox(PChar(Format(MsgMsgMapExists,
                                        [eMapName.Text])),
-                       PChar(_lc[I_MSG_SAVE_MAP]),
+                       PChar(MsgMsgSaveMap),
                        MB_ICONQUESTION or MB_YESNO or MB_DEFBUTTON1) = mrYes;
       if not ok then
         Exit;
@@ -100,7 +100,7 @@ begin
   begin
     for i := 0 to list.Count - 1 do
     begin
-      g_ReadResource(FileName, list.Files[i].path, list.Files[i].name, data, len);
+      g_ReadResource(FileName, win2utf(list.Files[i].path), win2utf(list.Files[i].name), data, len);
 
       if len >= 3 then
       begin