D7下可以的代码XE2下无效-CSDN论坛

D7下可以的代码XE2下无效

Delphi > Windows SDK/API

收藏回复

[问题点数：40分，结帖人myyebin]

⋅编译出错解决 ⋅D7代码到XE后无效 ⋅D7升级到XE2函数出错 更多帖子 关注私信空间博客 myyebin 等级 本版专家分：0 结帖率 60%

procedure TForm1.btn1Click(Sender: TObject);

var

  h:HWND;

  cmd:string;

  cpd : COPYDATASTRUCT;

begin

  h := FindWindow('ACG!',nil);

  cmd := 'snapshot';

  cpd.cbData := Length(cmd)+1;

  cpd.lpData := PChar(cmd);

  SendMessage(h,WM_COPYDATA,$12,Lparam(@cpd));

end;

这段代码我再D7下执行么问题，到XE2下执行能执行过去但是没效果，这个是什么原因。

2012-08-02 10:28:14

点赞只看楼主引用举报楼主收起

展开阅读全文

⋅怎样去掉DELPHI 10.3.3 启动后的 security alert 提示窗体

⋅ delphi怎么发布osx64的程序？

⋅调用delphi7的编辑的ActiveX dll多事件异常

更多帖子

关注私信空间博客

xxfly

等级

本版专家分：814

勋章

签到新秀 累计签到获取，不积跬步，无以至千里，继续坚持！: 把PChar(cmd)替换成PAnsiChar(cmd)试试

2012-08-02 10:58:51

点赞只看TA 引用举报 #1得分 40

⋅编译出错解决 ⋅D7代码到XE后无效 ⋅D7升级到XE2函数出错 更多帖子 关注私信空间博客 myyebin 等级 本版专家分：0: 谢谢楼上的，这个我试过也是没效果，XE2真是麻烦。

2012-08-02 11:10:29

点赞只看TA 引用举报 #2得分 0

⋅编译出错解决 ⋅D7代码到XE后无效 ⋅D7升级到XE2函数出错 更多帖子 关注私信空间博客 myyebin 等级 本版专家分：0: 有大牛帮看看不。

2012-08-02 18:22:31

点赞只看TA 引用举报 #3得分 0

⋅编译出错解决 ⋅D7代码到XE后无效 ⋅D7升级到XE2函数出错 更多帖子 关注私信空间博客 myyebin 等级 本版专家分：0

自己解决了，XE2太讨厌了，D7升级上来代码需要修改那么多地方。
原代码D7

procedure TForm1.btn1Click(Sender: TObject);

var

  h:HWND;

  cmd:string;

  cpd : COPYDATASTRUCT;

begin

  h := FindWindow('ACG!',nil);

  cmd := 'snapshot';

  cpd.cbData := Length(cmd)+1;

  cpd.lpData := PChar(cmd);

  SendMessage(h,WM_COPYDATA,$12,Lparam(@cpd));

end;

XE2代码



procedure SendCs(x: string);

var

  h: HWND;

  cmd: string;

  cpd: COPYDATASTRUCT;

begin

  h := FindWindow('ACG!', nil);

  cmd := x;

  cpd.cbData := Length(cmd) + 1;

  cpd.lpData := PAnsiChar(AnsiString('snapshot')) ;

  SendMessage(h, WM_COPYDATA, $12, Lparam(@cpd));

end;

cpd.lpData := PAnsiChar(AnsiString('snapshot')) 这行竟然要这样转才可以。。。。

2012-08-02 18:50:21

点赞只看TA 引用举报 #4得分 0

收起

收藏回复

myyebin

等级：

关注私信 TA的帖子

delphi低版本升高版本问题: d7之后，对升级影响比较大的版本有这些：delphi2009，xe2以及xe5。2009开始string默认为unicode，xe2引入firemonkey，xe5支持手机开发。高版本的其它一些新特性，比如泛型，闭包，增强的rtti，dbexpress，...

GetLastError返回代码含义: 参考... 【0|0】-操作成功完成。【0x1|1】-函数不正确。【0x2|2】-系统找不到指定的文件。 ...【0x3|3】-系统找不到指定的路径。...【0x6|6】-句柄无效。【0x7|7】-存储控制

