打印控件

使用打印控件首先需要先创建printdocument对象:使用printpage触发事件

private void printDocument1_PrintPage(object sender, System.Drawing.Printing.PrintPageEventArgs e)
        {
            Font f=new System.Drawing.Font("宋体",13);
            Brush b=new SolidBrush(Color.Black);

            e.Graphics.DrawString(richTextBox1.Text, f, b, 10, 10);
        }

打印设置:pagesetupdialog

private void 打印设置ToolStripMenuItem_Click(object sender, EventArgs e)
        {
            pageSetupDialog1.Document = printDocument1;
            pageSetupDialog1.ShowDialog();
        }

打印预览:弹出对话框printpreviewdialog

private void 打印预览VToolStripMenuItem_Click(object sender, EventArgs e)
        {
            printPreviewDialog1.Document = printDocument1;
            printPreviewDialog1.ShowDialog();
        }

打印预览:不弹出对话框printpreviewcontrol

private void button1_Click(object sender, EventArgs e)
        {
            printPreviewControl1.Document = printDocument1;

        }

打印:printdialog

 private void 打印PToolStripMenuItem_Click(object sender, EventArgs e)
        {
            printDialog1.Document = printDocument1;
            DialogResult dr = printDialog1.ShowDialog();
            if (dr == DialogResult.OK)
            {
                printDocument1.Print();
            }
        }

 

转载于:https://www.cnblogs.com/wy1992/p/6160318.html

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
Delphi 10 是一个广泛使用的开发工具,也提供了许多功能强大的控件来帮助开发者完成各种任务,其中包括打印控件。 在 Delphi 10 中,可以使用 TPrinter 控件来实现打印功能。TPrinter 控件提供了一系列属性和方法,可用于控制打印机和打印任务。 首先,我们需要设置打印机的一些属性,如纸张类型、打印方向等。可以使用以下代码完成此项操作: ``` Printer.Canvas.Font.Name := 'Arial'; Printer.Canvas.Font.Size := 12; Printer.Canvas.Brush.Color := clWhite; Printer.Orientation := poPortrait; ``` 这段代码设置了打印使用的字体、字号、背景颜色和打印方向。 然后,可以使用以下代码开始打印任务: ``` Printer.BeginDoc; ``` 在 BeginDoc 和 EndDoc 之间,我们可以使用 Canvas 对象将要打印的内容绘制在纸张上。例如,我们可以使用以下代码打印一段文本: ``` Printer.Canvas.TextOut(100, 100, 'Hello, World!'); ``` 如果需要打印图像,可以使用以下代码: ``` Image1.Picture.LoadFromFile('image.jpg'); Printer.Canvas.StretchDraw(Rect(100, 200, 300, 400), Image1.Picture.Graphic); ``` 当所有的打印内容都绘制在纸张上后,我们需要结束打印任务: ``` Printer.EndDoc; ``` 以上就是使用 Delphi 10 中的打印控件实现打印功能的基本步骤。当然,根据具体的需求和实际情况,可能还需要进行更多的操作和设置。但是总体来说,Delphi 10 提供的打印控件能够满足大部分的打印需求,开发者可以根据自己的需要进行相关操作。

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值