Article View: cn.bbs.comp.program
Article #1825delphi1.0������ֱ�Ӵ�ӡdbgrid�е����ݣ���
From: liutao.bbs
Date: Wed, 25 Mar 1998 00:00
Date: Wed, 25 Mar 1998 00:00
19 lines
1234 bytes
1234 bytes
С����delphi1.0����ֱ�Ӵ�ӡdbgrid�е����ݣ�����
dbgrid��canvas���ԣ���printer�е�canvas����dbgrid
��canvas��Ӧ�þͿ��Դ�ӡ�˰ɣ��������˺ܶ�Σ�
ʼ��û�д�������������������ǵ�������������
����̸�λ�Ƚ�Ⱦ�С�ܰɡ�Դ�������£�
procedure TForm3.BitBtn10Click(Sender: TObject);
begin
if printdialog1.execute then
begin
printer.begindoc;
printer.canvas.copyrect(dbgrid1.clientrect,
dbgrid1.canvas,dbgrid1.clientrect);
printer.enddoc;
end;
end;
--
[1;36m ��Դ: ����������BBSվ��bbs.nease.net�E[FROM: www-post@bbs.nease.n]
Technical Details
Message-ID:
<3NdHkS$Tf8@bbs.nease.net>Path:
arc1-ca.pugleaf.net!unknown!not-for-mailShow Full Headers
Complete Article Headers
X-Google-Language: Chinese,GB X-Google-Thread: fc86e,924a727468b47a47,start X-Google-Attributes: gidfc86e,public From: liutao.bbs@bbs.nease.net () Subject: delphi1.0������ֱ�Ӵ�ӡdbgrid�е����ݣ��� Date: 1998/03/25 Message-ID: <3NdHkS$Tf8@bbs.nease.net> X-Deja-AN: 337656249 X-Filename: Program/M.890859964.A Organization: Net Ease Newsgroups: cn.bbs.comp.program,