Lazarus中文社区

 找回密码
 立即注册(注册审核可向QQ群索取)

QQ登录

只需一步,快速开始

Lazarus IDE and 组件 下载地址版权申明
查看: 4300|回复: 1

无法安装Graphics32组件

[复制链接]

该用户从未签到

发表于 2011-5-25 04:08:06 | 显示全部楼层 |阅读模式
下载了最新的1.9版本,但是在编译的时候,报错,不认识参数中的SrcPoint,它是TFixedPoint record类型,在GR32单元中声明的。

procedure RoundShift1(var DstPoint: TFixedPoint; const SrcPoint: TFixedPoint; const T: TTransformation); {$IFNDEF TARGET_x86}{$IFDEF INLININGSUPPORTED} inline; {$ENDIF}{$ENDIF}
{$IFNDEF TARGET_x86}
begin
  DstPoint.X := (SrcPoint.X + $7F) div 256;
  DstPoint.Y := (SrcPoint.Y + $7FFF) div 65536;
{$ELSE}
asm
    MOV ECX, [SrcPoint.X]
    ADD ECX, $0000007F
    SAR ECX, 8 // sub-sampled
    MOV [DstPoint.X], ECX
    MOV EDX, [SrcPoint.Y]
    ADD EDX, $00007FFF
    SAR EDX, 16
    MOV [DstPoint.Y], EDX
{$ENDIF}
end;   

郁闷啊,哥一个组件也装不上。
回复

使用道具 举报

该用户从未签到

 楼主| 发表于 2011-5-25 12:25:00 | 显示全部楼层
发完才想起来搞错地方了,谢谢猫公挪动

C:\\lazarus\\components\\graphics32\\GR32_Polygons.pas(699,25) Error: Unknown identifier "X"
X不是TFixedPoint里的一个属性吗?为啥是Unknown identifier呢?谁遇到过类似问题?
回复 支持 反对

使用道具 举报

*滑块验证:

本版积分规则

QQ|手机版|小黑屋|Lazarus中国|Lazarus中文社区 ( 鄂ICP备16006501号-1 )

GMT+8, 2025-5-2 20:04 , Processed in 0.033169 second(s), 11 queries , Redis On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表