2008年6月25日
Dbgrid导出为word
摘要： 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... 阅读全文
posted @ 2008-06-25 13:57 delphi中间件 阅读(223) 评论(0) 推荐(0)