相关推荐

鼠标穿透到桌面和穿透到父窗口Demo

本文章地址：https://blog.csdn.net/qq21497936/article/details/89111786 博主博客地址：https://blog.csdn.net/qq21497936 遮罩层实现鼠标消息穿透（透明区域穿透，非透明区域不穿透） 实现需求1：鼠标穿透 实现需求2：软件分层构架的菜单穿透 作者：红模仿 QQ:21497936 日期：2019年04月08日

使用SetWindowLong修改窗口样式

举例：修改窗口扩展样式：SetWindowLong(ListView1->Handle, GWL_EXSTYLE, WS_EX_LEFT|WS_EX_LTRREADING|WS_EX_RIGHTSCROLLBAR); 修改窗口样式：SetWindowLong(ListView1->Handle, GWL_STYLE, WS_CHILDWINDOW|WS_VISIBLE|WS_CLI...

实现鼠标穿透能力

  //实现鼠标穿透能力//  SetWindowLong(Handle, GWL_EXSTYLE, GetWindowLong(Handle, GWL_EXSTYLE)//          | WS_EX_LTRREADING | WS_EX_TRANSPARENT | WS_EX_TOPMOST//          | WS_EX_TOOLWINDOW | WS_EX_LAYERED); 

Delphi 控制程序在任务栏显示与隐藏

亲测在 RAD Studio 10.3 正常 //Delphi 控制程序在任务栏隐藏 SetWindowLong(Application.Handle, GWL_EXSTYLE, WS_EX_TOOLWINDOW); // Delphi 控制程序在任务栏显示 SetWindowLong(Application.Handle, GWL_EXSTYLE, WS_EX_APPWINDOW); 以上是在学习中记录的一点点笔记，以便以后翻阅。 ...

SetWindowLong 用法总结

SetWindowLong 函数原型为：LONG SetWindowLong（HWND hwnd,int nIndex,Long dwNewLong）;详见MSDN。下面简单总结一下SetWindowLong函数几种常用的地方：1.设置窗口风格   如：SetWindowLong(hWnd, GWL_STYLE, WS_POPUP|WS_BORDER);      //有边框的弹出窗口         SetWindowLong(hWnd, GWL_EXSTYLE,  WS_EX_TOOLWINDOW); 

SetWindowLong和SetWindowPos函数详解

一个应用程序可以一个系统美为于类，但是不能以一个其他进程产生的窗口类为子类，SetwindowLong函数通过改变与一个特殊的窗口类相联系的窗口过程来创建窗口子类，从而使系统调用新的窗口过程而不是以前定义的窗口过程。Windows CE：如果这是一个可见的顶层窗口，并且未指定SWP_NOACTIVATE标志，则这个函数将激活窗口、如果这是当前的激活窗口，并且指定了SWP_NOACTIVATE或SWP_HIDEWINDOW标志，则激活另外一个可见的顶层窗口。SWP_NOACTIVATE：不激活窗口。

隐藏程序任务栏图标按钮

以前在Delphi6/7时代，如果要程序图标不在Windows任务栏显示，可以调用Windows API函数 SetWindowLong，但是进入Delphi2007时代后，发现原来的方法不行了，这是怎么回事呢？我想微软是不会轻易更改系统API函数的，在这一设定的前提下，我决定还是在Delphi2007上找原因。 我们知道，Delphi2007为了支持在Windows Vist...

使用duilib开发半透明异形窗体程序（附源码和demo）

转载请说明原出处，谢谢~~：                  半透明异形窗体的功能在之前维护的老版本的duilib里面已经有了基本的功能，但是因为一直存在较多的缺陷，所以我一直建议少用，就连我自己写仿酷狗项目也只是在几个小地方用了半透明异形窗体。不过今天在群里和其他几位朋友讨论后，发现了之前的许多问题以及解决方法。所以我立马修复了当前的库，并且写了一个半透明异形窗体的demo来测试效果。

delphi 鼠标获取窗口句柄_Windows窗口自定义，只需WindowTop一键设置

WindowTop 是一款窗口自定义设置工具可将任意窗口置顶、修改透明度等等「窗口置顶」将窗口置顶，可以方便我们对比、写作、修改文案等等使用WindowTop【窗口置顶】来将窗口钉在桌面最上方默认情况下，我们打开一个需要置顶的应用鼠标悬停在windowTop就可以看到四个功能按钮选择第二个【窗口置顶】功能点击按钮即可让这个应用始终置顶在最上方再次点击即可取消置顶「设置窗口透明度」可以直接对任意程序...

用DELPHI实现透明以及半透明窗体

    在QQ中，我可以调节面板的透明度。如果我们自己编程，应该如何实现呢？    （一）半透明窗体     在windows2000以及后续产品中下增加了一些API,可以轻易的实现半透明的窗体，源程序如下：interfaceuses  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dial

delphi窗体透明

delphi窗体透明，D7上写的。适合学习，也很好玩。

Delphi实现窗体感知鼠标滑过并自动隐藏与显示窗口的方法

主要介绍了Delphi实现窗体感知鼠标滑过并自动隐藏与显示窗口的方法,涉及Delphi操作窗口及鼠标事件的技巧,需要的朋友可以参考下

你可能会用到的鼠标穿透~~~~~

何为输小穿透？ 意思是： 一图胜过千言万语! 在拖拽的方块的css中设置 { …style, pointer-events:none;★★★★★ }

怎么实现“鼠标穿透”，即鼠标对窗体失去作用，对着它点右键要出现WINDOWS的桌面右菜单

Const LWA_COLORKEY = &H1Const LWA_ALPHA = &H2Const GWL_EXSTYLE = (-20)Const WS_EX_LAYERED = &H80000Const WS_EX_TRANSPARENT   As Long = &H20&Private Declare Function GetWindowLong Lib "user32" Alias "G

Delphi 给窗口增加系统菜单

给窗口 增加一个 系统菜单,要用到findwindow windows.GetSystemMenu windows.AppendMenu SetWindowLong 和回调函数