一个简单的base64编码问题，请指教。。(100分)

是这样的
1、我将图片保存到数据库中。现在要进行如下处理：
将数据库的图片字段取出，进行base64编码，然后将编码后的字符串放到一个xml文件中。
但是，[red]从数据库取出字段进行base64编码后。得到的却是空字符串啊？这是怎么回事？数据库中的图片的字段肯定有内容（经过了其它方式的测试）。[/red]
主要代码如下，望各位帮忙看看问题出在哪里了？
var
s:string;
ms:Tmemorystream;
OutStream:TStringStream;
----------------------------------
MS:=TMemoryStream.Create;
OutStream:=TStringStream.Create(' ');
TBlobField(DataModule2.ADOQuery2.FieldByName(photodata)).SaveToStream(MS);
EncodeStream(MS,OutStream);//[blue]base64编码[/blue]
s:=OutStream.DataString;
showmessage(S);
FreeAndNil(MS);
FreeAndNil(OutStream);

检查一下看看EncodeStream是否有问题？

原来是少加了一句：
MS.Position:=0;
谢谢。