摘要: unit MyLib;interfaceuses classes, Printers, DBGrids, Graphics, Sysutils, Windows, Forms, DB, Grids, Dialogs, ComObj, Controls,StdCtrls,ShellAPI;type//打印Tdbgrid TPrnOut = class(TObject) procedure PrintHeader(s:string); procedure PrintFoot(s:string); procedure PrintLine(x1,y1,x2,y2:integer); procedure 阅读全文
posted @ 2008-11-19 14:41 delphi中间件 阅读(641) 评论(0) 推荐(0) 编辑