my $Fenster_Benutzer_Verwaltung = MainWindow -> new( -title => 'Benutzer - Verwaltung' );
	
my $Breite = 1184;
my $Hoehe  = 318;
	
$Fenster_Benutzer_Verwaltung -> geometry( $Breite . 'x' . $Hoehe );

my $Leiste = $Top_Level -> Menu( -type => 'menubar' );
$Top_Level -> configure( -menu => $Leiste );
	
my $Datei_Befehle = $Leiste -> cascade( -label   => '~Datei' , -tearoff => 0 );

#-----------------------------------------------------------------------------
	
my $Auflistung_Benutzer_Inhalte = $Fenster_Benutzer_Verwaltung -> MListbox( );
	
my $Importierung_Details = $Datei_Befehle -> cget( -menu ) -> Menu( -tearoff => 0 );
	
 $Datei_Befehle -> cascade( -label => "Importierung  " , -menu => $Importierung_Details );

$Importierung_Details -> command( -label => "CSV" , -command => [ \&CSV_Importierung , $Fenster_Benutzer_Verwaltung , $Auflistung_Benutzer_Inhalte ] );
$Importierung_Details -> command( -label => "XML" , -command => [ \&Importierung , "XML"  ] );
						
#----------------------------------------------------------------------------