从流加载时移动应用程序错误

Question

我在delphi中第一次使用移动应用程序，我遇到了问题，无法解决问题。

我正在运行一个过程，我从该资源加载一个csv文件。 当我抛出这个程序时，在移动设备上（我只能在Android上测试它）我得到这个错误：＆＃39;目标多字节代码页中没有Unicode字符的映射＆＃39;，没有错误32位Windows。

这是代码，Rad Studio XE6：

procedure TContactos.LoadFromResource;
var
 FicheroEntero, Linea: TStringList;
 rs: TResourceStream;
 I, pos: Integer;
 contacto : TContacto;
begin
 FicheroEntero := TStringList.Create;
 Linea := TStringList.Create;
 try
   rs := TResourceStream.Create(HInstance,'clientes_csv', RT_RCDATA);
   FicheroEntero.LoadFromStream(rs); //Here enter in Exception
   for I := 1 to FicheroEntero.Count-1 do
   begin
     Linea.Delimiter := ';';
     Linea.StrictDelimiter := True;
     Linea.DelimitedText := FicheroEntero[I];
     if Linea.Count >= 2 then
     begin
       contacto := TContacto.Create;
       pos := GDListaContactos.Add(contacto);
       contacto.Posicion := pos;
       contacto.Codigo := StrToInt(Trim(Copy(Linea[0], 1 ,Length(Linea[0]))));
       contacto.Nombre := Copy(Linea[1], 1 ,Length(Linea[1]));
       GDListaContactos[pos] := contacto;
     end;
  end;
  SortContactsName;
  FicheroEntero.Free;
  Linea.Free;
  rs.Free
 Except
   on E: Exception do
   begin
     ShowMessage('Error: '+e.ToString);
     FicheroEntero.Free;
     Linea.Free;
     rs.Free
    end;
 end;
end;