如何在Delphi XE6中通过javascript从TWebBrowser回调Delphi函数以支持所有平台（包括iOS和ANDROID）？
我需要在Delphi XE6上为Android和iOS创建一个应用程序。该应用程序必须使用TWebBrowser来显示Google Maps，因此我需要从Delphi向JavaScript“发送”命令，并从JavaScript接收命令以便在地图上显示标记，并知道用户何时单击标记。我在网络上找到...
使用ModalResult退出表单
我有一堆表单，我想自动化它们，让它们可以自己打开和关闭。 我知道如何让它们打开（通过设置OnActivate函数），但是我无法关闭它们。 例如，我有：procedure TProgressForm.FormActivate(Sender: TObject); begin inherit...
如何追踪一个Heisenbug
最近我们收到了一位用户的错误报告：我们软件中屏幕上显示了错误的内容。但是我们在开发环境（Delphi 2007）中无法复现这个问题。 经过进一步研究，发现只有当“代码优化”开启时才会出现这个错误。 这里是否有任何有经验的人来帮忙解决这个Heisenbug问题？在 Delphi 软件中，是否...
如何修改 TList<record> 的值？
Delphi 2010 如何修改 TList<record> 中的值？type TTest = record a,b,c:Integer end; var List:TList<TTest>; A:TTest; P:Pointer; .... .... ...
Delphi XE与Aero效果导致绘制问题
我从2009升级到了Delphi XE，遇到了一个奇怪的问题。 我创建了一个新项目，在其中放置了一个TRibbon控件，编译并运行。保持窗体在默认大小下最小化和还原，没有问题。然后我将窗体最大化，最小化和还原，窗体的颜色就会变成黑色。 我没有随机代码来改变窗体颜色，并且使用所有默认的Del...
在Delphi中：如何将TDateTime四舍五入到最接近的秒、分钟、五分钟等？
在Delphi中是否存在一种可以将TDateTime值四舍五入到最接近的秒、最接近的小时、最接近的5分钟、最接近的半小时等的例程？ 更新: Gabr提供了一个答案。由于完全缺乏测试，可能会有一些小错误；我稍微整理了一下并进行了测试，以下是最终（？）版本：function RoundDate...
如何确定鼠标指针是否在控件内部
我正在向TScrollBox添加鼠标滚轮移动支持（使用FormMouseWheel过程），我需要确定鼠标是否在组件内。 基本上，我需要确定鼠标是否在TScrollBox内，以便相应地处理滚动代码。 有什么好的方法吗？ 编辑：这里是代码（包括答案），希望对其他人有所帮助： proced...
Delphi如何解析JSON数组或者序列？
这是我想要解析的示例JSON： [ { "a":{ "username":"aaa", "email":"aaa@gmail.com" } }, { "b":{ "username":"bbb", "emai...
如何在类具有重载构造函数的情况下隐藏继承的TObject构造函数？
看一下这个类：TTest = class(TObject) public constructor Create(A:Integer);overload; constructor Create(A,B:Integer);overload; end; 现在，当我们想要使用这...
Delphi字符串泄漏
我正在使用Delphi XE编写一个应用程序，该应用程序使用RemObjects SDK进行通信（这可能与问题有关）。我开启了FastMM调试模式，有时候（并不总是）当我关闭应用程序时，会出现关于单个“意外内存泄漏”的警告。“发生了意外的内存泄漏。意外的小块泄漏包括：117-124字节：Uni...