TWriter及TReader如何读写TPicture中的图像(30分)

如:
var
vStream: TFileStream;
vWriter: TWriter;
vReader: TReader;
vPicture: TPicture;
...
...
begin
...
...
vWriter.WriteString('asdfasdfasdf');
vWriter.WriteInteger(121);
vPicture.LoadFromFile('C:/aaa.jpg');
//如何写 vPicture 中的信息?????
vWriter.WriteString('567567567567');
vWriter.WriteInteger(12);
//
//
//
ShowMessage(vReader.ReaderString);
ShowMessage(IntToStr(vReader.ReaderInteger));
//如何读 流中的信息到 vPicture????
ShowMessage(vReader.ReaderString);
ShowMessage(IntToStr(vReader.ReaderInteger));
...
...
end;

试试这个
Picture.Graphic.SaveToStream(vStream);
Picture.Graphic.LoadFromStream(vStream);
否则就直接用 Read/Write，这样要自己生成 Buf
Writer.Write(Buf, Count);