盒子论坛 v2.1

写个了小程序，获取手机的一些信息。
调用的是  Androidapi.JNI.Telephony这个下面的 JCellIdentityGsm，这个函数的get cid ，出错，出错提示为“Access violation at address 4097C5Ec,accessing address 0000002C.
点击按钮，出现上面的出错。具体是到get cid这步提示的。希望各位大侠能给一下提示或解答。代码如下：
procedure TCellinformation.btnGetCarrierInfoClick(Sender: TObject);
var
  PhoneDialerService: IFMXPhoneDialerService;
  CellIDService:JCellIdentityGsm;
   Jgsm:  JCellIdentityGsm;
begin
  { test whether the PhoneDialer services are supported }
  if TPlatformServices.Current.SupportsPlatformService(IFMXPhoneDialerService, IInterface(PhoneDialerService)) then
  begin
    { if yes, then update the labels with the retrieved information }
    CarrierNameItem.ItemData.Detail := PhoneDialerService.GetCarrier.GetCarrierName;
    CountryCodeItem.ItemData.Detail := PhoneDialerService.GetCarrier.GetIsoCountryCode;
    NetworkCodeItem.ItemData.Detail := PhoneDialerService.GetCarrier.GetMobileCountryCode;
    MobileNetworkItem.ItemData.Detail := PhoneDialerService.GetCarrier.GetMobileNetwork;
    Jgsm:= TJCellIdentityGsm.Create;
    CELLIDItem.ItemData.Detail:=Jgsm.getCid.toString);
    end
  else
    ShowMessage('不支持的服务');

end;

此帖子包含附件:

大小:243.8K

----------------------------------------------
-

作者：

scolate (scolate)	★☆☆☆☆	-
	普通会员

2014/10/1 22:52:49

1楼：

目前是DELPHI XE7 ,这个是支持ShowMessage的。
----------------------------------------------
-

作者：

wang_80919 (Flying Wang)	★☆☆☆☆	-
	普通会员

2014/10/7 10:09:52

2楼：

Jgsm:= TJCellIdentityGsm.Create;
这种写法，不出错，才怪。
----------------------------------------------
(C)(P)Flying Wang

作者：

wang_80919 (Flying Wang)	★☆☆☆☆	-
	普通会员

2014/10/7 10:11:23

3楼：

Jgsm:= JXX对象.getgsm函数
或者
Jgsm:= TJCellIdentityGsm.JavaClass.init如果有这个函数的话。

或者
Jgsm:= TJCellIdentityGsm.JavaClass.XXX函数。
----------------------------------------------
(C)(P)Flying Wang

作者：

scolate (scolate)	★☆☆☆☆	-
	普通会员

2014/10/8 8:48:08

4楼：

按照这个写法，TJCellIdentityGsm.JavaClass.init；
加载后，提示Java Class JcellIdentityGSM could not be found.
----------------------------------------------
-

信息

登陆以后才能回复