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
;