问题标签 [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.
delphi - 如何为 Delphi 4 定义 IInterface 类型
似乎 Delphi 4 在 system.pas 中根本没有 IInterface 类型
我如何自己定义这种类型以便我可以使用 JEDI?
delphi - Delphi 4中的Unicode
我正在为一个长期存在的 Delphi 4 应用程序进行本地化。问题是我找不到 Delphi 4 的 unicode 组件。出于几个重要的原因,我真的很想继续使用 Delphi 4。
有人向我推荐了 TNTWare Delphi Unicode Components,但它们适用于 Delphi 6+。
有谁知道组件帽子可以做到这一点,或者是一种无需自己创建新组件即可完成此任务的方法?
delphi - TRichEdit 查找受保护的文本
我正在研究 TRichEdit (Delphi XE2)。
有什么办法可以检查richedit文本框是否包含受保护的文本?也是该受保护文本的起始位置,无需遍历整个文本。
目前我正在使用下面的代码
当文本很大时,上面的代码执行需要很长时间。
这曾经在delphi 4中正常工作
有人可以告诉为什么相同的代码在 delphi XE2 中使用更多时间而在 Delphi 4 中使用更少时间也是在 Delphi XE2 中执行此操作的正确方法吗?
delphi - 从父类继承使用
uses
我在parent 的部分中添加了一些单位TForm
。
然后我去File > New...
创建了一个继承我的表单的表单,它有用法。
子表单似乎无法访问父表单中使用的单位。
这是正确的行为还是可以继承使用?
pointers - 由于指针问题,旧项目无法在 Delphi 4 中编译
我根本没有使用 Delphi 的经验,我有一个非常古老的项目,可以在 Delphi 的 2nd、3rd 版本中编译,但不能在 Delphi 4 中工作。问题在于在新版本中工作方式不同的指针。
这些代码段导致错误“需要变量”:
其中 pEnabled 是:
pClrWire_s 和 pName_s 也是指针:
TpImage 和 TpNamed 的描述可以在项目的其他文件中找到:
这个问题能在不认真重写整个代码的情况下解决吗?是什么导致Delphi 4出现这样的问题?
delphi-4 - Delphi 4 从现在开始获取 YYYYMM 字符串
Now
我想从程序和 Delphi 4 中当前字符串的前一个月获取字符串 'YYYYMM' 。
例如:(202106
现在)和202105
(现在 - 1)
怎么买得起?
delphi - (不)验证“任何键”+在 Delphi 4 上按下 DELETE
我不知道如何捕捉'any key'(except for CTRL) + 'Deletekey'
媒体。我发现了如何验证 if CTRL + 'Deletekey'
。
原因是因为我需要做 2 个动作:
- 如果按下“CTRL”+“Deletekey”。(已经实现了这个)
- 仅当
'Deletekey'
被按下时。(遇到了问题,因为我可以组合'any key'(except for CTRL) + Deletekey
并且它会继续执行操作 2),但我需要在且仅当'Deletekey'
按下时才执行此操作。
谢谢
编辑:感谢您的回复,我将展示我如何完成第 1 点:
上下文优先:我有一个名为 DPaint1KeyUp 的事件,它应该做什么?以图形方式删除绘制的元素(如果按下 DELETE)或以图形方式从数据库中删除,如果同时按下 CTRL + DELETE。
如果我同时按 CTRL + DELETE,它会完美运行(以图形方式和从 Database.Delete 中删除)。
但是,如果我同时按 DELETE 的任何组合(CTRL 除外),它会以图形方式删除,错误,因为如果我只需要以图形方式删除,我只需要按 DELETE,而不是任何其他组合
例如:
@fpiette “同时按下了一个键和 DeleteKey”