win7 + delphi 7 + Excel2007 不支持CreateOLEObject('Excel.Application') 解决方案: 首页 | 软件模板 | 源码 | 矢量 | 图标 | 字体 | 音效 | 图库 | 动画 | 代码 | 笑话 | 美食 | 美女 | 壁纸 | 书法 | 文秘 | 手机 | 汽车 | 游戏 | 家电 | 家居 | 女人 ...

GetLastError错误码: 参考http://msdn.microsoft.com/en-us/library/ms681381(v=vs.85).aspx 【0|0】-操作成功完成。【0x1|1】-函数不正确。【0x2|2】-系统找不到指定的文件。【0x3|3】-系统找不到指定的路径。...

程序员常见系统错误代码大全：1到15841: 程序员常见系统错误代码大全：1到15841 提示：使用浏览器的Ctrl + F键盘组合来搜索错误代码。要么搜索错误消息本身，要么只搜索错误代码，例如“错误代码635”。系统错误代码大全：1到15841 错误代码1：...

反汇编mbr: 今天把我们每次开机都用到的MBR，反汇编看看里面的引导代码是怎么样的顺便说一下 MBR 相关的开机过程。以及我们经常用的U盘自启动程序到底值怎么玩的。window开机流程流程加电-->BIOS--> MBR--> DPT--> pbr--> ...

微信小程序富文本解析: *人狠话不多，直接代码搞起* html代码 <p>这是一段文字</p> <p><strong>这是加粗的字</strong></p> <p><em>这是斜体字</em></p> <p><u>这...

HTML5的使用及基本注意说明相关笔记（二）: 1.使用HTML5来DIY彩虹播放器◆html5新增的语义化标签，多媒体盒子标签 figure，专门用来放视频标签、音频标签、图片标签等，<figure><figcaption&...)，是可以获取到元素的，html5新...

