如何在不安装 IDE 的情况下编译和运行此 Delphi 代码？

Question

据说要生成一个winform：

var
  F : TForm;
  L : TLabel;
begin
  F := TForm.Create(Application);
  L := TLabel.Create(F);
  L.Parent := F; // Needed to have it show up on the form.
  L.Left := 50;
  L.Top := 50;
  L.Caption := 'This is an example';
  F.Show;
end;

事实上它来自my previous question。

如果是C程序，我可以这样运行：

> gcc foo.c -o foo.exe
> foo.exe

如何在 Delphi 中进行类似操作？

Answer 1

为了编译 Delphi 代码，您需要一个编译器。 Delphi 不再提供免费版本，因此除非您能找到旧版本，否则您将不得不购买 Delphi。 Delphi 自带 gcc 等命令行编译器，无需 IDE 也能编译程序。

Delphi 2006 和 win32 之前的版本：

dcc32 YourProject.dpr

Delphi 2006 及之前的 .Net：

dccil YourProject.dpr

Delphi 2007 及之后：

msbuild YourProject.dproj

这将生成一个已编译的二进制文件，如果是 EXE，您可以像以前一样运行它。

Delphi 有免费的替代品，例如 FreePascal 和他们的免费 IDE Lazarus。我自己没有检查过，但我很确定它也带有命令行编译器。

Answer 2

您应该在 DPR 文件中编写此代码。 DPR 文件的一般结构是这样的：

program {ProgramName};

uses {List of used units};

begin
  {Your code}
end.

因此对于上述代码，您的 DPR 文件将如下所示：

program Project1;

uses
  Forms, StdCtrls;

var
  F : TForm;
  L : TLabel;
begin
  F := TForm.Create(nil);
  try
    L := TLabel.Create(F);
    L.Parent := F; // Needed to have it show up on the form.
    L.Left := 50;
    L.Top := 50;
    L.Caption := 'This is an example';
    F.ShowModal;
  finally
    F.Free;
  end;
end.

您可以在文本编辑器中键入此代码，并将其保存为 Project1.dpr。

现在你可以使用 Delphi 的命令行编译器来编译它了：

dcc32.exe Project1.dpr

Answer 3

简单多了

dcc32 "name of the project"

即使程序存在于 10 个单元之外，如果在当前单元搜索路径中，编译器也会自动解析它（参见 dcc32.cfg，或使用 -U 和 -I 添加目录）。请注意，Delphi 的某些“免费”资源管理器版本不附带 cmdline 编译器。

对于 .NET，它是 dccil。

当然，如果与 gcc 相比，Free Pascal/Lazarus 是更合乎逻辑的选择（但不适用于 .NET）。