64位只有一种调用约定stdcall
procedure TForm2.Button1Click(Sender: TObject);
function EnumWindowsProc(Ahwnd: hwnd; AlParam: lParam): Boolean; stdcall;
begin
ShowMessage('hwnd:' + IntToStr(Ahwnd));
ShowMessage('lParam' + IntToStr(AlParam));
Result := True;
end;
begin
EnumChildWindows(0, @EnumWindowsProc, 123);
end;
代码就是上面这点,选择编译32位平台,123会被传送到LParam里,选择编译64位平台123会被传送到hwnd里,这是怎么回事?
IDE是XE6,是我不会用吗?
----------------------------------------------
function EnumWindowsProc(Ahwnd: hwnd; AlParam: lParam): Boolean; stdcall;
begin
ShowMessage('hwnd:' + IntToStr(Ahwnd));
ShowMessage('lParam' + IntToStr(AlParam));
Result := True;
end;
procedure TForm2.Button1Click(Sender: TObject);
begin
EnumChildWindows(0, @EnumWindowsProc, 123);
end;
这样既可.
因为你如果要用嵌套函数的话编译出来的和外边的函数是不同的.
嵌套函数编译后编译器会多给一个参数作为第一个参数.这个参数保存的是父函数的栈底.当父函数调用这个嵌套函数的时候32位会塞ebp,64位会塞rbp作为第一个参数进来.
之所以32位表现似乎是没问题,因为你是stdcall,32位的时候是用栈传递参数,那么当
EnumChildWindows调用到你的函数时,你的函数取的是栈顶的三个值,刚好后两个就是Ahwnd,AlParam.
而64位只有一种调用约定stdcall,而stdcall的参数是rcx,rdx,r8,r9传递前四个参数,后面用栈传.EnumChildWindows调用你的函数的时候只给了rcx,rdx两个值.而你的函数则认为应该是rcx,rdx,r8三个参数.那么你的123被EnumChildWindows当成第二个参数放在rdx中.而你的回调函数则认为自己有三个参数,rcx是编译器给的父函数的栈底,rdx是Ahwnd.
基本就是上面的情况.
----------------------
最新文章
- Oracle学习笔记十三 触发器
- jQuery 选择同时包含两个class的元素的实现方法
- linux red hat 给普通用户开启root权限
- 第二篇——The communication during software engineering.
- Mac Mysql mysql_secure_installation Error: Access denied for user 'root'@'localhost' (using password: YES)
- SQL语句汇总(三)——聚合函数、分组、子查询及组合查询
- 6.python模块(导入,内置,自定义,开源)
- AltiumDesigner学习笔记(一)——创建工程与原理图文件
- HTML: 字符實體
- 非阻塞式socket的select()用法
- -join 和 -split 用法
- 将rcc.exe添加到系统Path
- http的无状态无连接到底是什么含义
- open sql 更新数据
- python_8_字典
- Node复习
- 理解AXI Quad Serial Peripheral Interface(SPI) IP核
- stm8时钟
- css关于定位那些事情
- Duilib 实现开关按钮
热门文章
- ReferenceEquals()、static Equals() 、instance Equals() 与 operator==之间的联系与区别
- .Net Core学习(一)
- C#微信公众号的开发——服务配置
- nginx单机1w并发设置
- python2打印list中文内容防乱码
- 三维重建:SLAM相关的一些术语解释
- SLAM: Ubuntu14.04_Kylin安装ROS-Indigo
- 《3D建模初步》参考资料
- 【技术累积】【点】【java】【18】URLEncode
- google浏览器 打印A4 最大宽度和高度px