delphi7 向窗体发送蚊子

Delphi窗体间发送消息或字符串

在Delphi 开发中,常常应用到窗体消息传递,以达成某种操作要求,以下列举一个应用的例子,供大家参考. 自定义过程/函数方法://发送字符串到指字句柄的窗口中 (接收窗体需用发送时的消息常量WM_COPYDATA)procedure SendMessageData(AHandle: THandle; AStr: String);var sData: TCopyDataStruct;begin sData.cbData := Length(AStr) + 1; //为传递的数据分配内存 GetM

Delphi 中的全局快捷键+给指定窗体发送按键

[背景] 公司做视频影像采集,平时采集图像的时候都需要打开采集窗口,然后需要开着采集窗口来进行图像采集.同事问我能不能做一个全局快捷键,哪怕我没有操作也可以采集图像.说干就干,一直想做全局快捷键了,网上找了一些代码,凑合了一下,达到了实现的效果,同事反应使用效果不错. [知识点] 本代码有如下Delphi知识可以参考学习: 1.Delphi ini文件的读取写入. 2.Delphi全局快捷键的检测和注册. 3.Delphi给指定窗体发送按键. 4.Delphi任务栏显示.隐藏自己的程序. 5.D

C++ Custom Control控件向父窗体发送对应的消息

向父窗体发送消息 ,这里只讲发送 WM_NOTIFY 消息, 其它消息是相同的在控件中的某个函数中设置发送消息的程序首先定义一个WM_NOTIFY消息的专用结构. NMHDR nm; nm.code = ; // 这里是消息的区别代码 nm.hwndFrom = m_hWnd;//这是控件的HWND句柄 nm.idFrom = GetDlgCtrlID();//这是得到的对话框的ID CWnd* pWnd; pWnd = GetParent(); //得到父窗体窗口 if (pWnd

C#中使用 SendMessage 向非顶端窗体发送组合键

开门见山,不废话了, 直接举例说明一下: 比如发送ALT + F 以下是用spy++截取的消息内容 <00001> 000310DC P WM_SYSKEYDOWN nVirtKey:VK_MENU cRepeat:1 ScanCode:38 fExtended:0 fAltDown:1 fRepeat:0 fUp:0<00002> 000310DC P WM_SYSKEYDOWN nVirtKey:'F' cRepeat:1 ScanCode:21 fExtended:0 fA

Delphi7 实现窗体全屏方法

设置要全屏的窗体的ALign 属性为ALcLient ,此法最快.当然对我来说,我并不知道这个,所以走了远路,等后来在实现窗体禁止移动的时候才想到了这里,汗.注意:这种全屏方式不会挡了系统的任务栏....同时可以防止窗体移动, 方法二: 用代码控制.在窗体的创建事件中,此方法运行后窗体也可以移动.影响美观.应该再加入禁止窗体移动的代码)写入 var TrayWnd: HWnd; // 任务栏句柄 Rec : TRect; begin TrayWnd := FindWindow('Shell_Tr

VC++ 控制外部程序,向外部程序发送一个消息的方法

这里需要考虑两部分的内容: 发送端: 查找对应的窗体,找到CWnd的值向窗体发送消息举例: CWnd* wnd = FindWindow(NULL, _T("选择题做题过程中")); if (wnd == NULL) { AfxMessageBox(_T("找不到程序!")); } else { ::SendMessage(*wnd, WM_USER_LOADTI, , ); } 第一句话,就是查找窗体,方法是使用FindWondow函数 , ); 是用来发送消

[转] C#中发送消息给指定的窗口，以及接收消息

原文C#中发送消息给指定的窗口,以及接收消息 public class Note { //声明 API 函数 [DllImport("User32.dll", EntryPoint = "SendMessage")] private static extern IntPtr SendMessage(int hWnd, int msg, IntPtr wParam, IntPtr lParam); [DllImport("User32.dll",

在DLL中封装的VCL窗体Tab键响应的问题

