0

GPS によって生成されたテンプレートからの次のプログラムを使用して、GPS で少し遊びたいと思っていました。

ビルドして実行しようとするとウィンドウが表示されませんが、実行可能ファイルが作成されたフォルダーに移動すると、実行可能ファイルを実行してウィンドウを表示できます。このタブが作成されたことはわかりますが、アプリケーションが表示されません。

with Gtk.Box;         use Gtk.Box;
with Gtk.Label;       use Gtk.Label;
with Gtk.Widget;      use Gtk.Widget;
with Gtk.Main;
with Gtk.Window;      use Gtk.Window;

procedure Main is

   Win   : Gtk_Window;
   Label : Gtk_Label;
   Box   : Gtk_Vbox;

begin
   --  Initialize GtkAda.
   Gtk.Main.Init;

   --  Create a window with a size of 400x400
   Gtk_New (Win);
   Win.Set_Default_Size (400, 400);

   --  Create a box to organize vertically the contents of the window
   Gtk_New_Vbox (Box);
   Win.Add (Box);

   --  Add a label
   Gtk_New (Label, "Hello world.");
   Box.Add (Label);

   --  Show the window
   Win.Show_All;

   --  Start the Gtk+ main loop
   Gtk.Main.Main;
end Main;

GPSタブラン

プログラムが実行されていることを確認Ada.Text_IO.Put_Line("Hello, World!");し、ソースを挿入しようとしましたが、[実行] タブに従って実行されているようです。

4

2 に答える 2