如何做一个LINE控件?(200分)

  • 主题发起人 zhangchang
  • 开始时间
Z

zhangchang

Unregistered / Unconfirmed
GUEST, unregistred user!
各位大虾:
该控件的作用是用来画直线跟VB中的LINE控件是一样的
请问该从那个类中继承(COMPONENT 不行,小弟已试过)或者
是否有其他可行的方法?

 
H

huizhang

Unregistered / Unconfirmed
GUEST, unregistred user!
一定没见过我的TLine, 参见<a href="DispQ.asp?LID=99091">huizhang最新更新TLine, 运行时只要鼠标一击, 连"拖"带"拉"</a>
不满意找我
 

蒋劲刚

Unregistered / Unconfirmed
GUEST, unregistred user!
继承tshape控件,应该可以.
也可以用vb生成一个activex控件到delphi中用.

 
Z

zhangchang

Unregistered / Unconfirmed
GUEST, unregistred user!
TLINE是不错,但它离我要的还有一段距离,
比如,用它画横线还得设angle为0.
我想要的是,画完后应该只有线的两个端点有方点
它不可能从TCOMPONENT后的类继承,因为从TCOMPONENT
继承下来的控件的外观都有八个方点(在设计时)
我想请教的是TCOMPONENT中的哪个方法完成它的外观
显示,即画那八个方点,通过改写那个方法,应该可以实现
 
H

huizhang

Unregistered / Unconfirmed
GUEST, unregistred user!
zhangchang, 你要的东西在Delphi下没有, 既是你把VB的Line拿到Delphi里面也是
不行的。Delphi的IDE设计阶段就是使用这种机制,不管是什么控件,可视与否,都
是八个点(GrabHandle)。
 
W

wjiachun

Unregistered / Unconfirmed
GUEST, unregistred user!
接受答案了.
 
顶部