2020 年 7月随笔档案 - 滔Roy

Delphi 线程Thread释放的方式

摘要：Delphi 线程Thread释放的方式 1、线程的释放方式：停止后自动释放手动停止后自动释放手动释放。注意：如果线程已经停止并且自动释放，再去手动停止，就会报错。 2、代码示例： 2.1、停止后自动释放的线程（FreeOnTerminate := True;）： constructor 阅读全文

posted @ 2020-07-31 14:17 滔Roy 阅读(1796) 评论(0) 推荐(0) 编辑

Delphi WinAPI WinExec函数 -- 运行外部exe文件

摘要：Delphi WinAPI WinExec函数 -- 运行外部exe文件作用：运行外部.EXE后缀文件。原型： UINT WinExec(exePath,ShowCmd) 参数说明： xePath：命令行参数。注意，要用pChar转化一下。 ShowCmd：取值如下： SW_HIDE 隐藏 SW 阅读全文

posted @ 2020-07-31 08:46 滔Roy 阅读(820) 评论(0) 推荐(0) 编辑

Delphi 判断线程TThread是否释放

摘要：Delphi 判断线程TThread是否释放 //返回值：0-已释放；1-正在运行；2-已终止但未释放； //3-未建立或不存在 function CheckThreadFreed(aThread: TThread): Byte; var i: DWord; IsQuit: Boolean; beg 阅读全文

posted @ 2020-07-29 15:32 滔Roy 阅读(781) 评论(0) 推荐(0) 编辑

Delphi 和键盘有关的API函数(Keyboard Input)

摘要：Delphi 和键盘有关的API函数(Keyboard Input) ActivateKeyboardLayout //设置调用线程或当前进程的输入区域设置标识符（以前称为键盘布局句柄）。输入区域设置标识符指定区域设置以及键盘的物理布局。 BlockInput //阻止键盘和鼠标输入事件到达应用程序阅读全文

posted @ 2020-07-29 11:48 滔Roy 阅读(864) 评论(0) 推荐(0) 编辑

Delphi System单元-Odd- 判断是否是奇数

摘要：Delphi System单元-Odd- 判断是否是奇数原型： function Odd(X：Integer): boolean; Delphi示例: var i: Integer; b: Boolean; begin i := 1; b := Odd(i); {是奇数返回真} ShowMessa 阅读全文

posted @ 2020-07-29 11:39 滔Roy 阅读(829) 评论(0) 推荐(0) 编辑

Delphi 键盘API GetKeyState、GetAsyncKeyState -获取键盘 / 按键值Key的状态

