【发布时间】:2022-01-28 14:10:43
【问题描述】:
我尝试了在 Google 中找到的代码,但没有任何效果,而且在大多数情况下它甚至无法编译(缺少单元、未声明的数据类型等)。 我终于找到了一些看起来完整但显示“句柄无效”错误的东西: http://rsdn.org/article/delphi/SMART.xml 您可以从这里下载文件: http://rsdn.org/article/delphi/smart/smart.zip
问题在于函数function OpenSMART(DrvNum:Byte): THandle;
hSMARTIOCTL:=CreateFile(PChar('\\.\PhysicalDrive'+inttostr(DrvNum)),GENERIC_READ or GENERIC_WRITE,FILE_SHARE_READ or FILE_SHARE_WRITE,nil,OPEN_EXISTING,0,0);
result:= hSMARTIOCTL;
我该如何解决它或在哪里可以找到工作示例?
我使用 Delphi 7 Pro 和 Delphi 10.3。
【问题讨论】:
-
您问题中下载文件的链接无效
-
奇怪,它仍然不适合我。但是感谢您的存档,该链接运行良好
-
@GuidoG 编译得好吗?你有什么操作系统?
标签: delphi delphi-7 delphi-10.3-rio