本文整理自网络,侵删。
Reading Android package name:
uses Androidapi.Helpers;
function PackageName: string;begin Result := JStringToString(SharedActivityContext.getPackageName);end;Reading iOS bundle name:
uses Macapi.CoreFoundation, iOSApi.Foundation;
function PackageName: string;begin Result := TNSString.Wrap(CFBundleGetValueForInfoDictionaryKey(CFBundleGetMainBundle, kCFBundleIdentifierKey)).UTF8String;end;
相关阅读 >>
Delphi 2010 复制整个文件夹(当然包括嵌套文件夹)
Delphi 如何从一张图片中裁剪一部分距形图片另存为文件(使用canvas.copyrect)
Delphi system.sysutils.tmarshaller 与 system.tmarshal
更多相关阅读请进入《Delphi》频道 >>