麻烦以前回复的兄弟在重新回复一下,万分感谢。

解决方案 »

  1.   

    sql server中用image或是text字段都行,可以保存任何文件类型,读出时还可以改名
    procedure TForm1.Button1Click(Sender: TObject);//保存文件
    var str:Tmemorystream;
    begin
    str:=Tmemorystream.Create;
    str.LoadFromFile('f:\page.doc');
    str.Position:=0;
    adoquery1.Append;
    Tblobfield(adoquery1.FieldByName('tt')).loadfromstream(str);
    try
    adoquery1.Post;
    finally
    str.Free;
    end;
    end;procedure TForm1.Button2Click(Sender: TObject);//读取文件
    var str:Tmemorystream;
    begin
    str:=Tmemorystream.Create;
    str.Position:=0;
    Tblobfield(adoquery1.FieldByName('tt')).savetostream(str);
    str.SaveToFile('F:\page.doc');
    str.Free;
    end;
      

  2.   

    TBlobField(ADODataSet1.FieldByName('image')).LoadFromFile('c:\aa.doc');TBlobField(ADODataSet1.FieldByName('image')).SaveFromFile('c:\aa.doc');