Add new `TStream` adapter for `IStream`.

[delphidabbler]

TPJIStreamWrapper adapts a TStream and provides an IStream interface to it.

So the opposite (say TPJIStreamAdapter) that does the opposite could be useful.

The class could receive an additional Stat method to access IStream.Stat and return a record of relevant values. See the Microsoft STATSTG structure documentation.

[delphidabbler]

The class could receive an additional Stat method to access IStream.Stat and return a record of relevant values. See the Microsoft STATSTG structure documentation.

🌟 The record returned by the Stat method could contain a Name member containing the name of the stream. If so it is important to remember that after the name is copied to the field the relevant STATSTG field will need to be freed using the task allocator.