mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-15 19:02:39 +02:00
fixed setting Modified on clear a TGraphic in designer
git-svn-id: trunk@5241 -
This commit is contained in:
parent
68df576ea4
commit
8f9ff1e7ac
@ -400,6 +400,7 @@ begin
|
|||||||
end
|
end
|
||||||
else if ABitmap<>nil then begin
|
else if ABitmap<>nil then begin
|
||||||
ABitmap.FreeImage;
|
ABitmap.FreeImage;
|
||||||
|
Modified;
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
finally
|
finally
|
||||||
|
Loading…
Reference in New Issue
Block a user