平时写注册表都是直接create()完事，最近操作HKEY_LOCAL_MACHINE win64读取注册表取出来的是空值。 原来HKEY_LOCAL_MACHINE这个主键下的项，在64位系统下可能会重定向，所以构造时要加KEY_WOW64_64KEY。 Reg := TRegistry.Create(KEY_ALL_ACCESS or KEY_WOW64_64KEY); 留存搞定。
[VBA]VBA实现公式的下拉填充
在勤哲的开发过程中，模板套用了Excel的{…}数组公式内容，导致增加行时不能自动填充素组公式。 先不管是不是平台的问题，我们要解决目前可用的状况，只能VBA了。 代码如下仅供参考: Private Sub CommandButton5_Click() Dim i As Integer Dim oAdd As Object Application.ScreenUpdating = False Set oAdd = Application.COMAddIns.Item("ES
[NAS]蜗牛星际之黑群晖硬盘休眠
问题所在: 硬盘不能休眠，有人说装在SSD里面就是不能休眠。 解决思路: 直接PE启动，然后加载ssd第一个分区就能找到文件 启动盘grub.cfg修改启动参数，找到 set sata_args='SataPortMap=4' 改成 set sata_args='DiskIdxMap=0F00' 保存退出, 然后改成默认和以后都从第三项 "DS918+ 6.2.1/6.2 VMWare/ESXI with Jun's Mod v1.04
[Delphi]深入了解Delphi中的四种消息框
Delphi中平常使用的消息框有四种形式，有ShowMessage、MessageDlg、Application.MessageBox、MessageBox。下面来深入了解下这四种形式的实现和使用。 1.ShowMessage 显示一个带"OK"按钮的消息框 使用这个函数可以显示一个简单的带"OK"按钮的消息框，消息框的标题是应用程序的标题名，参数Msg字符串显示在消息框上。其源码如下： procedure ShowMes
[闲话]程序员最核心的竞争力是什么？
进行社招面试时，有一个问题几乎是必问的： 你为什么要离开上一家公司？ 其实这个问题主要是想试探一下求职者的核心诉求，并借此预估一下他在本公司工作的稳定性。常见的答案也无非就是这么几种：对薪酬不满意、干得不爽，或者是想换个环境。 然而，我遇到过好几个初次跳槽的求职者给出的答案是：「在原来的公司学不到技术」。 一听到这个，我就不由得叹口气：今天这一小时又算是交代了，这人基本上没戏。 程序员最核心的竞争力——「学习力」 如果有人问我：你在面试程序员时，最看中的是什么能力？那我的
[Python]Django在根据models生成数据库表时报 __init__() missing 1 required positional argument: ‘on_delete’
今天倒腾Django知识，在根据models生成数据库表时报 __init__() missing 1 required positional argument: 'on_delete' 解决办法： 将代码改为： herobook=models.ForeignKey('BookInfo',on_delete=models.CASCADE,) 即在外键值的后面加上 on_delete=models.CASCADE 原因： 在django2.0后，定义外键和一对一关系
[ChinaCock]CCVirtualKeyboardHandlerPanel彻底解决虚拟键盘挡住输入框问题
声明：原文作者ChinaCock作者，在此只做转载。 一、步骤 1.先获取ChinaCockFMX控件（这一步最难，也是简单得批爆的开始，希望不要在这步就选择放弃） 2.将CCVirtualKeyboardHandlerPanel拖到界面上 设置Align为Client或Top或其他，根据自己界面情况来。 3.拖一个FMX自带控件VertScrollBox例如名称为：VertScrollBox1放在CCVirtualKeyboardHandlerPanel控件中，并将VertScr