GUI 应用程序中的空主窗体从 Delphi 转换为 Lazarus

Question

我已将 2 个 GUI 应用程序从 Delphi 转换为 Lazarus。 这两个应用程序都针对 Win32 平台、i386 进行编译，并带有 GUI。 主表单使用 Lazarus 工具转换，可以从 IDE 进行编辑。 但是当我运行这样的应用程序时，主窗体不会出现，只有空白窗体，没有任何控件。

我尝试对此进行调试。它运行初始化部分中的所有代码， 并运行 .lpr 项目中的代码，但 CreateForm() 中出现错误，因为 它不会在主窗体 OnCreate 事件中运行代码。在事件日志中我可以看到所有 我写入的文本在关闭此空表单后出现 ' 。

.lpr 项目中的代码：

  Application.Initialize;
  AddToEventLogInfo('App.CreateForm');
  Application.CreateForm(TfrmTst, frmTst);
  AddToEventLogInfo('App.Run>');
  Application.Run;
  AddToEventLogInfo('<App.Run');

我检查了我是否能够从 Lazarus 创建简单的 GUI 应用程序，但两者都转换为 GUI 应用程序无法按预期运行。有什么问题吗？我错过了什么吗？ 也许拉撒路写的众多警告和提示之一很重要？

当我运行我的应用程序时，Lazarus 写道：

  windres: warning: 14: "MAINICON": 1045: duplicate value
  windres: warning: 16: 1: 1045: duplicate value
  Project "Tst_fpc" successfully built. :)

编辑：

Lazarus 转换工具已转换 .dfm -> .lfm，但 .pas 文件存在一些问题。我必须手动：

1. 将 Lazarus 单位添加到用途：

   用途 {$IFDEF FPC} LCLIntf、L 资源、 {$ENDIF}

2. 条件编译Delphi形式{$R *.dfm}：

   {$IFNDEF FPC} {$R *.dfm} {$ENDIF}

3. 在初始化代码中添加.lrs资源：

   初始化 {$IFDEF FPC} {$i myunit.lrs} {$ENDIF}

Answer 1

我怀疑主窗体单元（我假设它称为 utest）在其初始化部分中没有 {$I utest.lrs} 。 .lrs 是 lazarus 资源文件，由 delphi 中的 lfm (dfm) 创建。

Answer 2

空表单是当前项目的表单，因为您使用工具中的转换 Delphi 项目，这意味着当前项目处于活动状态。
试试这个：

• 在项目选项上关闭当前项目。
• 在名为项目向导的小主窗口中，使用转换 Delphi 项目选项。

Answer 3

很抱歉我不能给你一个直接的答案。据我了解，资源文件有问题。在delphi中，这是*.res，我不知道它们在Lazarus中是什么样子。使用 resedit 等程序 http://www.resedit.net/ 打开资源文件。我尝试了一下，发现一个“文件夹”图标，其中有一个帖子 MANICON。我猜你有两个。在这种情况下，请删除其中一个。