ada - 如何在Windows下分发GtkAda应用程序？

Question

我在 Windows 上分发 GtkAda 应用程序时遇到问题。我制作了一个可执行文件(使用 Windows native 编译器)并尝试在另一台 Windows 计算机上使用它。但是，我收到有关 dll 丢失的错误。

我尝试使用 .exe 分发三个文件夹。

• bin 包括 GtkAda 安装的 dll，
• etc，包括字体、gtk-3.0和pango，
• lib 还包括带有 dll 的 gtk-3.0。

这是我从 GtkAda documentation 中读到的内容

我想我可能忘记在项目文件中指定某些内容

这是我的 GPS 项目文件

with "C:\GNAT\GTK\lib\gnat\gtkada";

project Logfilter is
    for Source_Dirs use ("src");
    for Object_Dir  use "obj";
    for Exec_Dir    use "exec";
    for Main use ("log_filter_main.adb");

    package Builder is
      for Executable ("main.adb") use "Logs_Filter";
    end Builder;

    package Compiler is
      for Switches ("ada") use ("-Wl,--subsystem,windows");
    end Compiler;

end Logfilter;

我使用的是glade (gtk 3.14) 文件和GtkAda 2019。

谢谢。

Answer 1

您将主可执行文件 ( log_filter_main.exe ) 放在哪里？缺少哪些库？

当我使用下面的批处理程序创建目录结构时(更改变量GTKADA_INSTALL_DIR和TARGET_DIR以匹配您的情况)，然后将我的可执行文件(一个简单的GtkAda程序)复制到%TARGET_DIR%\bin ，那么这个可执行文件就可以正常运行。重要的是应用程序位于 bin文件夹，以便在启动过程中找到正确的 GTK 运行时库。

create_standalone.bat

SET GTKADA_INSTALL_DIR=C:\GNAT\2019\GtkAda
SET TARGET_DIR=C:\Test

xcopy /s /i %GTKADA_INSTALL_DIR%\bin\*.dll       %TARGET_DIR%\bin\
xcopy /s /i %GTKADA_INSTALL_DIR%\etc\*.*         %TARGET_DIR%\etc\
xcopy /s /i %GTKADA_INSTALL_DIR%\lib\gtk-3.0\*.* %TARGET_DIR%\lib\gtk-3.0\

REM  Copy your GtkAda application (.exe and other dependencies if applicable) 
REM  to %TARGET_DIR%\bin\

关于项目文件:首先，尚不完全清楚为什么Builder需要包，但我可能缺乏一些项目特定的知识/要求。其次，如果您想摆脱启动 GUI 应用程序时弹出的控制台窗口，那么您可能需要使用

package Linker is
  for Switches ("ada") use ("-mwindows");
end Linker;

而不是

package Compiler is
  for Switches ("ada") use ("-Wl,--subsystem,windows");
end Compiler;

注意:

超出问题范围的补充说明(您可能已经想到了):关闭主窗口时请不要忘记退出 GTK 主应用程序。定义(例如):

procedure Destroy_Event_Callback
   (Widget : access Gtk.Widget.Gtk_Widget_Record'Class)
is
begin
   Gtk.Main.Main_Quit;
end Destroy_Event_Callback;

然后在主窗口初始化时将其注册为回调:

Main_Window.On_Destroy (Destroy_Event_Callback'Access);

如果Gtk.Main.Main_Quit省略 call ，那么程序(进程)将在您关闭主窗口后继续运行(至少当您使用 -mwindows 链接器选项时)。