fixed freeing propertystorage

git-svn-id: trunk@6599 -
This commit is contained in:
mattias 2005-01-15 11:45:50 +00:00
parent 02c4d6ddaa
commit 186fe2ef4d

View File

@ -560,6 +560,7 @@ begin
if Assigned(FOnRestoreProperties) then
FOnRestoreProperties(Self);
finally
FreeStorage;
end;
end;
end;