LMU/musrsim
LMU/musrsim
5
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Bug fix in layer thickness scans.

Browse Source
This commit is contained in:
salman 2013-05-17 13:24:10 +00:00
parent 618de16f4c
commit eb534660f7
2 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
trimsp/src/TrimSPGUI/TrimSPGUI.pl
View File

@ -1,6 +1,6 @@
# Form implementation generated from reading ui file 'TrimSPGUI.ui' # 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) # by: The PerlQt User Interface Compiler (puic)
# #
# WARNING! All changes made in this file will be lost! # WARNING! All changes made in this file will be lost!
@ -2534,7 +2534,7 @@ sub StartSequenceOne
my $iScan=0; my $iScan=0;
foreach (@SValues) { foreach (@SValues) {
if ($All{"dRadio"}) { if ($All{"dRadio"}) {
layerTable->setText($All{"ScandL"},2,$_); layerTable->setText($All{"ScandL"}-1,2,$_);
} else { } else {
$ScanAttrib->setText($_); $ScanAttrib->setText($_);
} }
@ -2557,6 +2557,7 @@ sub StartSequenceOne
$Progress=$Progress+90/$#SValues; $Progress=$Progress+90/$#SValues;
Progress->setProgress($Progress); Progress->setProgress($Progress);
Progress->update(); Progress->update();
# qApp->processEvents();
$cmd = "cp $FILENAME.inp eingabe1.inp; ".$ENV{'TRIMBIN'}; $cmd = "cp $FILENAME.inp eingabe1.inp; ".$ENV{'TRIMBIN'};
system($cmd); system($cmd);

3
trimsp/src/TrimSPGUI/TrimSPGUI.ui.h
View File

@ -531,7 +531,7 @@ void TrimSPGUI::StartSequenceOne()
my $iScan=0; my $iScan=0;
foreach (@SValues) { foreach (@SValues) {
if ($All{"dRadio"}) { if ($All{"dRadio"}) {
layerTable->setText($All{"ScandL"},2,$_); layerTable->setText($All{"ScandL"}-1,2,$_);
} else { } else {
$ScanAttrib->setText($_); $ScanAttrib->setText($_);
} }
@ -554,6 +554,7 @@ void TrimSPGUI::StartSequenceOne()
$Progress=$Progress+90/$#SValues; $Progress=$Progress+90/$#SValues;
Progress->setProgress($Progress); Progress->setProgress($Progress);
Progress->update(); Progress->update();
# qApp->processEvents();
$cmd = "cp $FILENAME.inp eingabe1.inp; ".$ENV{'TRIMBIN'}; $cmd = "cp $FILENAME.inp eingabe1.inp; ".$ENV{'TRIMBIN'};
system($cmd); system($cmd);