为什么编译通不过，完全照书上的-编程技术-看雪-安全社区|安全招聘|kanxue.com

为什么编译通不过，完全照书上的

发表于: 2005-10-20 09:16 5486

为什么编译通不过，完全照书上的

limee

2005-10-20 09:16

5486

谁能够看一下吗？

var
FF : THandle;
ReadNUmber : DWORD;
ReadBuffer : ARRAY[0..1023] of Char;

begin
FF := createFile('myPort',
      GENERIC_READ or GENERIC_WRITE,//访问模式
      0, // 共享模式,必须为0
      nil, // 安全属性指针
      OPEN_EXISTING, // 打开方式必须
      FILE_FLAG_OVERLAPPED,// 文件属性
      0);
ReadFile(FF,ReadBuffer,1024,@ReadNUmber,nil);
~~~~~~~~~
这行编译无法通过

错误提示：
[Error] Unit1.pas(51):
Types of actual and formal var parameters must be identical

[培训]内核驱动高级班，冲击BAT一流互联网大厂工作，每周日13:00-18:00直播授课

收藏・0

免费・0

支持

最新回复 (3)
baby2008 雪币： 442 活跃值： (1241) 能力值： ( LV12，RANK：1130 ) 在线值：发帖 87 回帖 1435 粉丝 5 关注私信	baby2008 28 2 楼 Delphi: FileRead(Handle: Integer; var Buffer; Count: Integer): Integer; 2005-10-20 09:34 0
starluck 雪币： 212 活跃值： (40) 能力值： ( LV4，RANK：50 ) 在线值：发帖 5 回帖 234 粉丝 0 关注私信	starluck 1 3 楼 ReadFile(FF,ReadBuffer,1024,@ReadNUmber,nil); 因为第三个参数应该是cardinal类型的； ReadFile(FF,ReadBuffer,1024,ReadNUmber,nil); 2005-10-20 12:53 0
心已欠费雪币： 200 活跃值： (10) 能力值： ( LV2，RANK：10 ) 在线值：发帖 0 回帖 102 粉丝 0 关注私信	心已欠费 4 楼又学习了，我现在正在学编译，这些对我很有用哈 2005-10-21 01:13 0
	游客登录 \| 注册方可回帖回帖表情雪币赚取及消费高级回复

limee

456

发帖

976

回帖

RANK

关注

私信

他的文章

关于我们

联系我们

企业服务

看雪公众号

专注于PC、移动、智能设备安全研究及逆向工程的开发者社区

最新回复 (3)
baby2008 雪币： 442 活跃值： (1241) 能力值： ( LV12，RANK：1130 ) 在线值：发帖 87 回帖 1435 粉丝 5 关注私信	baby2008 28 2 楼 Delphi: FileRead(Handle: Integer; var Buffer; Count: Integer): Integer; 2005-10-20 09:34 0
starluck 雪币： 212 活跃值： (40) 能力值： ( LV4，RANK：50 ) 在线值：发帖 5 回帖 234 粉丝 0 关注私信	starluck 1 3 楼 ReadFile(FF,ReadBuffer,1024,@ReadNUmber,nil); 因为第三个参数应该是cardinal类型的； ReadFile(FF,ReadBuffer,1024,ReadNUmber,nil); 2005-10-20 12:53 0
心已欠费雪币： 200 活跃值： (10) 能力值： ( LV2，RANK：10 ) 在线值：发帖 0 回帖 102 粉丝 0 关注私信	心已欠费 4 楼又学习了，我现在正在学编译，这些对我很有用哈 2005-10-21 01:13 0
	游客登录 \| 注册方可回帖回帖表情雪币赚取及消费高级回复