控件的问题？

[wpyyl]

如何象在动态创建控件的时候，根据我的需要在上面画

就如delphi在设计表单界面的时候那样用鼠标画按钮

[bbs791109]

好難喲

[failer]

处理onmousemove事件 记下用户选择的位置，再设置动态控件的top，width之类的属性。

[lion_lh]

onmousedown里创建控件width和height:=0，在onmousemove里改变高度和宽度.
onmouseup里结束改变高度和宽度

[fengjn]

onmousedown：记录鼠标的位置，保存在pt1和pt2中
onmousemove：根据pt1和pt2画矩形（异或模式），将鼠标的位置保存在pt2中，再画矩形（异或）
onmouseup： 根据pt1和pt2画矩形（异或模式），一pt1和pt2确定的rect创建控件。