Thread View: cn.bbs.comp.program
1 messages
1 total messages
Started by liutao.bbs
Sat, 21 Mar 1998 00:00
delphi�������ӡ���
Author: liutao.bbs
Date: Sat, 21 Mar 1998 00:00
Date: Sat, 21 Mar 1998 00:00
19 lines
1253 bytes
1253 bytes
С���Ǹ�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.clientrect);
printer.enddoc;
end;
end;
--
[1;36m ��Դ: ����������BBSվ��bbs.nease.net�E[FROM: www-post@bbs.nease.n]
Thread Navigation
This is a paginated view of messages in the thread with full content displayed inline.
Messages are displayed in chronological order, with the original post highlighted in green.
Use pagination controls to navigate through all messages in large threads.
Back to All Threads