三层结构 存储blob失败？ 告急 —— 大侠们帮忙，在线等

为什么我运行的时候总是报“Operation not application”(快抓狂了)，各位高手帮忙啊~~
procedure TForm1.RzButton1Click(Sender: TObject);
vAR
  TempStream: TMemoryStream;
begin
  Try
   TempStream := TMemoryStream.Create;
   RzRichEdit1.Lines.SaveToStream(TempStream);
   TempStream.Position := 0;
   ClientDataSet1.Close;
   ClientDataSet1.CommandText:= 'Insert into TXT_LOG(LOG) Values(:LOG2)';
   ClientDataSet1.Params.ParamByName('LOG2').LoadFromStream(TempStream,FTBLOB);
   ClientDataSet1.Execute;
  Finally
    TempStream.Free;
  end;
end;