如何用delphi在SQL的image字段里存储问题（非常急）希望高手指点

Question

我的意思是我怎样用delphi编程实现在SQL的image字段里存储视频文件，如*.dat *.rm等
在如何读取出来，要用什么空见呢？

Answer 1

1、导入 
 OpenDialog1.Title:='导入文件';
  if OpenDialog1.Execute then
    begin
    ADODataSet.Edit;
    TBlobField(ADODataSet.FieldByName('wj')).LoadFromFile(OpenDialog1.FileName);
    ADODataSet.FieldByName('wjm').AsString:=ExtractFileName(OpenDialog1.FileName);
    ADODataSet.post;
    ShowMessage('文件成功装入！');
    end;
2、导出
  wjm:='aaa.dat';    
  TBlobField(ADODataSet.FieldByName('wj')).SaveToFile(wjm);

Answer 2

谢谢chenylin，请问可以用adoquery来实现吗？？
我用的是以流的方式写入的，但在导入的时候，如果文件大小在10M以下的话还可以勉强，但文件大了，如40M的话就回很慢，甚至要出现‘死机’的现象，有没有好的方法
还有导出要用什么空件吗？？
请各位高手指点迷津~~~~~~