-1

我是 basic4android 开发 Android 应用程序的新手。

我需要 gps / httpclient 库来测试样本。

或者你能给我另一个在 basic4android 中编写 gps 和 web 服务调用应用程序的解决方案吗?

谢谢你

4

1 回答 1

0

首先,您必须将 GPS 库添加到您的项目中。之后真的很容易:

首先,您必须声明一个 GPS 对象:

Sub Process_Globals
    Dim GPS1 As GPS
End Sub

之后,您必须初始化对象:

Sub Activity_Create(FirstTime As Boolean)
    If FirstTime Then
        GPS1.Initialize("GPS")
    End If
End Sub

然后你必须使用位置改变时调用的 GPS 事件:

Sub GPS_LocationChanged (Location1 As Location)
    Dim Lat, Long as string
    Lat = Location1.ConvertToMinutes(Location1.Latitude)
    Lon = Location1.ConvertToMinutes(Location1.Longitude)
End Sub

现在您必须建立与发送服务的连接,并发送数据。

于 2011-11-03T12:42:24.087 回答