张志峰的博客

水滴石川,积少成多。

导航

2011年9月27日

摘要: 编写一个组件一般分为6个步骤:1.确定一个祖先类。2.创建一个组件单元。3.给新建的组件添加属性、事件、方法。4.测试该组件。5.在Delphi中注册该组件。6.为该组件建立帮助文件。 阅读全文

posted @ 2011-09-27 14:14 ╰★张志峰★╮ 阅读(342) 评论(0) 推荐(0) 编辑

摘要: 1.如果把DragMode设置成dmAutoMatic 自动就会有拖拽效果。2.如果把DragMode设置成dmManual,则需要调用BeginDrag才起作用,这个函数有两个参数(Immediate: Boolean; Threshold: Integer) Immediate = true 则拖拽操作会立刻开始,鼠标变成dragCursor类型,Immediate = false 当达到Threshold设定的值时,会产生拖拽操作。unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphi 阅读全文

posted @ 2011-09-27 13:49 ╰★张志峰★╮ 阅读(5642) 评论(0) 推荐(0) 编辑