TPicture.LoadFromStream(TStream) が一度しか使えない

解決


Jasmine  URL  2019-08-20 00:56:23  No: 49856  IP: 192.*.*.*

画像ファイル(jpeg,gif,bmp,png)を hoge.xxx ,
Stream : Tstream;
Picture1, Picture2 : Tpicture;
とします。
画像ファイルをStream で読みとって,複数のPictureで描画したいのです。そこで,

Stream.LoadFromfile(hoge.xxx);
Picture1.LoadFromStream(Stream);
Picture2.LoadFromStream(Stream);

としたところ,
Picture1 にはうまく画像が表示されるのですが,
Picture2 には表示されません。

ひとつのStreamを使って,何度もPictureに描画したいのですが,どのようにしたらよいのでしょうか。

編集 削除
通りすがり  2019-08-20 06:18:41  No: 49857  IP: 192.*.*.*

Stream.Position := 0;
でいかが?

編集 削除
Jasmine  2019-08-20 08:51:46  No: 49858  IP: 192.*.*.*

解決しました。
LoadFromStreamでは,読み込まれるStreamのPositionが変化するのですね。
ありがとうございました。

編集 削除