摘要：Delphi 键盘API GetKeyState、GetAsyncKeyState -获取键盘 / 按键值key的状态 1、GetKeyState 作用：检索指定虚拟密钥的状态。状态指定该键是向上、向下还是切换（每次按该键时交替打开、关闭）。原型： SHORT GetKeyState( int n 阅读全文

posted @ 2020-07-29 11:06 滔Roy 阅读(1759) 评论(0) 推荐(0) 编辑

Delphi 全局热键KeyPress 和热键 API（RegisterHotKey、UnRegisterHotKey、GlobalAddAtom、GlobalDeleteAtom、GlobalFindAtom）

摘要：Delphi 全局热键KeyPress 和热键 API（RegisterHotKey、UnRegisterHotKey、GlobalAddAtom、GlobalDeleteAtom、GlobalFindAtom） 1、热键按作用分为：全局、局部、系统级全局和局部的：主窗体可设置KeyPress属阅读全文

posted @ 2020-07-28 16:07 滔Roy 阅读(1413) 评论(0) 推荐(0) 编辑

Delphi XE Android platform uses-permission[2] AndroidManifest.xml 配置

摘要：Delphi XE Android platform uses-permission[2] 之 AndroidManifest.xml 配置 AndroidManifest 文件中有四个标签与permission有关，分别： <permission> //自己定义的权限，用的相对较少。 <permi 阅读全文

posted @ 2020-07-24 09:06 滔Roy 阅读(463) 评论(0) 推荐(0) 编辑

Delphi XE Android platform uses-permission[1] 权限列表

摘要：Delphi XE Android platform uses-permission[1] 权限列表： ACCESS_CHECKIN_PROPERTIES //允许读/写访问“属性”签到表数据库,改变值,得到上传。 ACCESS_COARSE_LOCATION //允许应用程序访问来自网络位置近似阅读全文

posted @ 2020-07-24 08:56 滔Roy 阅读(866) 评论(0) 推荐(0) 编辑

Delphi XE Andriod 文件后缀对应MIME类型

摘要：Delphi XE Andriod 文件后缀对应MIME类型 //{后缀名， MIME类型} {".3gp", "video/3gpp"}, {".apk", "application/vnd.android.package-archive"}, {".asf", "video/x-ms-asf"} 阅读全文

posted @ 2020-07-23 15:56 滔Roy 阅读(217) 评论(0) 推荐(0) 编辑

Delphi XE RTL Androidapi 单元

摘要：Delphi XE RTL Androidapi 单元 19.0-android： Androidapi.AppGlue.pas Androidapi.AssetManager.pas Androidapi.AssetManagerJni.pas Androidapi.Bitmap.pas Andr 阅读全文

posted @ 2020-07-23 12:00 滔Roy 阅读(608) 评论(0) 推荐(0) 编辑

Delphi XE FMX TFmxObject 类和单元

摘要：Delphi XE FMX TFmxObject 类和单元 1、TFmxObject 类 TFmxObject IFreeNotification TAnimation TBitmapAnimation TBitmapListAnimation TColorAnimation TColorKey 阅读全文

posted @ 2020-07-22 09:09 滔Roy 阅读(775) 评论(0) 推荐(0) 编辑

SQL Server Date - CONVERT() 函数

摘要：SQL Server CONVERT() 函数 1、定义CONVERT() 函数是把日期转换为新数据类型的通用函数；可以用不同的格式显示日期/时间数据。 2、语法： CONVERT(data_type(length),data_to_be_converted,style) data_type(len 阅读全文

posted @ 2020-07-21 16:34 滔Roy 阅读(717) 评论(0) 推荐(0) 编辑

Delphi XE System.UIConsts 模块

摘要：Delphi XE System.UIConsts 模块 1、源代码： unit System.UIConsts; interface uses System.UITypes, System.Classes; const claAliceblue = TAlphaColors.AliceBlue; 阅读全文

posted @ 2020-07-21 09:58 滔Roy 阅读(297) 评论(0) 推荐(0) 编辑

SQL SERVER 查询数据库状态

摘要：SQL SERVER 查询数据库状态 --查询数据库状态 select name,user_access,user_access_desc, snapshot_isolation_state,snapshot_isolation_state_desc, is_read_committed_snaps 阅读全文

posted @ 2020-07-17 14:22 滔Roy 阅读(801) 评论(0) 推荐(0) 编辑

SQL SERVER 查看数据库执行过哪些语句（SQL历史语句记录）

摘要：SQL SERVER 查看数据库执行过哪些语句（SQL历史语句记录） 1、查看SQL执行效率和语句 Select TOP 1000 ST.text AS '执行的SQL语句', QS.execution_count AS '执行次数', QS.total_elapsed_time AS '耗时', 阅读全文

posted @ 2020-07-17 14:21 滔Roy 阅读(12740) 评论(0) 推荐(0) 编辑

SQL SERVER 查看所有触发器

摘要：SQL SERVER 查看所有触发器 SELECT object_name(a.parent_obj) as [表名] ,a.name as [触发器名称] ,(case when b.is_disabled=0 then '启用' else '禁用' end) as [状态] ,b.create_ 阅读全文

posted @ 2020-07-17 14:05 滔Roy 阅读(3403) 评论(0) 推荐(0) 编辑

Delphi XE 错误提示：[DCC Error] E2597...

摘要：Delphi XE 错误提示：[DCC Error] E2597... 原因：未知解决方法：按修改日期排序，将目录下最新生成的文件删除，再尝试调试（例如：\Android\Release\） . 创建时间：2020.07.17 更新时间：阅读全文

posted @ 2020-07-17 11:46 滔Roy 阅读(423) 评论(0) 推荐(0) 编辑

SQL SERVER 关于多层嵌套的方法

摘要：SQL 关于多层嵌套的方法 1、From 表 alter proc Pro_test1 as select t1.*,t2.Name from ( select * from Table1 )as t1 left join Table2 as t2 on t1.ID=t2.ID --exec Pro 阅读全文

posted @ 2020-07-17 11:39 滔Roy 阅读(1303) 评论(0) 推荐(0) 编辑

Delphi XE System.UITypes 颜色模块 TAlphaColor

摘要：Delphi XE System.UITypes 颜色模块 TAlphaColor 1、原代码： type TColorRef = UInt32; PColor = ^TColor; TColor = -$7FFFFFFF-1..$7FFFFFFF; {$IF NOT DEFINED(CLR)} { 阅读全文

posted @ 2020-07-17 10:32 滔Roy 阅读(469) 评论(0) 推荐(0) 编辑

Delphi XE 安卓Web开发错误：net::ERR_CLEARTEXT_NOT_PERMITTED

摘要：Delphi XE 安卓Web开发错误：net::ERR_CLEARTEXT_NOT_PERMITTED 解决方法： 1、确保已经申明权限（AndroidManifest.xml 文件） <uses-permission android:name="android.permission.INTER 阅读全文

posted @ 2020-07-16 09:46 滔Roy 阅读(1094) 评论(0) 推荐(0) 编辑

Delphi 错误提示：delphi Unable to create process：请求的操作需要提升

摘要：Delphi 错误提示：delphi Unable to create process：请求的操作需要提升原因分析：window权限不够解决方法：以管理员身份运行 Delphi 创建：2020.07.14 更新时间：阅读全文

posted @ 2020-07-14 09:29 滔Roy 阅读(1161) 评论(0) 推荐(0) 编辑

Delphi 错误提示： Unknown picture file extension (.jpg)

摘要：Delphi 错误提示： Unknown picture file extension (.jpg) 翻译：未知的图片文件扩展名（.jpg）解决方法： uses JPEG; 创建时间：2020.07.13 更新时间：阅读全文

posted @ 2020-07-13 10:26 滔Roy 阅读(881) 评论(0) 推荐(0) 编辑

SQL SERVER 两表比对更新、插入字段写法

摘要：SQL SERVER 两表比对更新、插入字段写法 1、插入 insert into 表1 (表1字段1，表1字段2) select 表2字段1，表2字段2 from 表2 insert into table1 (column1,column2,...) select column1,column2, 阅读全文

posted @ 2020-07-08 15:59 滔Roy 阅读(655) 评论(0) 推荐(0) 编辑

Delphi 判断字符串是否是数字、大小字母、小写字母、纯字母组成

摘要：Delphi 判断字符串是否是数字、大小字母、小写字母、纯字母组成 //判断字符串是否是数字，返回布尔值 function IsNumberic(Vaule:String):Boolean; var i:integer; begin result:=true; //设置返回值为是（真） Vaul 阅读全文

posted @ 2020-07-06 14:18 滔Roy 阅读(1251) 评论(0) 推荐(0) 编辑

计算机语言，学习心态

摘要：计算机语言，一直觉得永远不可能都懂，只有互相学习才是进步最快的一种方式，你研究的深(多)一点，我向你学习，我研究的深(多)一点，你向我学习，就这样而已。 -- 滔Roy 2020.07.03 阅读全文

posted @ 2020-07-03 08:21 滔Roy 阅读(175) 评论(0) 推荐(0) 编辑

Delphi 语法基础[1] 循环语句：While、Repeat、For

摘要：Delphi 语法基础[1] 循环语句：While、Repeat、For 1、While：执行While循环体时，先执行循环条件，判断若为真，则执行循环体，否则，跳出循环 While(循环条件) do //循环体； 2、Repeat //“直到型循环” （重复....直到...）: Repeat 阅读全文

posted @ 2020-07-02 14:42 滔Roy 阅读(5828) 评论(0) 推荐(0) 编辑

[原创]Delphi XE10 手机端错误提示：Detected problems with API compatibility (visit g.co/dev/appcompat for more info)

摘要：{该文首发于博客园滔Roy，无须授权即可转发，请自觉保留头部申明} Delphi XE10 手机端错误提示：Detected problems with API compatibility (visit g.co/dev/appcompat for more info) 解决方法： 1、升级你的S 阅读全文

posted @ 2020-07-01 10:08 滔Roy 阅读(947) 评论(0) 推荐(0) 编辑

[原创]Delphi XE10 针对全面屏手机端无法全面显示，下方显示黑条的处理

摘要：{该文首发于博客园滔Roy，无须授权即可转发，请自觉保留头部申明} Delphi XE10 针对全面屏手机端无法全面显示，下方显示黑条的处理解决方法： 1、找到安卓运行目录下的 AndroidManifest.xml 文件添加一条参数 2、或者在开发目录下的 AndroidManifest. 阅读全文

posted @ 2020-07-01 09:52 滔Roy 阅读(533) 评论(0) 推荐(0) 编辑

07 2020 档案

导航

搜索

积分与排名

随笔档案