解决Delphi传stream参数时出现Stream read error错误提示

有时候我们会把内存流，文件流等作为参数传递给函数内部使用。
在传参之前必须加上 dMem.Position := 0; 不然就会出错。
因为如果dMem流是作为其他函数输出流的话，它的Position是在最后的。
dMem.Position := 0;
Base64Encode(dMem, Result);