diff --git a/trimsp/src/TrimSPGUI/TrimSPGUI.pl b/trimsp/src/TrimSPGUI/TrimSPGUI.pl
index 42c4b3b..c1ba532 100644
--- a/trimsp/src/TrimSPGUI/TrimSPGUI.pl
+++ b/trimsp/src/TrimSPGUI/TrimSPGUI.pl
@@ -1,6 +1,6 @@
 # Form implementation generated from reading ui file 'TrimSPGUI.ui'
 #
-# Created: Fri May 17 13:00:15 2013
+# Created: Fri May 17 15:23:54 2013
 #      by: The PerlQt User Interface Compiler (puic)
 #
 # WARNING! All changes made in this file will be lost!
@@ -2534,7 +2534,7 @@ sub StartSequenceOne
 	my $iScan=0;
 	foreach (@SValues) {
 	    if ($All{"dRadio"}) {
-		layerTable->setText($All{"ScandL"},2,$_);	
+		layerTable->setText($All{"ScandL"}-1,2,$_);	
 	    } else {
 		$ScanAttrib->setText($_);
 	    }
@@ -2557,6 +2557,7 @@ sub StartSequenceOne
 	    $Progress=$Progress+90/$#SValues;
 	    Progress->setProgress($Progress);
 	    Progress->update();
+#	    qApp->processEvents();
 	    $cmd = "cp $FILENAME.inp eingabe1.inp; ".$ENV{'TRIMBIN'};
 	    system($cmd);
 	    
diff --git a/trimsp/src/TrimSPGUI/TrimSPGUI.ui.h b/trimsp/src/TrimSPGUI/TrimSPGUI.ui.h
index 0697b0f..5bc777f 100644
--- a/trimsp/src/TrimSPGUI/TrimSPGUI.ui.h
+++ b/trimsp/src/TrimSPGUI/TrimSPGUI.ui.h
@@ -531,7 +531,7 @@ void TrimSPGUI::StartSequenceOne()
 	my $iScan=0;
 	foreach (@SValues) {
 	    if ($All{"dRadio"}) {
-		layerTable->setText($All{"ScandL"},2,$_);	
+		layerTable->setText($All{"ScandL"}-1,2,$_);	
 	    } else {
 		$ScanAttrib->setText($_);
 	    }
@@ -554,6 +554,7 @@ void TrimSPGUI::StartSequenceOne()
 	    $Progress=$Progress+90/$#SValues;
 	    Progress->setProgress($Progress);
 	    Progress->update();
+#	    qApp->processEvents();
 	    $cmd = "cp $FILENAME.inp eingabe1.inp; ".$ENV{'TRIMBIN'};
 	    system($cmd);