问题标签 [delphi-4]

For questions regarding programming in ECMAScript (JavaScript/JS) and its various dialects/implementations (excluding ActionScript). Note JavaScript is NOT the same as Java! Please include all relevant tags on your question; e.g., [node.js], [jquery], [json], [reactjs], [angular], [ember.js], [vue.js], [typescript], [svelte], etc.

0 投票
1 回答
195 浏览

delphi - 如何为 Delphi 4 定义 IInterface 类型

似乎 Delphi 4 在 system.pas 中根本没有 IInterface 类型

我如何自己定义这种类型以便我可以使用 JEDI?

0 投票
1 回答
293 浏览

delphi - Delphi 4中的Unicode

我正在为一个长期存在的 Delphi 4 应用程序进行本地化。问题是我找不到 Delphi 4 的 unicode 组件。出于几个重要的原因,我真的很想继续使用 Delphi 4。

有人向我推荐了 TNTWare Delphi Unicode Components,但它们适用于 Delphi 6+。

有谁知道组件帽子可以做到这一点,或者是一种无需自己创建新组件即可完成此任务的方法?

0 投票
1 回答
400 浏览

delphi - TRichEdit 查找受保护的文本

我正在研究 TRichEdit (Delphi XE2)。

有什么办法可以检查richedit文本框是否包含受保护的文本?也是该受保护文本的起始位置,无需遍历整个文本。

目前我正在使用下面的代码

当文本很大时,上面的代码执行需要很长时间。

这曾经在delphi 4中正常工作

有人可以告诉为什么相同的代码在 delphi XE2 中使用更多时间而在 Delphi 4 中使用更少时间也是在 Delphi XE2 中执行此操作的正确方法吗?

0 投票
1 回答
113 浏览

delphi - 从父类继承使用

uses我在parent 的部分中添加了一些单位TForm

然后我去File > New...创建了一个继承我的表单的表单,它有用法。

子表单似乎无法访问父表单中使用的单位。

这是正确的行为还是可以继承使用?

0 投票
2 回答
192 浏览

pointers - 由于指针问题,旧项目无法在 Delphi 4 中编译

我根本没有使用 Delphi 的经验,我有一个非常古老的项目,可以在 Delphi 的 2nd、3rd 版本中编译,但不能在 Delphi 4 中工作。问题在于在新版本中工作方式不同的指针。

这些代码段导致错误“需要变量”:

其中 pEnabled 是:

pClrWire_s 和 pName_s 也是指针:

TpImage 和 TpNamed 的描述可以在项目的其他文件中找到:

这个问题能在不认真重写整个代码的情况下解决吗?是什么导致Delphi 4出现这样的问题?

0 投票
1 回答
36 浏览

delphi-4 - Delphi 4 从现在开始获取 YYYYMM 字符串

Now我想从程序和 Delphi 4 中当前字符串的前一个月获取字符串 'YYYYMM' 。

例如:(202106现在)和202105(现在 - 1)

怎么买得起?

0 投票
1 回答
148 浏览

delphi - (不)验证“任何键”+在 Delphi 4 上按下 DELETE

我不知道如何捕捉'any key'(except for CTRL) + 'Deletekey'媒体。我发现了如何验证 if CTRL + 'Deletekey'

原因是因为我需要做 2 个动作:

  1. 如果按下“CTRL”+“Deletekey”。(已经实现了这个)
  2. 仅当'Deletekey'被按下时。(遇到了问题,因为我可以组合'any key'(except for CTRL) + Deletekey 并且它会继续执行操作 2),但我需要在且仅当'Deletekey'按下时才执行此操作。

谢谢

编辑:感谢您的回复,我将展示我如何完成第 1 点:

上下文优先:我有一个名为 DPaint1KeyUp 的事件,它应该做什么?以图形方式删除绘制的元素(如果按下 DELETE)或以图形方式从数据库中删除,如果同时按下 CTRL + DELETE。

如果我同时按 CTRL + DELETE,它会完美运行(以图形方式和从 Database.Delete 中删除)。

但是,如果我同时按 DELETE 的任何组合(CTRL 除外),它会以图形方式删除,错误,因为如果我只需要以图形方式删除,我只需要按 DELETE,而不是任何其他组合

例如:

@fpiette “同时按下了一个键和 DeleteKey”