我想在DELPHI中调用WORD,并希望把数据库里的数据写入WORD文件中,各位有什么好办法啊?

解决方案 »

  1.   

    procedure TForm1.Button3Click(Sender: TObject);
    begin
      with ADOQuery1 do
      begin
        Close;
        SQL.Clear;
        SQL.Text := 'SELECT BL FROM TABLE1';
        Open;
        TBlobField(FieldByName('BL')).SaveToFile('d:\abc.doc');
      end;
    end;procedure TForm1.Button4Click(Sender: TObject);
    begin
      OleContainerFY1.LoadFromFile('d:\abc.doc');
      OleContainerFY1.DoVerb(1);
    end;
      

  2.   

    我都用过,用Server里的控件太麻烦,而且不够灵活(也许是我没怎么钻研)。