mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-12 02:56:01 +02:00
lcl: don't use SetSize(0,0) but use Clear in then RasterImage.LoadFromStream. TIcon cannot handle SetSize.
git-svn-id: trunk@16172 -
This commit is contained in:
parent
3eba350810
commit
c00e679d3f
@ -433,8 +433,7 @@ begin
|
|||||||
UnshareImage(False);
|
UnshareImage(False);
|
||||||
if ASize = 0
|
if ASize = 0
|
||||||
then begin
|
then begin
|
||||||
FreeSaveStream;
|
Clear;
|
||||||
SetSize(0, 0);
|
|
||||||
Exit;
|
Exit;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user