http://blog.csdn.net/tht2009/article/details/48165371
unitUnit1;interfaceusesSystem.NetEncoding,IdGlobal,IdSSLOpenSSL,IdSSLOpenSSLHeaders,EncdDecd,Winapi.Windows,Winapi.Messa…
DelphiXE10文件目录/路径操作(Andorid、ios、windows)//获取临时文件路径(支持安卓、IOS)functionGeFileName(constAFileName:string):string;begin{$IFDE…
TakePhotoFromCameraAction1:TTakePhotoFromCameraAction;//通过手机摄像头获取图片TakePhotoFromLibraryAction1:TTakePhotoFromLibraryActi…
最近实现一个功能,使用delphi2009以TCP调用Java端的接口,接口要求先发送字符串的长度,然后再发送字符串内容,并且字符串要求是utf8格式的调试了好长时间,才终于发现解决办法,或者说发现问题所在我用了utf8encode方法,然…
//消息提醒(从手机屏幕顶部向下滑动,出现的提示消息)NotificationC:TNotificationCenter;procedureTNotificationsForm.btnSendNotificationImmediatelyC…
//当前网络状态(引用Androidapi.JNI.Network.pas)IsConnected//连接IsWiFiConnected//Wifi是否连接IsMobileConnected//移动网络是否连接
DelphiXE10,Json生成和解析,再利用indyhttp控件Post2017年09月20日18:30:23阅读数:1973--不多说,直接上代码procedureTFrmMain.Brand;varJSONObject,jsonpa…