怎么使用流TStream存储图片到窗体文件中（VCL中使用），高手请进。

做一个VCL，有一个图片属性，由于是一个数组属性，因此需要手工使用流来处理存储和读取，但却不知道怎么能一次存储了多种格式的图片。我现在只回使用
procedure TMyControl.ReadOnPicture(Stream:TStream);
begin
  Stream.Position:=0;
  FOnPicture[FIndex].Bitmap.LoadFromStream(Stream);
end;
procedure TMyControl.WriteOnPicture(Stream:TStream);
begin
  FOnPicture[FIndex].Bitmap.SaveToStream(Stream)
end;
可是这样只能存储Bitmap，遇到*.jpg和*.ico就没办法了，怎么办才能将这三种格式都处理了呢？