delphi解码base64的多张图片,该怎么解决
delphi解码base64的多张图片
delphi 解码base64的多张图片的出现问题，求大神帮忙。
------解决思路----------------------
这个按照你自己的规则写到流中去，然后再反向借出来就行了哈
比如，
stream := base64(Image1);
s := stream.size;
MegStream.WriteBuffer(s,sizeof(s));
MegStream.Writebuffer(Stream.memory^,s);
stream := base64(Image1);
s := stream.size;
MegStream.WriteBuffer(s,sizeof(s));
MegStream.Writebuffer(Stream.memory^,s);
读的时候反向读，先读取长度，然后按照长度截取流，然后把这个截取出来的流，Base64解码，如此循环。就行了嘛！这个还可以用其他的格式，总之你自己定格式，自己解码就行了嘛
------解决思路----------------------
你的代码是D6版本，D7之后，就没有DecodeToStream函数了。
delphi 解码base64的多张图片的出现问题，求大神帮忙。
------解决思路----------------------
这个按照你自己的规则写到流中去，然后再反向借出来就行了哈
比如，
stream := base64(Image1);
s := stream.size;
MegStream.WriteBuffer(s,sizeof(s));
MegStream.Writebuffer(Stream.memory^,s);
stream := base64(Image1);
s := stream.size;
MegStream.WriteBuffer(s,sizeof(s));
MegStream.Writebuffer(Stream.memory^,s);
读的时候反向读，先读取长度，然后按照长度截取流，然后把这个截取出来的流，Base64解码，如此循环。就行了嘛！这个还可以用其他的格式，总之你自己定格式，自己解码就行了嘛
------解决思路----------------------
你的代码是D6版本，D7之后，就没有DecodeToStream函数了。