2Pascal-新时代的Pascal

标题: BaiduLocation_百度定位_LBS_定位_5_SDK_DEMO_Add_Jar_BaiduLBS_Android5 [打印本页]

作者: [北京]老猫    时间: 2015-4-29 00:00
标题: BaiduLocation_百度定位_LBS_定位_5_SDK_DEMO_Add_Jar_BaiduLBS_Android5
BaiduLocation_百度定位_LBS_定位_5_SDK_DEMO_Add_Jar_BaiduLBS_Android5_20150423 V3.zip

[attach]1041[/attach]



在部署界面
不要选择 All configurations - Android platform
必须使用
Debug configurations - Android platforms

Release configurations - Android platform
添加,否则没有效果
添加 so 文件之后,选择 Platforms 列,点 ... 弹出对话框,去掉其他平台。只留安卓。
Remote Path 路径输入 library\lib\armeabi-v7a\
记住 Debug 和 Release 都要这样操作。


Key 在 AndroidManifest.template.xml 中进行修改。
<meta-data

            android:name="com.baidu.lbsapi.API_KEY"

            android:value="请输入申请的key" />

key 必须正确,否则不能工作。


另外,很多路径都是绝对路径,大家需要用
http://blog.csdn.net/sunylat/article/details/41414785
文章中的第一个步骤,完成路径的正常化。


如果编译发生错误。
可以试试 先 去掉 JAR 文件。 2 个 都去掉。

然后先加一个 JAR,编译。
再加一个 JAR 编译。
如果提示找不到 class ,试试删除 JAR 重新加,还是这个提示,试试删除你的 编译结果目录。





作者: wang_80919    时间: 2015-7-3 12:48
百度地图 SDK 显示 相关代码。
by [重庆]新手(371889755)

作者参考了 EMB TAndroidMapView_UIThread 的相关代码。

[mw_shl_code=delphi,true]procedure TBaiduMap.InitInstance;
var
  Rect: JRect;
begin
  CallInUIThreadAndWaitFinishing(
    procedure
    begin
      FJNativeLayout := TJNativeLayout.JavaClass.init(SharedActivity,
        MainActivity.getWindow.getDecorView.getWindowToken);
      FMapView := TJMapView.JavaClass.init(SharedActivity);
      Rect := TJRect.JavaClass.init(0, 0, Round(Size.Height),
        Round(Size.Width));
      FMapView.requestFocus(0, Rect);
      FJNativeLayout.setPosition(0, 0);
      FJNativeLayout.setSize(Round(Size.Height), Round(Size.Width));
      FJNativeLayout.setControl(FMapView);
      RealignView;
    end);
end;

procedure TBaiduMap.RealignView;
const
  VideoExtraSpace = 100;
  // To be sure that destination rect will fit to fullscreen
var
  MapRect: TRectF;
  RoundedRect: TRect;
  LSizeF: TPointF;
  LRealBounds: TRectF;
  LRealPosition, LRealSize: TPointF;
begin
  if (FJNativeLayout <> nil) then
  begin
    LRealPosition := Self.LocalToAbsolute(TPointF.Zero) * FScale;
    LSizeF := TPointF.Create(Self.Size.Size.cx, Self.Size.Size.cy);
    LRealSize := Self.LocalToAbsolute(LSizeF) * FScale;
    LRealBounds := TRectF.Create(LRealPosition, LRealSize);

    MapRect := TRectF.Create(0, 0, Self.Width * VideoExtraSpace,
      Self.Height * VideoExtraSpace);
    RoundedRect := MapRect.FitInto(LRealBounds).Round;

    if not Self.ParentedVisible then
      RoundedRect.Left := Round(Screen.Size.cx * FScale);

    FJNativeLayout.setPosition(RoundedRect.TopLeft.X, RoundedRect.TopLeft.Y);
    FJNativeLayout.setSize(RoundedRect.Width, RoundedRect.Height);
  end;

end;[/mw_shl_code]

作者: kcguokun    时间: 2016-1-24 23:57
感谢 [ 北京]老猫  Flying Wang , 正需要这样的资料
作者: hiderek    时间: 2017-3-8 21:54
添加 so 文件之后 ?? 请问,这里指的是什么操作呢?在那里添加SO文件?!
作者: yc15007    时间: 2017-5-11 15:32
正在学习,苦无资料
作者: hsanming    时间: 2017-6-7 15:29
不错,下载学习下
作者: li_gk123    时间: 2018-4-13 07:31
新手下载学习一下。




欢迎光临 2Pascal-新时代的Pascal (http://2pascal.com/) Powered by Discuz! X3