在DLL中的子窗体不会响应Tab按键的,这个时候就需要手动去指定Tab键的操作,但是前提是主窗体要向这个窗体发送一个消息,一个Tab键按下的消息.基本顺序是这样的: 1. 主窗体用Hook技术捕获Tab按键并向活动子窗体发送一个Tab键按下的消息 2. 子窗体手动定义一个Tab键被按下的处理(需要用到FormKeyDown事件). 3. 移动到下一个焦点的WinAPI函数:Perform(WM_NEXTDLGCTL,0,0); 4.移动到上一个焦点的函数:Perform(WM_NEXTDLGCT

SendMessage发送自定义消息及消息响应

控件向父窗体发送自定义消息,父窗体定义处理此消息的函数效果描述: 指定哪个类添加自定义消息:(当然这个类必须是CmdTarget的子类,不然不能处理消息) 添加消息实现消息函数:(wParam和lParam程序员可以自行设计传什么值) SendMessage参数解析(SendMessageA是单字节类型函数,SendMessageW是双字节) 1:接受此消息的 “窗口” ,我这个地方是父窗口 2:消息名,如WM_USER+4或是 WM_MYMESSAGE 3:处理此消息的函数的wPar

Winform 程序嵌入WPF程序并发送消息

废话不多说,先看解决方案目录 WindowsFormsDemo是主程序,WpfApp是嵌入的WPF程序,先看WPF程序,程序默认启动的页面是MainWindow.xaml,这里注释掉App.xaml里的StartupUri="MainWindow.xaml",后台设置启动的Uri,将原来的空的App类改成一些内容(也可以不改) /// <summary> /// App.xaml 的交互逻辑 /// </summary> public partial class

[C#]使用Label标签控件模拟窗体标题的移动

本文为原创文章.源代码为原创代码,如转载/复制,请在网页/代码处明显位置标明原文名称.作者及网址,谢谢! 开发工具:VS2017 语言:C# DotNet版本:.Net FrameWork 4.0及以上一.使用的WIN32 API有两个,一个为ReleaseCapture,另外一个为SendMessage,这两个函数说明如下: ReleaseCapture函数:为了说明ReleaseCapture的用法,需要先知道SetCapture的用法,MSDN是这样描述SetCapture函数: 该函数

[C#]使用Label标签控件模拟窗体标题的移动及窗体颜色不断变换

本文为原创文章.源代码为原创代码,如转载/复制,请在网页/代码处明显位置标明原文名称.作者及网址,谢谢! 开发工具:VS2017 语言:C# DotNet版本:.Net FrameWork 4.0及以上一.使用的WIN32 API有两个,一个为ReleaseCapture,另外一个为SendMessage,这两个函数说明如下: ReleaseCapture函数:为了说明ReleaseCapture的用法,需要先知道SetCapture的用法,MSDN是这样描述SetCapture函数: 该函数

【C#】组件分享：FormDragger窗体拖拽器

适用:.net2.0+ winform项目介绍: 类似QQ.迅雷等讲究UI体验的软件,都支持在窗口内多处地方拖动窗口,而不必老实巴交的去顶部标题栏拖,这个组件就是让winform也能这样随性拖拽,随性度或更甚.先看效果: 可拖拽的地方包括不限于: 窗体.Panel.GroupBox.TabControl等容器控件的空白区: 菜单栏.工具栏.状态栏等bar的空白区,以及无效项目: Label.PictureBox.ProgressBar等通常不与鼠标交互的控件: 一切无效控件(Enabled为f

c#无边窗体实现移动的两种方式

转载:http://blog.csdn.net/dxsh126/article/details/2940226 首先,要用到一个WimdowsAPI函数,因此必须引入 using System.Runtime.InteropServices; 命名空间; 然后,这里有两种方法,一种使用API, 一种不用,重写WndProc窗口过程的方式不需要API函数.另一个方法需要两个: SendMessage 像指定窗口过程发送消息 ReleaseCapture 释放鼠标捕获最后是一些必要的常数声明,这些

delphi 中封装的VCl窗体Tab键响应问题

在DLL中的子窗体不会响应Tab按键的,这个时候就需要手动去指定Tab键的操作,但是前提是主窗体要向这个窗体发送一个消息,一个Tab键按下的消息.基本顺序是这样的: 1. 主窗体用Hook技术捕获Tab按键并向活动子窗体发送一个Tab键按下的消息 2. 子窗体手动定义一个Tab键被按下的处理(需要用到FormKeyDown事件). 3. 移动到下一个焦点的WinAPI函数:Perform(WM_NEXTDLGCTL,0,0); 4.移动到上一个焦点的函数:Perform(WM_NEXTDLGCT

使用WIN32汇编语言实现一个基本windows窗体的过程分析

一个常规的windows窗体一般都是一些一样的构造.你假设想要更改一些个性化的设置,你能够在这个一般的模板伤添砖加瓦.构造自己比較喜欢的类型.下边就分析一下一般的windows窗体的一般模板. 一. 首先看一下一般的windows窗体都包括什么框架(NO picture you say a J8.....上图上图)例如以下(罗云斌win32汇编书中92页的一张图): 该图简单的描写叙述了一个主要的窗体的框架. 下图是我们分析的第一个窗体的执行演示样例截图: 这个窗体较为简单.可是包括了窗体的基本

【手记】小心在where中使用NEWID()的大坑【手记】解决启动SQL Server Management Studio 17时报Cannot find one of more components...的问题【C#】组件分享：FormDragger窗体拖拽器【手记】注意BinaryWriter写string的小坑——会在string前加上长度前缀length-prefixed

[手记]小心在where中使用NEWID()的大坑这个表达式: ABS(CHECKSUM(NEWID())) % 3 --把GUID弄成正整数,然后取模是随机返回0.1.2这三个数,不可能返回其它东西,但是如果把它用在where里面,就会发生很神奇的事情,比如这个查询: --创建一个只有1列3行的表,存放0,1,2三个值 DECLARE @t TABLE(Col1 int) INSERT @t SELECT 0 UNION ALL SELECT 1 UNION ALL SELECT 2 --