如何做出运行时可拖拉的图形控件？？？(200分)

david_lsh · 2003-07-18

如何做出在运行时可拖拉、缩放的图形控件，
要求其运行效果就象在delphi界面上放一个Timage控件一样：
有一个边框，可以拖拉移动位置，边框四周有8个点，鼠标移在这8个点上时可以改变该控件的大小。
（注意，要求在运行状态是该效果）
谢谢！

wr960204 · 2003-07-18

http://www.delphibbs.com/delphibbs/dispq.asp?lid=1619232
那是我以前写的一个东西，可以在运行时期调整。你把继承的类改成TCustomControl就能使用图形了。

Dlwxn · 2003-07-18

我有一个跟你的要求一样的控件，你的Email，D6下通过。

david_lsh · 2003-07-22

wr960204:控件我试过了，谢谢！
我还想问个问题，为什么基类不能是Timage，如果我想效果象Timage一样，可以透明，可以贴图，该如何改？
非常感谢！

wr960204 · 2003-07-22

Timage倒是也行，但就不能用到句柄了

david_lsh · 2003-07-22

不用句炳就太难了！！
要自己写mousemove等事件

leisure · 2003-07-22

david_lsh · 2003-07-24

我给wr960204老兄加200分先，如果有谁有更好的，即自己写mousemove， mousedown， mouseup事件实现的拖拉，缩放，我再加300分