请大家帮我看看这句代码哪有问题，跟帖者有分！！

var
    MemSize:     Integer;
    Buffer:      PChar;
    MyFile:      TFileStream;
    MS:          TMemoryStream;
    MyStream:    TBlobStream;
    My_filename: String;            //  存放文件名begin
  .......
    if self.OpenDialog1.Execute then
    begin
      My_filename:=OpenDialog1.FileName;
      MyFile:=TFileStream.Create(My_filename,fmOpenRead);
      MyFile.Position:=0;
     //保存到数据库的Image字段：
      with CDSwendian1 do        //记得修改相关数据组件 啊
      begin
       CommandText:= '';
       if not Active then Open;
      //  Append;
        edit;
//-------------------------就是这句代码××××
        TBlobField(FieldByName('Wendian_nr') as TBlobField).LoadFromStream(MyFile);
//-------------------------就是这句代码××××
   // MyStream := TBlobStream.Create(FieldByName('Wendian_nr') as TBlobField, bmWrite);
       finally
        MyFile.Free;       end;       try
        CDSwendian1.Post;
       except
        Showmessage('保存失败！');
        halt;
       end;
       Active:= false;.......
end;说明：远程服务端是ADOquery+DataSetProvider,本机作为客户端是ClientDataSet,数据库在远程服务器上。并希望老师们给出正解！