改控件,不要以为很难,只需加两句话就可以了
你在程序里的任何位置输入Ttrackbar,按住ctrl键,点击它,便会打开该控件代码(comctrl.pas),你找到Ttrackbar这段的最后一个事件,在后面加两个事件,onmousedown,onmouseup,保存之后,再编译这个文件,把生成的dcu文件复制到delphi\lib下面去就ok啦
之后,你再加个trackbar组件,在代码编辑器里打个trackbar1,输入'.'之后,弹出来的事件里面就有onmousedown/onmouseup了,
你在程序里的任何位置输入Ttrackbar,按住ctrl键,点击它,便会打开该控件代码(comctrl.pas),你找到Ttrackbar这段的最后一个事件,在后面加两个事件,onmousedown,onmouseup,保存之后,再编译这个文件,把生成的dcu文件复制到delphi\lib下面去就ok啦
之后,你再加个trackbar组件,在代码编辑器里打个trackbar1,输入'.'之后,弹出来的事件里面就有onmousedown/onmouseup了,
解决方案 »
- 问一个ADOQuery的问题,请各位指教
- 我在对话框上放了一个qreport控件,上面我放了几个text写了一些字,preview的时候怎么什么也看不见
- 找点关于delphi控件的资料
- 请问哪有DevExpress ExpressQuantumGrid for Delphi5的?
- 该死的http://ok100.allyes.com/main/
- 小问题
- delphi中的类有许多成员变量为只读属性,如何在调试状态下观察他们的值
- 我想知道为什么我用不了Shellexecute
- 我用Tquery进行数据的查询后,如何将查询得到的结果填充到listview控件中?
- 这个代码上我赋值改赋点什么
- 请教高手:如何判断某个ActiveX 控件是否已经注册?
- 问题: 哪位大侠能帮我解释一下下面的这一句话的意思,是在DELPHI里面遇上的,感恩不尽。
Happy New Year!