Delphi 语法基础[1] 循环语句：While、Repeat、For 1、While：执行While循环体时 ，先执行循环条件，判断若为真，则执行循环体，否则，跳出循环 While(循环条件) do //循环体； 2、Repeat //“直到型循环”: Repeat //循环体； Until（循 ...
【问题原因】 该问题是由于微软从 Windows 8 开始，GetKeyboadLayouts 函数不再有效，而 VCL 中仍然是通过该方法获取输入法列表造成的。希望下个版本的 Delphi/C++ Builder 能够解决。 【解决办法】 如果是 Win8+，则自己从注册表读，如果是Win 7 等 ...
Delphi盒子 www.2ccc.com 2Pascal-新时代的Pascal http://www.2pascal.com WeDelphi http://www.WeDelphi.com 新大富翁论坛 http://www.dfwlt.com/forum.php 万一的博客：http://ww ...
function selectdir: string; //如果取消取返回为空，否则返回选中的路径 var Info: TBrowseInfo; IDList: pItemIDList; Buffer: PChar; begin result := ''; Buffer := StrAlloc(MA ...
{*******************************************************} { } { Delphi公用函数单元 } { } { 版权所有 (C) 2008 } { } {******************************************** ...
在windows系统中，可以通过Regsvr32来实现注册ocx或者dl， 编程时，调用Regsvr32来注册，却不能正常执行。尤其是在Win7系统中，需要管理员身份才能运行。 使用下面的代码则能正常注册。 //注册 function RegisterDllServer(FileName: stri ...
Delphi XE TMediaplayer 错误：unsupported media file 出现错误：windows 端 ,移动端正常 解决思路： 创建时间;2020.06.29 更新时间：2020.06.29 ...
Delphi XE Android/IOS 手势介绍[1] 1、标准手势 TStandardGesture sgLeft = sgiLeft, sgRight = sgiRight, sgUp = sgiUp, sgDown = sgiDown, sgUpLeft = sgiUpLeft, sgUp ...
分类：
移动开发 时间：
2020-06-26 13:11:25
阅读次数：
84
https://www.cnblogs.com/FKdelphi/p/4654522.html 几乎每个Windows应用程序都使用图标、图片、光标等资源。资源是程序的一部分，但是它是不可执行代码。下面我们就详细介绍资 源文件在Delphi5中建立和使用方法。 1．把资源放到Exe文件的优点 由于定 ...
FormCreate 加一条 ReportMemoryLeaksOnShutdown:=true; 退出程序的时候，如果有内存泄漏,会弹出一个对话框. *1就是有1个，3就是有3个，2就是有2个 13 - 20 bytes: TJSONNumber x 1, TJSONObject x 1, TJS ...
