问问题需要理由吗？（关于Paintbox)(100分)

  • 主题发起人 主题发起人 wxb761014
  • 开始时间 开始时间
W

wxb761014

Unregistered / Unconfirmed
GUEST, unregistred user!
我正在作一个画图程序（类似AutoCad)。现有几个问题请教各位大富翁。
1.如何为PaintBox加上滚动条？以便当图面大于显示区域时，可以滚动显示。
2.如何对图面进行全屏预览（自动缩放）？
3.如何打印PaintBox上的图并使其自动适宜纸张？
望各位大富翁积极讨论，不啬赐教！
 
大家帮帮忙吧？
在下这厢有理了！！！
 
1.将PaintBox放在一个ScrollBox里
2.重绘图象到整个屏幕不就行了
3.将PaintBox上的图象赋给打印机的画布对象，然后打印就行了。
 
only you,能否说的详细些，先行谢过！！！
 
1.先在窗体上加一个ScrollBox,拉好大小后,再选PaintBox,加到ScrollBox里即可!Scrollbox
是一种容器,专门为那些没有滚动条的构件服务的.
2.将你的图形扩大到整个屏幕不就的了,然后使form的属性是bsNone
3.
uses Printers;


begin
print.begindoc;
print.canvas.stretchdraw(myrect,mybitmap);
print.enddoc;
end;
 
2.用相对坐标,不要用绝对坐标.每个坐标值都乘一个系数,
改变这个系数即可改变图形大小时.
3.先用PageWidth和PageHeight得到打印纸的宽和高,
然后以相对于这两个值的坐标值(同样不要用绝对坐标)
在打印机的画布上画图即可适应不同的纸张.
 
谢谢only you与brightangel
谁编过类似的程序，能否谈谈经验。那里可下载或有介绍文章。
欢迎各位继续讨论以上问题，最好有源码！！！
我可是一只小小鸟(菜鸟）啊-:(。
 
2. 用Canvas.CopyRect可以实现缩放功能。
3. 也是使用Canvas.CopyRect即可。
 
再加100,征求详细的原码与例子。
介绍相关站点也可！！！
 
我写过绘制地下水等水位图的一个东东,想要吗? 不过打印部分没做好.
dagang_c@371.net
 
to dagang:
谢谢，请将其e_mail至wxb761014@sina.com.
见后给分。
 
多人接受答案了。
 
您必须登录或注册才可回复。

Similar threads

Ray
[转]终于可以发布Delphi下收点OSGI精髓皮毛而设计的插件框架WisdomPluginFramework
回复
4
查看
4K
chlkuei
C
C
高分求解几个关于StringGrid.问题。(在线等待) ,还剩两个。 (300分)
回复
8
查看
239
chuwenyong
C
O
急。急。急！ (关于dxdbgrid刷屏问题) (100分)
回复
4
查看
204
oky_zx
O
H
同一窗体上放置两个paintbox产生的问题(100分)
回复
5
查看
165
hermes
H
Y
RichEdit控件编程问题（很简单的一个问题）(100分)
回复
1
查看
154
影 子
影
后退
顶部