Closed GoogleCodeExporter closed 9 years ago
Well! I don't know if will works, but I have created something like this: I
will test it!
procedure LoadEffectsFromAnotherParticleManager(var AParticleManager:
TPHXParticleManager);
var
Index: Integer;
AStream: TMemoryStream;
begin
for Index := 0 to GameParticles.Effects.Count - 1 do
begin
AStream := TMemoryStream.Create;
GameParticles.Effects[Index].SaveToStream(AStream);
AParticleManager.Effects.Add.LoadFromStream(AStream);
AStream.Free;
end;
end;
Original comment by wagenhei...@gmail.com
on 5 Feb 2011 at 12:59
Well... A Small Fix!
for Index := 0 to GameParticles.Effects.Count - 1 do
begin
AStream := TMemoryStream.Create;
GameParticles.Effects[Index].SaveToStream(AStream);
AStream.seek(0,soFromBeginning);
AParticleManager.Effects.Add.LoadFromStream(AStream);
AStream.Free;
end;
Original comment by wagenhei...@gmail.com
on 5 Feb 2011 at 1:08
Original comment by andreas....@gmail.com
on 8 Aug 2013 at 2:11
Original issue reported on code.google.com by
wagenhei...@gmail.com
on 5 Feb 2011 at 12:46