Cleared startup script from imprecations..
[toni-reis.git] / src / simulator-trackgui.ads
blobb30f96998e30902d05944d3793b8df830e01070e
1 -- include GTK
2 with Gdk.Event; use Gdk.Event;
3 with Gtk.Widget, Gtk.Handlers; use Gtk.Widget, Gtk.Handlers;
5 with Gtk.Label; use Gtk.Label;
6 with Gtk.Button; use Gtk.Button;
7 with Gtk.File_Chooser; use Gtk.File_Chooser;
8 with Gtk.File_Chooser_Button; use Gtk.File_Chooser_Button;
9 with Gtk.Text_View; Use Gtk.Text_View;
11 package Simulator.TrackGui is
12 -- elementi GUI usati da piu' procedure
13 ButtonFile : Gtk_File_Chooser_Button;
14 ButtonLoad : Gtk_Button;
15 Console : Gtk_Text_View;
17 procedure Init_Track_Gui;
18 procedure Print(str : String);
19 procedure Load_Config (Widget : access Gtk_Widget_Record'Class);
20 end Simulator.TrackGui;