求赐教delphi怎么将word保存至sql2005

求赐教delphi如何将word保存至sql2005啊
如题

[解决办法]
不管是什么文件都可以用保存至数据库。

Delphi(Pascal) code

var  i: integer;  fs: TFileStream;  filename: string;begin////附件添加  if OpenDialog1.Execute then   begin   for i := 0 to OpenDialog1.Files.Count-1 do begin  filename := ExtractFileName(OpenDialog1.Files.Strings[i]); //取出文件的名  fs := TFileStream.Create(filename, fmOpenRead);  self.ADOQuery5.Append;    self.ADOQuery5.FieldByName('lsh').AsString:=self.ADOQuery2.FieldByName('lsh').AsString;    self.ADOQuery5.FieldByName('文件名').AsString := ExtractFileName(filename);    fs.Position := 0;    TBlobField(self.ADOQuery5.FieldByName('内容')).LoadFromStream(fs);    self.ADOQuery5.Post;   end;     fs.Free;
[解决办法]
Delphi(Pascal) code
ADOQuery1.Edit;TBlobField(ADOQuery1.FieldByName('word')).LoadFromFile('c:\1.doc');ADOQuery1.Post;
[解决办法]
例子是保存至“内容”这个字段了。
[解决办法]
TBlobField()

括号内就是你对应的字段,TBlobField(ADOQuery1.FieldByName('字段名'))
[解决办法]
将“任何文件”转换成“内存流”
再写入数据库中的相应“字段”即可