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

Added GPL License. Added H projectile.

Browse Source
This commit is contained in:
salman
2009-08-11 13:31:33 +00:00
parent 4e29e436a7
commit 5537884683
4 changed files with 43 additions and 16 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
trimsp/TrimSPGUI/TrimSPGUI.pl
View File

@ -1,6 +1,6 @@
# Form implementation generated from reading ui file 'TrimSPGUItabs.ui'
#
# Created: Tue Aug 11 12:14:49 2009
# Created: Tue Aug 11 15:28:40 2009
# by: The PerlQt User Interface Compiler (puic)
#
# WARNING! All changes made in this file will be lost!
@ -24,6 +24,7 @@ use Qt::slots
DirectoryBrowse => [],
ConfirmQuit => [];
use Qt::attributes qw(
Progress
tabs
LayersTab
groupBox1
@ -136,7 +137,6 @@ use Qt::attributes qw(
NProjRadio
dRadio
ScandL
Progress
TrimSPGUIHelp
);
@ -797,6 +797,10 @@ sub NEW
setModal(1 );
Progress = Qt::ProgressBar(this, "Progress");
Progress->setGeometry( Qt::Rect(0, 525, 715, 20) );
Progress->setFrameShape( &Qt::ProgressBar::WinPanel() );
tabs = Qt::TabWidget(this, "tabs");
tabs->setGeometry( Qt::Rect(0, 0, 715, 525) );
@ -1249,10 +1253,6 @@ sub NEW
ScandL->setMaxValue( int(7) );
ScandL->setMinValue( int(1) );
tabs->insertTab( ScansTab, "" );
Progress = Qt::ProgressBar(this, "Progress");
Progress->setGeometry( Qt::Rect(0, 525, 715, 20) );
Progress->setFrameShape( &Qt::ProgressBar::WinPanel() );
languageChange();
my $resize = Qt::Size(717, 547);
$resize = $resize->expandedTo(minimumSizeHint());
@ -1307,6 +1307,7 @@ sub languageChange
ProjType->insertItem( trUtf8("Muon") );
ProjType->insertItem( trUtf8("Li8") );
ProjType->insertItem( trUtf8("B12") );
ProjType->insertItem( trUtf8("H") );
Qt::WhatsThis::add(ProjType, trUtf8("Choose the projectile type."));
NLabel->setText( trUtf8("Number of projectiles") );
z0Label->setText( trUtf8("Starting depth [Å]") );
@ -1484,7 +1485,7 @@ sub ProjSmartDefaults
# For Li8 set Sigma E=0 eV and Sigam angle=0 degrees by default
SigE->setText("0");
SigAngle->setText("0");
}
}
}
@ -1603,10 +1604,6 @@ sub CollectValues
# Filenames etc.
$All{"FNPre"}=FNPre->text();
$All{"Path"}=Path->text();
if ($All{"Path"} eq "./") {
Path -> setText($ENV{'PWD'});
$All{"Path"}=Path->text();
}
# Scan parameters only if selected
$All{"ScanSeq"}=ScanSeq->isChecked();