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

GTK2: memory leaks, not freed gtk objects

Browse Source 
git-svn-id: trunk@60227 -
This commit is contained in:
martin 2019-01-26 17:58:58 +00:00
parent e46c6dc9fe
commit e5be8d6a8e
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/interfaces/gtk2/gtk2wsstdctrls.pp
View File

@ -450,6 +450,7 @@ begin
if not gtk_tree_selection_path_is_selected(Selection, Path) then if not gtk_tree_selection_path_is_selected(Selection, Path) then
Result := -1; Result := -1;
end; end;
gtk_tree_path_free(Path);
end else end else
Result := -1; Result := -1;
end; end;
@ -2526,6 +2527,7 @@ begin
width := width + inner_border^.left + inner_border^.right; width := width + inner_border^.left + inner_border^.right;
y := y - inner_border^.top; y := y - inner_border^.top;
height := height + inner_border^.top + inner_border^.bottom; height := height + inner_border^.top + inner_border^.bottom;
gtk_border_free(inner_border);
end end
else else
begin begin