摘要:
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 阅读全文