FormBorderStyle为None时拖动窗体
2016-03-11 15:52
453 查看
procedure FormMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); begin if (ssleft in Shift) then begin releasecapture; perform(wm_syscommand, $F012, 0); end; end;
相关文章推荐
- Android 5.x特性概览二
- break语句
- 对tmemorystream的一些改进_delphi教程
- 网站引导页插件intro.js 的用法
- 咱们来看看谷歌Design包里的SnackBar
- 嵌入式网络编程
- 在C/C++代码中使用SSE等指令集的指令(3)SSE指令集基础
- ORACLE中ESCAPE关键字用法
- 怎样使一个输入框隐藏显示,仅仅需要该输入框保存值(比如保存id)
- display:block 不起作用
- 了解和熟悉操作系统
- Java的IO详细总结
- android中PhoneWindow、DecorView
- Activity向Fragment里通过handler传消息
- 第六章:事务,视图和索引
- SSE2 memcpy
- Oracle Q-quote delimiter
- 【专业词简读笔记之一】GPU和CPU
- Eclipse工具插件开发之Table表格上控件刷新的问题
- iOS-id类型