- fixed pengine2d_DelEmitter

git-svn-id: http://zengl.googlecode.com/svn/branches/0.3.x@1972 6573c10b-8653-0410-9706-d32479e959fb

src/zgl_main.pas

@@ -49,7 +49,7 @@ uses
 
 const
   cs_ZenGL    = 'ZenGL 0.3.7';
-  cs_Date     = '2013.01.24';
+  cs_Date     = '2013.01.27';
   cv_major    = 0;
   cv_minor    = 3;
   cv_revision = 7;

src/zgl_particles_2d.pas

@@ -541,7 +541,9 @@ begin
   if Assigned( pengine2d.ListU[ ID ] ) Then
     pengine2d.ListU[ ID ]^ := nil;
   emitter2d_Free( pengine2d.List[ ID ] );
-  pengine2d.List[ ID ] := pengine2d.List[ pengine2d.Count.Emitters - 1 ];
+  pengine2d.List[ ID ]    := pengine2d.List[ pengine2d.Count.Emitters - 1 ];
+  pengine2d.List[ ID ].ID := ID;
+  pengine2d.ListU[ ID ]   := pengine2d.ListU[ pengine2d.Count.Emitters - 1 ];
   DEC( pengine2d.Count.Emitters );
 end;