paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-13 04:29:11 +02:00
Code Issues Packages Projects Releases Wiki Activity

lcl: don't use SetSize(0,0) but use Clear in then RasterImage.LoadFromStream. TIcon cannot handle SetSize.

Browse Source 
git-svn-id: trunk@16172 -
This commit is contained in:
paul 2008-08-20 23:37:33 +00:00
parent 3eba350810
commit c00e679d3f
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lcl/include/rasterimage.inc
View File

@ -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;