15得票1回答
Delphi:在OnBeforePost事件中取消TDataSet.Post操作

在我们的主数据输入屏幕上,我们在OnBeforePost事件中有一个确定/取消的对话框。 确定让事情顺其自然 取消 立即执行 Dataset.Cancel; 这样做可以实现它的目的,即撤消任何更改并将数据集置于浏览模式。 对于大多数客户来说,这是可以接受的,但我们被要求将其更改为 ...

15得票6回答
如果 "Assigned()" 无法检测到 "悬空指针",该如何检测?

在另一个问题中,我发现Assigned()函数与Pointer <> nil相同。我一直认为Assigned()是用来检测这些悬空指针的,但现在我知道它不行。悬空指针是那些可能在某个时候创建的指针,但已经被释放并且尚未分配给nil。 如果Assigned()无法检测悬空指针,那么...

15得票4回答
Delphi XE3生成的EXE文件大小比Delphi 7大25倍。

作为一个测试,我决定在Delphi 4、5、6、7、2005、2010和XE3中创建一个简单的“Hello world”应用程序。该应用程序仅包含一个TForm以及一个TButton并带有一个OnClick事件,该事件会调用ShowMessage('Hello world')。 下面是每个最...

15得票6回答
如何调整图片大小?

我有一张图片(500x500),但我需要将其调整大小为200x200并绘制在TImage上。如何实现这样的结果? 注意我知道TImage中的Stretch属性,但我想通过编程方式调整图像大小。

15得票5回答
在Delphi7中,我如何获取硬盘唯一序列号?

你好,我希望能够获取硬盘的唯一(硬件)序列号。我使用了一些函数,但是在Windows Seven或Vista中,由于管理员权限的问题,它们无法正常工作。是否可能在不以管理员身份运行的情况下检索它?

15得票1回答
如何查看文件的详细信息?

我该如何读取.exe文件的详细信息,例如文件版本,产品版本以及在文件属性窗口的“详细信息”选项卡中存储的其他所有信息? 谢谢。

14得票7回答
Delphi:如何将列表作为参数传递给SQL查询?

我有一个整数或字符串列表,并且需要将其作为参数传递给 Delphi DataSet。如何做? 这里是一个例子。我的查询(MyQuery)类似于:select * from myTable where intKey in :listParam 我会将参数设置为列表或数组或其他类似的东西:MyQ...

14得票1回答
拦截TAB键并禁止其功能

我需要在TEdits上拦截TAB键并通过编程方式抑制它们。在某些情况下,我不希望焦点改变到下一个控件。 我尝试在TEdit级别和具有KeyPreview=true的TForm上同时处理KeyPress、KeyDown事件。我从以下建议中获取了一些提示: 在RichEdit中拦截TAB键 ...

14得票4回答
如何在Delphi中创建XML文件

我是Delphi的新手,现在我需要创建一个XML。我的代码如下: unit writexml1;interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dia...

14得票3回答
使用Delphi递归删除所有文件和文件夹

我正在尝试递归删除一个文件夹及其所有子文件夹,但它根本不起作用。请问有谁可以检查一下我的代码并告诉我在这里做错了什么吗? 我正在Windows XP下通过D7运行此代码。if FindFirst (FolderPath + '\*', faAnyFile, f) = 0 then ...