Delphi 组件创建设计时间

Question

到目前为止，为了让事情变得简单，我总是创建 Desingtime 和 Runtime 的组件，并且我使用了组件向导。它工作正常，但我发现将运行时和设计时分开会更好。

Frazioni.bpl 是仅 Runtine 包，它包含一个名为 uFraction.pas 的 pas 文件。它是分数的实用程序，它在这样的类中：

type
 TFraction = class(TComponent)
 end;

dclFrazioni 只是设计时。我正在阅读更多德尔福编码和尼克说：

对设计时包做的第一件事是设置它的 Requires 子句

好的，但是我该怎么做呢？我知道我必须链接运行时和设计时，但是如何？我已经构建了 Frazioni.bpl，但是当我右键单击 dclFrazioni 时，我必须添加一个引用，但我不知道如何。

仅设计时包将具有Register 过程。所以基本上：

• Frazioni.bpl = 具有一个（或多个）包含我需要的类的 pas 文件的运行时，它们继承自 TComponent。
• dclFrazioni.bpl = 带有包含注册过程的 pas 文件的设计时间

我迷路了，因为我不知道如何链接它们。

Answer 1

您可以通过将运行时包的名称添加到设计时包的项目文件的requires 部分来将您的设计时包链接到您的运行时包。

您可以按照以下步骤进行操作：

1. 右击dclFrazioni.bpl
2. 在Project Manager 窗口中单击View Source。
3. 将Frazioni（这是您的运行时包）添加到requires 部分。

生成的文件应如下所示：

package dclFrazioni;

{$R *.res}
....
{$IMPLICITBUILD OFF}

requires
  rtl,
  vcl,
  Frazioni;

contains
  (units...);

end.

Answer 2

在您的屏幕截图中，它为您的设计包列出了名为 Requires 的树视图项。 IIRC，您可以右键单击它并选择添加引用。然后选择你的运行时包。