Subversion Repositories spk

Rev

Rev 9 | Rev 31 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 9 Rev 19
Line 968... Line 968...
968 
						{
 968 
						{
969 
							Creator::ImportShip ^import = gcnew Creator::ImportShip(m_pPackages, ofd->FileName, ls->GetData());
 969 
							Creator::ImportShip ^import = gcnew Creator::ImportShip(m_pPackages, ofd->FileName, ls->GetData());
970 
							import->ShowDialog(this);
 970 
							import->ShowDialog(this);
971 
							CXspFile *newShip = (import->Error()) ? NULL : import->GetShip();
 971 
							CXspFile *newShip = (import->Error()) ? NULL : import->GetShip();
972 
							if ( !newShip )
 972 
							if ( !newShip )
973 
								MessageBox::Show(this, "There was a problem when trying to import the ship\n" + ofd->FileName + " (" + ls->GetData() + ")", "Error Importing Ship", MessageBoxButtons::OK, MessageBoxIcon::Error);
 973 
								MessageBox::Show(this, "There was a problem when trying to import the ship\n" + ofd->FileName + " (" + ls->GetData() + ")\n\nError: " + import->getErrorString(), "Error Importing Ship", MessageBoxButtons::OK, MessageBoxIcon::Error);
974 
							else
 974 
							else
975 
							{
 975 
							{
976 
								PackageForm ^childForm = this->OpenPackage(true, newShip, "", "Imported Ship");
 976 
								PackageForm ^childForm = this->OpenPackage(true, newShip, "", "Imported Ship");
977 
								childForm->Text = "Imported Ship";
 977 
								childForm->Text = "Imported Ship";
978 
								newShip->SetChanged(true);
 978 
								newShip->SetChanged(true);