...
my $edit_window = $main_window->Toplevel();
my $edit_action = $edit_window->Frame()->pack();

my $edit_SaveCopyButton = $edit_action->Button(
    -text    => 'Kopie Speichern',
    -command => [\&SaveRecord,'copy'],
);