繁體中文当前位置: 首页 > 图文教程 > 开发语言 > Delphi > 任意打印
- Delphi
- Delphi设计简易对象垃圾回收框架
- Delphi开发Web应用程序打印组件
- Delphi客户服务器应用开发（四）
- Delphi自定义部件开发（一）
- Delphi自定义部件开发（二）
- Delphi自定义部件开发（三）
- Delphi自定义部件开发（四）
- 开发Delphi对象式数据管理功能（一）
- 开发Delphi对象式数据管理功能（二）
- 开发Delphi对象式数据管理功能（三）
- 开发Delphi对象式数据管理功能（四）
- 开发Delphi对象式数据管理功能（五）
- 用Delphi语言来学设计模式之简单工厂篇
- Delphi2005和DUnit搭建敏捷开发平台记录
- 你想成Delphi高手吗?快来学Delphi快捷键
- Borland最新版开发工具Delphi2005抢先预览
- 用Delphi实现JPEG格式图像的显示
- 用DELPHI编程访问SQL SERVER数据库
- 用Delphi编制趣味动画鼠标
- 用Delphi实现选单的自动隐藏功能
Delphi 中的 任意打印
有时我们要打印任意排列的表或往已经印好的登记表上对号入座写上数据时，可以新建一个窗体（假设为Form1），再把Form1的BorderStyle设为bsNone、AutoScroll设为True，接下来再创建一个新窗体（假设为Form2），再建个按钮Button1，编写代码：
procedure TForm2.Button1Click(Sender: TObject);
begin
Form1.Width :=900;
Form1.Height :=800;
Form1.Print;
end;
接下来你在Form1上对应的位置写上数据，运行后按Button1就会一五一十的打印下来了。
评论 (0) All
