Method SaveAllToStream do not saves all properties

[acorrea]

Hi,


I use the method "SaveAllToStream" and it no save all properties. After the execution of the LOAD I was to inspect the content of TStream variable and see that have it only the data of the last property of the list.

Var
CP : TMemoryStream;
Begin
begin
CP := TMemoryStream.create;

siLangRT1.SaveAllToStream(CP,'~!@#');

CP.Position := 0;
Memo1.Lines.LoadFromStream(CP);
CP.Free

If you to verify the content of the Memo1 it will see that it did not load all properties (captions, hints, strings...)

1) The way to use load is correct?

2) In case that he is correct, I verified with delphi debug and found the problem. Through the fix that I made in the component source he works correctly.



Tanks

[isiticov]

Sorry, please set:
siLangRT1.DoNotEmptyStream := True;
before saving to stream.
Please let me know if this helps.
We will add the notice for this in documentation.
Thank you.

[acorrea]

OK!



Tanks!