摘要：
unit DbgridToWord; interface uses SysUtils,ComObj,DBGrids; implementation Function DBGirdToWord(DBGrid: TDBGrid): Boolean;var Count,I,J:Integer; Doc:OleVariant; CurrColumn,RecordNum:Integer; wTable: Variant;begin try Doc:=CreateOleObject('Word.Application'); Doc.Visible:=True; Doc.Doc... 阅读全文
