index 14336d9e3581cffa64f538bcdebd7cfe9d227d74..c9fff9e176ad1ad4af64556d727649e390d3111f 100644 (file)
--- a/src/editor/f_savemap.pas
+++ b/src/editor/f_savemap.pas
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(_lc[I_MSG_MAP_EXISTS],
[eMapName.Text])),
PChar(_lc[I_MSG_SAVE_MAP]),
MB_ICONQUESTION or MB_YESNO or MB_DEFBUTTON1) = mrYes;
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