1，故障现象 一次程序运行，出现如下错误： 对应代码如下： 2，故障分析 Query_alert_2的语句在查询分析器中单独执行是正常的。排除语句出错。 如果注解掉Query_alert_1，则错误变为Query_alert_3执行出错： 2019-07-11 09:32:26 Query_aler ...
项目中遇到，要蓝牙针式打印机，用手机打印表单。感谢专家，对厂家提供的SDK进行了封装，实现利用Delphi开发出这一功能。 现在来看看，如何利用这一控件实现打印过程： TCCFujitsuPrinter提供了上面几个方法，利用startScanDevices扫描蓝牙打印机， 然后我们用stopSca ...
分类：
其他好文 时间：
2019-07-11 09:57:59
阅读次数：
120
位运算 Delphi 的按位运算符共有六个: not and or xor shr shl; 其中的 not and or xor 也叫逻辑运算符, 其实功能都是一样的, 因为不管什么数据追到底都是 0 和 1 的组合 ...
分类：
其他好文 时间：
2019-07-07 09:49:14
阅读次数：
123
copy（a,b,c); a：就是copy源，就是一个字符串，表示你将要从a里copy一些东西， b：从a中的第b位开始copy（包含第1位）， c：copy从第b位开始后的c个字符， 例如： m:=‘the fellowship of the ring’ s：=copy（m,2,2）； //s值为 ...
//获取手机信息 function GetPhoneInfo(): string; Var TelephonyManager: JTelephonyManager; TelephonyServiceNative: JObject; begin result := ''; TelephonyServi... ...
分类：
移动开发 时间：
2019-07-05 12:55:37
阅读次数：
323
//当前网络状态（引用 Androidapi.JNI.Network.pas） IsConnected //连接 IsWiFiConnected //Wifi是否连接 IsMobileConnected //移动网络是否连接 ...
1 procedure debugs; stdcall; 2 var 3 NewState: TTokenPrivileges; 4 lpLuid: Int64; 5 ReturnLength: DWord; 6 hAccessToken: THandle; 7 a: Boolean; 8 begi... ...
TakePhotoFromCameraAction1: TTakePhotoFromCameraAction; // 通过手机摄像头获取图片TakePhotoFromLibraryAction1: TTakePhotoFromLibraryAction; //获取手机已存在图片ShowShareSh ...
//消息提醒（从手机屏幕顶部向下滑动，出现的提示消息） NotificationC: TNotificationCenter; procedure TNotificationsForm.btnSendNotificationImmediatelyClick( Sender: TObject); va... ...
//蓝牙 System.Bluetooth //单元中主要包含以下几个类 TBluetoothManager、TBluetoothDeviceList、TBluetoothAdapter、TBluetoothDevice、TBluetoothService、 TBluetoothServiceLis... ...
