rad studio10.3 businessskin编译通不过(delphi)

weixin_44544555 2019-01-28 01:53:24
编译时,显示[dcc32 Error] bspngimage.pas(1632): E2064 Left side cannot be assigned to,代码如下:
procedure TbsPngLayerIDAT.CopyInterlacedRGB8(const Pass: Byte;
Src, Dest, Trans, Extra: pChar);
var
Col: Integer;
begin
Col := ColumnStart[Pass];
Dest := pChar(Longint(Dest) + Col * 3);
repeat
Byte(Dest^) := fOwner.GammaTable[pByte(Longint(Src) + 2)^]; inc(Dest); //通不过
Byte(Dest^) := fOwner.GammaTable[pByte(Longint(Src) + 1)^]; inc(Dest); //通不过
Byte(Dest^) := fOwner.GammaTable[pByte(Longint(Src) )^]; inc(Dest); //通不过

inc(Src, 3);
inc(Dest, ColumnIncrement[Pass] * 3 - 3);
inc(Col, ColumnIncrement[Pass]);
until Col >= ImageWidth;
end;

是说const不能赋值?
...全文
489 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
huang714 2019-02-14
  • 打赏
  • 举报
回复
Byte(Dest)^ := fOwner.GammaTable[pByte(Longint(Src) + 2)^];
  • 打赏
  • 举报
回复
PByte(Dest)^ := fOwner.GammaTable[pByte(Longint(Src) + 2)^];
...

16,748

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 语言基础/算法/系统设计
社区管理员
  • 语言基础/算法/系统设计社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