|
|
导航: |
论坛 -> DELPHI技术
斑竹:liumazi,sephil |
|
作者: |
|
2019/9/8 10:31:19 |
标题: |
救命啊, OpenFileById 不工作了! |
浏览:1028 |
|
加入我的收藏 |
楼主: |
万能的盒友啊, 谁有用过 OpenFileById 这个变态的 Winodows API, 我明明调用成功过, 但现在总是不成功啊,有成功的朋友吗? 快崩溃了
delphi 10.3.2 操作系统 win 10家庭版,版本 10.0.18362.329
附件中是完整的测试代码, 请有经验的盒友帮忙试试
----------------------------------------------
UniKeeper V10.40 -- 您最贴心的个人数据管理助手 |
作者: |
|
2019/9/8 13:05:47 |
1楼: |
https://github.com/microsoft/Windows-classic-samples/blob/master/Samples/Win7Samples/winbase/io/extendedfileapis/ExtendedFileAPIs.cpp
----------------------------------------------
--
|
作者: |
|
2019/9/9 22:33:40 |
2楼: |
楼上的例子是C++的,不过也可以参考.谢谢了 后来突然又可以了,经过多次按不同参数尝试, 发现一些问题没有办法解释,不知道是不是编译器有问题,又或是权限.反正比较浆糊,理不出头绪,定位不了问题
----------------------------------------------
UniKeeper V10.40 -- 您最贴心的个人数据管理助手
|
作者: |
|
2019/9/10 8:34:20 |
3楼: |
不知道兰州有没有发现就你发的代码编译x64没问题而编译x86就报87错误呢?
在你{$align on}下面加一行{$Z+}然后再试试?
----------------------------------------------
--
|
作者: |
|
2019/9/10 23:15:32 |
5楼: |
初步断定就是缺少 {$Z4} 我看 Winapi.Windows.pas 的开头就是这两个指令 {$A+} {record alignment on 4 byte boundaries} {$Z4} {enum size is 4 bytes}
谢谢 bahamut8348, 果然是高手
----------------------------------------------
UniKeeper V10.40 -- 您最贴心的个人数据管理助手
|
|