关于中文乱码问题

Question

我定义了以下一个结构type
    TMemoryShare=record
       {Sender:DWORD;
       MessageID:DWORD;}
       Data:array[1..2] of DWORD;
       MouseInfoStruct:TMOUSEHOOKSTRUCT;
       WindowText:array[0..1024] of char;
    end;
    PMemoryShare =^TMemoryShare;var
pShare:PMemoryShare;我的这个pShare是指向共享内存的,如下
pShare:=MapViewOFFile(FileMappingHandle,FILE_MAP_READ or FILE_MAP_WRITE,0,0,0);
如下使用中文却是乱码：
Edit1.Text:=pShare^.WindowText ;
而不是使用共享内在的方法却没用问题，如下
   var xx:PMemoryShare;
   New(xx);
   xx^.WindowText:='春花ff秋f月fff   无奈   何   ';
   Edit1.Text:=xx^.WindowText;   
请各位前辈指点!谢谢！