mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-22 16:19:36 +02:00
LCL: fixed memory corruption introduced in r59880 #5fabf10223. issue #34708
git-svn-id: trunk@59888 -
This commit is contained in:
parent
8abb8ccdeb
commit
5e3ff3cf84
@ -1459,7 +1459,7 @@ begin
|
||||
ToR.AllocData(ToR.FCount);
|
||||
if ToR.FCount>0 then
|
||||
begin
|
||||
DataSize := ToR.FWidth * ToR.FHeight * SizeOf(FData[0]);
|
||||
DataSize := ToR.FWidth * ToR.FHeight; {issue #34708 * SizeOf(FData[0])};
|
||||
System.Move(FromR.FData[0], ToR.FData[0], ToR.FCount * DataSize);
|
||||
end;
|
||||
end;
|
||||
|
Loading…
Reference in New Issue
Block a user