OutTo: TCanvas; if print_screen =0 then
OutTo := Printer.Canvas
else if print_screen=1 then
OutTo := PaintBox1.Canvas;
OutTo := Printer.Canvas
else if print_screen=1 then
OutTo := PaintBox1.Canvas;
解决方案 »
- 高手请进!!
- mouse_event(MOUSEEVENTF_WHEEL, 0, 0, -120, 0)
- 那里有介绍rave report的资料和程序,请推荐,给分.
- 怎么检查打印机是否连接正常
- 双击固定dxdbgrid这一行的颜色,如何设置?
- Delphi7的xp界面支持?
- 巨菜问题,求助
- 急!installshield4.0 for delphi做安装程序的怪一现象?
- 请问怎么在在delphi中实现视频文件的满屏播放啊!
- 被这个简单问题折磨死了!简单啊!!!!!!
- 开发共享软件赚钱要把软件做得又快又好,用VC,delphi还是VB?
- 打算学习网络通信编程,正踌躇中...请大家给些有益的建议
所有的类型都可以了。