Fix bug in input file generation.
This commit is contained in:
parent
438ca3f007
commit
3740a74381
@ -399,9 +399,9 @@ sub CreateInpFile()
|
||||
|
||||
# Get values from form
|
||||
my %All = CollectValues();
|
||||
my $projComboBox=$All{"projComboBox"};
|
||||
$All{"ProjZ"}=sprintf("%6.2f",Chem::Zof($projComboBox));
|
||||
$All{"ProjAM"}=sprintf("%6.2f",Chem::Massof($projComboBox));
|
||||
my $projectile=this->{ui}->projComboBox->currentText();
|
||||
$All{"ProjZ"}=sprintf("%6.2f",Chem::Zof($projectile));
|
||||
$All{"ProjAM"}=sprintf("%6.2f",Chem::Massof($projectile));
|
||||
|
||||
# This is the flag for checking layers
|
||||
my $Check=0;
|
||||
@ -539,6 +539,15 @@ sub StartSequenceOne()
|
||||
my @SdzValues=();
|
||||
my $cmd="";
|
||||
|
||||
if (!$ENV{'TRIMBIN'}) {
|
||||
# If trim.sp binary is not defined give warning and return
|
||||
my $Warning = Qt::MessageBox::information( this, "Warning!",
|
||||
"Warning:\n TrimSP binary is not found.\n Define using the Configuration tab.");
|
||||
return(0);
|
||||
|
||||
}
|
||||
|
||||
|
||||
# Cleanup from old files
|
||||
if (-e "ausgabe1.inp") {
|
||||
system("rm -f ausgabe*");
|
||||
|
@ -5,7 +5,7 @@
|
||||
#################################################################################
|
||||
## Form generated from reading UI file 'TrimSPGUI4.ui'
|
||||
##
|
||||
## Created: Tue Feb 5 15:16:21 2013
|
||||
## Created: Tue Feb 5 16:22:06 2013
|
||||
## by: Qt User Interface Compiler version 4.8.4
|
||||
##
|
||||
## WARNING! All changes made in this file will be lost when recompiling UI file!
|
||||
|
Loading…
x
Reference in New Issue
Block a user