X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Feditor%2Ff_selectmap.pas;h=46f365c7f6cfe4c9bf0a50ebc6046f559d8c9f69;hb=6fb9c23afad22a71679525dc44ea32675d73609f;hp=afa6a3eba7058b36db59176811c9283e1b747020;hpb=b72e164f0fb64e3301ae8ca217449daf6a9d301d;p=d2df-editor.git

diff --git a/src/editor/f_selectmap.pas b/src/editor/f_selectmap.pas
index afa6a3e..46f365c 100644
--- a/src/editor/f_selectmap.pas
+++ b/src/editor/f_selectmap.pas
@@ -1,12 +1,12 @@
 unit f_selectmap;
 
-{$MODE Delphi}
+{$INCLUDE ../shared/a_modes.inc}
 
 interface
 
 uses
   LCLIntf, LCLType, LMessages, SysUtils, Variants, Classes, Graphics,
-  Controls, Forms, Dialogs, StdCtrls, ExtCtrls;
+  Controls, Forms, Dialogs, StdCtrls, ExtCtrls, utils;
 
 type
   TSelectMapForm = class (TForm)
@@ -84,7 +84,7 @@ begin
       FreeMem(Data);
 
       if Sign = MAP_SIGNATURE then
-        lbMapList.Items.Add(ResList[a]);
+        lbMapList.Items.Add(win2utf(ResList[a]));
       Sign := '';
     end;