🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: cn.bbs.comp.program
Article #1708

Re: delphi�������ӡ���

#1708
From: ��������
Date: Sat, 28 Mar 1998 00:00
23 lines
1470 bytes
dbgrid�ؼ�����ֱ�Ӵ�ӡdbgrid.print
liutao.bbs@bbs.nease.net wrote in message <3NZZD7$Sv0@bbs.nease.net>...
>С���Ǹ�delphi���֣��������delphiдһ����ݿ���򣬵���д��ӡ����
>ʼ��û��,Դ�������£���ִ�к�ȴû�д�ӡ���κζ�����������printer.
>canvas��copymode������Ҳ���˺ܶ�Σ������Dz��ԡ��ڴ˻����λ
>�����æ����С��һ�?��������
>procedure TForm4.Button11Click(Sender: TObject);
>var s:trect;
>begin
>    if printdialog1.execute then
>      begin
>        printer.canvas.font:=dbgrid1.font;
>        printer.begindoc;
>
printer.canvas.copyrect(printer.canvas.cliprect,dbgrid1.canvas,dbgrid1.clien
trect);
>        printer.enddoc;
>      end;
>end;
>
>--
> ��Դ: ����������BBSվ��bbs.nease.net�E[FROM: www-post@bbs.nease.n]
Technical Details
Message-ID: <6fiuku$25b$1@bbs.nease.net>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail
References: <3NZZD7$Sv0@bbs.nease.net>

Show Full Headers
Complete Article Headers
X-Google-Language: Chinese,GB
X-Google-Thread: fc86e,67e0823fc73fabbf
X-Google-Attributes: gidfc86e,public
From: "��������" <sherman@nease.net>
Subject: Re: delphi�������ӡ���
Date: 1998/03/28
Message-ID: <6fiuku$25b$1@bbs.nease.net>
X-Deja-AN: 338572660
References: <3NZZD7$Sv0@bbs.nease.net>
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3
Organization: Net Ease
Newsgroups: cn.bbs.comp.program