HID 报告描述: HID 报告描述 1 报告描述简介 Report Description，即上报事件的描述，描述所支持事件的格式及取值意义，比如鼠标按键上报格式、左键右键中间键分别对应的值等；报告描述跟JSON有些类似，都是结构数据，格式类似{...

WINDOWS溢出资料: 原著：Jason 翻译/整理/改编：backend 2000年4月12日 --[ ...后来有幸拜读了ipxodi所著的《Windows系统下的堆栈溢出》（已刊登在绿盟网络安全月刊2000年第三期中），又碰巧看到了Jason先生的《Windows NT Buffer Over

Butterfly-蝴蝶-主题优化、美化-Lete乐特: 本片文章涉及到修改源码，如果你要升级主题的话，你看到这里可以关闭本文章了。本文所做的优化是我自己hexo init后，去Github上克隆Butterfly主题的稳定版，一步步在原主题基础上修改的保证了小白根据本片文章一...

书签备份: <!DOCTYPE NETSCAPE-Bookmark-file-1><META HTTP-EQUIV="...text/h...

bookmark20160330: It will be read and overwritten. DO NOT EDIT! --> Bookmarks Bookmarks 书签栏百度一下，你就知道 20160311 redis - 必应 REDIS 3.0.7 下载

Java算法大全,java进制装换,java日期转换: // 十进制转化为十六进制，结果为C8。 Integer.toHexString(200); // 十六进制转化为十进制，结果140。 Integer.parseInt("8C",16); Java的16进制与字符串的相互转换函数 ... * 将指定byte数组以16进制的...

RFC1662_PPP in HDLC-like Framing_HDLC协议: 简要介绍了PPP 的HDLC样框架结构如下所示。这个数字不包括钻头插入同步（如启动和停止位异步链接），也没有任何位或八位字节插入的透明度。传输领域从左至右 ... | 01111110 | 11111111 | 00000011 |

GetLastError() 返回值一览: 函数原型: DWORD GetLastError() 中文版(不完全) 　〖0〗-操作成功完成。...　〖6〗-句柄无效。　〖7〗-存储控制块被损坏。　〖8〗-存储空间不足，无法处理此命令。　〖9〗-存储控制块地...

webuploader 手机端上传图片默认打开相机改为选择相册: 1.高版本的webuploader.js会出现这种情况，改为低版本webuploader.js可以解决这个问题 2.隐藏这行capture=camera,用编辑器打开webupload.js 4926 行以下是低版本的webuploader.js，复制存储为webuploader.js，...

基于CAN总线和UDS诊断协议的车用BootLoader开发: 一、前言之前写过一篇《英飞凌XC2000系列CAN BootLoader（CAN_BSL）的实现》，感兴趣的朋友看这里： ...这篇介绍的是利用英飞凌内置的BootLoader机制实现程序的更新，优点是开发难度小，但不能实现程序更新流程的完全...

julia:字符串（完结）: 字符串字符串是由有限个字符组成的序列。然而, 字符又是什么呢。说英文者所熟悉的字符是字母 A, B, C, …，以及数字和常用的标点符号。这些字符由 ASCII 标准统一标准化并且与 0 到 127 范围内的整数一一对应。...

Python2.7字符编码详解: Python2.7字符编码详解

CC2640R2F学习笔记（25）——RFID SI522使用: 在使用到 ACD 模式时，其实就是普通的读写模式和低功耗模式的切换，可以理解为“ACD 函数”中嵌套了一个“PCD 函数”，达到触发条件后进入“PCD 函数”，执行函数内容，最后回到“ACD 函数”，等待下一次的触发。...

WebUploader 上传 php 怎么回去返回的图片路径: 修改如下：上次写的那个不是很详细，这篇完善下。代码很全看注释尤其 html 代码：<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/T...

Notes Twenty one days-渗透攻击-红队-权限提升: ** Notes Twentieth Day-渗透攻击-红队-权限提升(dayu) ** 作者：大余时间：2020-10-5 请注意：对于所有笔记中复现的这些终端或者服务器，都是自行搭建的环境进行渗透的。我将使用Kali Linux作为此次学习的攻击者...

modbus通讯协议详解: 通过此协议，控制器相互之间、或控制器经由网络（如以太网）可以和其它设备之间进行通信。Modbus协议使用的是主从通讯技术，即由主设备主动查询和操作从设备。一般将主控设备方所使用的协议称为Modbus Master，从...

文件上传插件: 这两天工作需要写一个文件上传...对于直接复制粘贴代码的小伙伴可能有些问题 <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">...

根据进程PID获取程序所在路径的函数 x32-x64 d7-d2007-xe2通用支持（Delphi全网首发）: function GetProcessImageFileName(hProcess: Cardinal; lpImageFileName: LPSTR; nSize: DWORD): DWORD; stdcall; external 'PSAPI.dll' name '...{根据进程PID获取程序所在路径的函数 x32-x64 d7-...

GetLastErr返回值ErrCode的宏定义以及含义: 参考链接：https://docs.microsoft.com/en-us/previous-versions/aa911366(v=msdn.10)?redirectedfrom=MSDN 十进制十六进制宏定义中文解释 1 0x1 ERROR_INVALID_FUNCTION 功能不正确 ...3...

Notes Twenty-third days-渗透攻击-红队-红队自研: ** Notes Twenty-third days-渗透攻击-红队-权限提升(dayu) ** 作者：大余时间：2020-10-9 请注意：对于所有笔记中复现的这些终端或者服务器，都是自行搭建的环境进行渗透的。我将使用Kali Linux作为此次学习的攻击...

基于头条新闻数据的文本分类系统实战: 新闻数据本质上来说也属于文本数据，新闻分类本质也就归成了文本分类系统，本文主要是自己业余时间里面的一个小实践，主要是完成从数据采集、存储解析、文本向量化处理、分类模型构建几个步骤，方法和套路都是比较...

淘宝/天猫/京东/拼多多/苏宁易购/小米商城/华为商城/抖音直播/茅台抢购助手: 淘宝/天猫/京东/拼多多/苏宁易购/小米商城/华为商城/抖音直播/茅台抢购助手，功能非常多，很强大的一款秒杀抢购软件！

相关热词 c#建立坐标系 c# 截取数字串 c# 坐标正算 c# 波形显示控件野比 c# sql 语法判断 c#多线程有关的类 c#窗体编号 c# 操作二进制文件 c# 反射机制 c#角度转弧度