1、打开visual studio2017,进入文件->新建->项目,选择编程语言为visualC#,windows经典桌面下的控制台应用程序,设置项目名为“九九乘法表”。
2、进入控制台中,找到Program.cs类下的Main方法。这是控制台程序的入口。
3、在控制台程序中,我先程序输入一段提示信息:Console.WriteLine("我将要设计九九乘法表")。
4、用两个for循环控制,外层 for (int i = 1i <= 9i++),内层for (int j = 1j <= ij++),之后设置输出显示信息。
5、将刚设计的方法添加到主程序中来吧,因为Main方法是静态的,所以我的自定义方法也是只的是static的。
6、九九乘法表的设计已经完成,现在执行看看效果吧。
如果你想自己用Delphi编写一个打印程序 那么 下面这些技巧或许对你有所帮助
获取 显示当前打印机的分辨率
Windows下的打印分辨对打印程序有着至关重要的作用 如果你想知道打印机的分辨率 请在程序中加入一行
ShowMessage(′水平分辨率′+inttostr(GetDeviceCaps(printer Handle LOGPIXELSX))+chr( )+′垂直分辨率:′+ inttostr(GetDeviceCaps(printerHandle LOGPIXELSY)))
结果就一目了然了
将结果直接送到打印机
Delphi提供了两种打印方式 一是将结果输送到Form 再调用Form的print方法将结果输送到打印机 二是将结果直接输送到打印机 如果你采用第一种方式 则无论你怎样调整Form的PrintScal属性 打印出来的东西也不会让你满意 因此建议采用第二种方式
尽量不要使用AssignPrn
尽管AssignPrn简化了文本打印 *** 作 使输出到打印机像输出到文件一样简单 但简单带来的是一系列的不方便 你无法知道当前打印的行数 无法准确控制行距 无法灵活改变字体字形等等 还是用打印机的Canvas属性进行打印吧
用打印机的点数做度量单位
如果想让打印程序在任何打印机上都能正常地打印 你就必须改变你的度量单位 如果采用固定的度量 不同分辨率的打印效果是不同的 举例来讲 printerCanvasrectangle( )在 × 的佳能 SP上能打出一个 英寸宽 英寸高的矩形 但在 × 的惠普 L上只能打出 英寸宽 英寸高的矩形 使用打印机的点数做为度量单位是一个明智的选择 具体做法如下
Var PointX PointY:integerPointX:=GetDeviceCaps(printerHandle LOGPIXELSX)PointY:=GetDeviceCaps(printerHandle LOGPIXELSX)printerCanvasrectangle( PointX* PointY* )这样 无论你使用什么样的打印机 都能得到一个 英寸宽 英寸高的矩形
添加打印程序单元
lishixinzhi/Article/program/Delphi/201311/24867
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)