| 技术论坛 |
|
|
| ≡技术区≡ ① |
| DELPHI技术 |
| lazarus/fpc/Free Pascal |
| 移动应用开发 |
| Web应用开发 |
| 数据库专区 |
| 报表专区 |
| 网络通讯 |
| 开源项目 |
| 论坛精华贴 |
| ≡发布区≡ ② |
| 发布代码 |
| 发布控件 |
| 文档资料 |
| 经典工具 |
| ≡事务区≡ ③ |
| 网站意见 |
| 盒子之家 |
| 招聘应聘 |
| 信息交换 |
| 论坛信息 |
|||
|
| 导航： | 论坛 -> DELPHI技术 斑竹:liumazi,sephil | |||||
| 作者： |
|
2004/3/4 15:39:44 | ||||
| 标题： |
|
加入我的收藏 | ||||
| 楼主： | 可以随意拖动的。DELPHI能作吗？ ---------------------------------------------- it's me |
|||||
| 作者： |
|
2004/3/4 15:42:46 | ||||
| 1楼： | 加图 ---------------------------------------------- it's me |
|||||
| 作者： |
|
2004/3/4 15:46:10 | ||||
| 2楼： | 再试 ---------------------------------------------- it's me |
|||||
| 作者： |
|
2004/3/4 15:51:04 | ||||
| 3楼： | 再试 ---------------------------------------------- it's me |
|||||
| 作者： |
|
2004/3/4 16:55:49 | ||||
| 4楼： | 怎么看不见呀！！ ---------------------------------------------- -我不低偏高，正合你意； 我不胖偏瘦，为国奉献； 我不丑偏帅，社会满意； 我不坏偏好，看着舒心，跟着放心。 |
|||||
| 作者： |
|
2004/3/5 7:51:40 | ||||
| 5楼： | 看不到你的截图，不过任意拖动的窗体很容易做的 在private部分加入下列代码： procedure wmnchittest(var msg:twmnchittest); message wm_nchittest; 在程序部分加入以下代码： procedure TForm1.wmnchittest(var msg:twmnchittest); begin inherited; if (htclient=msg.result) then msg.result:=htcaption; end; 上面的关键代码虽然只有两行，但它实现了鼠标直接拖动窗体的目的。代码的原理是利用窗体的WM_NCHITTEST消息，这个消息是当光标移动、鼠标按下或释放时发生的，当程序检测到鼠标在窗体中按下的消息后（消息的值为htClient），将鼠标在标题栏上按下时产生的消息（值为htCaption）传递出去，这样就巧妙的欺骗程序认为是标题栏被按下，当然就可拖动窗体了 ---------------------------------------------- 秋风清 秋月明，几上闲琴黯生尘。 夜来忽忆少年事，陌上柳绿草青青。 相逢一笑言未语，携手相看自倾心。 二十二载云烟里，云含风韵烟含情。 风尘渺落风霜浸，但闻长空雁长鸣。 姿容如花颜如玉，只在平生梦里寻。 秋风清 秋月明，秋灯秋雨愁煞人。 天涯路远人何在，午夜梦回空扰惊。 |
|||||
| 作者： |
|
2004/3/5 9:16:41 | ||||
| 6楼： | GOOD，谢谢大虾 ---------------------------------------------- it's me |
|||||
| 信息 |
| 登陆以后才能回复 |
