您还没有登录,请您登录后再发表评论 相关推荐
-
Delphi仿QQ窗口自动定位（磁性吸附）功能.rar
Delphi仿QQ窗口自动定位或隐藏（磁性吸附）功能，当鼠标拖动窗口至屏幕边缘或主窗体附近时，窗口会自动靠近主窗口，有的是自动吸附在主窗口上，好像带有磁性一样，这种窗口目前被应用到了很多视频播放器上面，比如播放列表可从主窗口脱离，然后拖近主窗口时，会自动吸在主窗口上。部分主程序代码： 当 top 距屏幕上侧 20 像素时,自动隐藏 if frmMain.Top Screen.Width) then frmMain.Left:= Screen.Width - frmMain.Width; end // 当 left 距屏幕下侧 20 像素时,自动隐藏 else if frmMain.Left frmMain.Width - Screen.Width >= -20 then //将frmMain向右移，在屏幕右方露出4像素
-
“磁性” 窗口
{通常，我们拖动对话框窗口的标题栏来移动窗口，但有时候，我们想通过鼠标在客户区上拖动来移动窗口。拖动对话框窗口的标题栏来移动窗口的方案是，处理鼠标消息WM_LBUTTONDOWN和WM_LBUTTONUP。在OnLButtonUp函数中计算鼠标位置的变化，调用MoveWindow实现窗口的移动。注意，拖动标题栏移动窗口的时候，会出现一个矩形框，它提示了窗口移动的当前位置。当鼠标左键放开的时候，窗口
-
Delphi磁性窗口
已转至新博客 http://www.raysoftware.cn/?p=46 昨天要用到磁性窗口,就是两个窗口离得近到一个距离就吸附到一起.拖动主窗口,吸附窗体一块运动. 到网上搜了一下,基本没见到可以使用的.有个东东,还是收费的.没办法自己写了一个. 用法很简单,把你的窗口都改成从这个继承即可生效.例如 type TForm3 = class(TCustomMagnet
-
事件深入应用二
拖拽的封装<!DOCTYPE html> <html lang="en"> <head> <meta charset="UTF-8"> <title>拖拽的问题</title> <style type="text/css"> #div1{width: 100px;height: 100px;background: #f00;position:absolute;}
-
delphi窗口跟随
procedure TForm1.FormPaint(Sender: TObject); begin fSQLMon.Show; fSQLMon.SetBounds(Left + Width + 10, Top, 300, Height); end;
-
delphi 异形窗体
DELPHI 透明窗体 心血来潮想用delphi做透明窗体，要知道我虽然搞了N年编程，但什么也没编写成。惭愧的很，以前VCVB之类的光搞懂它们的控件就让我很费劲，没办法不懂英文。还是学DELPHI吧，听说是聪明程序员学习的语言。在网络上搜索下透明窗体，哈文章不少，视频也有，但都太繁琐，关键看不懂，总算有个简单的，实验成功了哈哈。博下来以后用： unit StyleForm...
-
带磁性的悬浮窗体
转载请注明出处，本文来自 http://blog.csdn.net/manymore13 带磁性的悬浮窗体，类似于360绿色小人 主要实现的是: 1.悬浮所有窗体之上 2.有吸引力，吸附于屏幕边上 3.有点击效果 下面我就实现上面三点，简单封装了个FloatView 先看下本次Demo的效果图，然后再看代码， 效果图： FloatView代码如下 packag
-
窗体跟随的DELPHI实现
窗体跟随的DELPHI实现，是在XE1下开发的，如果要在D7下运行，需要做少量修改。
-
实现磁性窗口，窗体彼此吸附，像千千静听一样，
可以实现多个窗体彼此吸附，主窗口移动子窗口跟随的效果，跟千千静听的一样，
-
易语言 磁性窗口 模块
易语言磁性窗口模块易语言磁性窗口模块易语言磁性窗口模块
-
磁性窗体-绝对简单正宗
磁性窗体-绝对简单正宗-一定能满足你初学需要
-
易语言吸附外部窗口
易语言吸附外部窗口源码,API_取窗口矩形
-
delphi 仿QQ窗体吸附
delphi 仿QQ窗体吸附 窗体悬浮吸附。可以实现，和QQ一样的功能
-
易语言模块磁性窗口2.0.rar
易语言模块磁性窗口2.0.rar 易语言模块磁性窗口2.0.rar 易语言模块磁性窗口2.0.rar 易语言模块磁性窗口2.0.rar 易语言模块磁性窗口2.0.rar 易语言模块磁性窗口2.0.rar
-
易语言模块磁性窗口模块V1.0.rar
易语言模块磁性窗口模块V1.0.rar 易语言模块磁性窗口模块V1.0.rar 易语言模块磁性窗口模块V1.0.rar 易语言模块磁性窗口模块V1.0.rar 易语言模块磁性窗口模块V1.0.rar 易语言模块磁性窗口模块V1.0.rar
-
Delphi 停靠技术的应用2(窗体之间的相互停靠，引入宿主窗体)
Delphi的可停靠窗体间可以相互停靠，而且花样还很多，可以停靠成并排的，也可以停靠成PageControl样式的，两个可停靠窗体合并后的窗体又可以再和别的可停靠窗体合并，形成树状。下面来介绍这方面的技术。 一、基础知识介绍 1、CM_DOCKCLIENT消息和TC