AbStatusIO* s = TNEW AbStatusIO();
		s->AddRef();
		d->AddRef();

		TuInt limit = nodeman-> GetObjectCount();
		TuInt c=0;

		s-> DataWrite_Start(d);

		while (1)
		{
			if (c>limit) { break; }

			if (nodeman-> IsFlagged(c) )
			{
				// TODO: Needs cast fail error
		TuSaveEnabledObject* x =
					dynamic_cast <TuSaveEnabledObject*> (nodeman->GetObjectFromSlot(c));
				s->WriteData(d, x);
			}

			c++;
		}
		s->DataWrite_Terminate(d);

		d->Release();
		s->Release();

//=================================================================

private:System::Void UpdateSceneList()
 {
	 TuInt c=0;
	 TuInt max = eng->GetObjectManager()->GetObjectCount();
	
	listBox3->Items->Clear();

		while (1)
		{
			if (c>max) 
			{
				break;
			}

			if (eng->GetObjectManager()->IsFlagged(c))
			{
			
			AbstractedObject* abob =   eng->GetObjectManager()->GetObjectFromSlot(c);
		
			String^ nname = ToNetString(abob->GetObjectID()->GetStringID());
			listBox3->Items->AddRange(gcnew cli::array< System::Object^  >(1) { nname });
			}

			++c;
		}
 }