Re: [Lazarus] For issue #31638 (gtk2 function that require free mem)

2017-04-20 Thread Mattias Gaertner via Lazarus
On Thu, 20 Apr 2017 07:47:29 +0300 Alexey via Lazarus wrote: > + if Assigned(Path) then > + begin > +AStr := gtk_tree_path_to_string(path); > +AIsSet := (StrToInt(AStr) = AIndex); > +if AStr <> nil then > + g_free(AStr); > +if Path <> nil then >

[Lazarus] For issue #31638 (gtk2 function that require free mem)

2017-04-19 Thread Alexey via Lazarus
+ if Assigned(Path) then + begin +AStr := gtk_tree_path_to_string(path); +AIsSet := (StrToInt(AStr) = AIndex); +if AStr <> nil then + g_free(AStr); +if Path <> nil then + gtk_tree_path_free(Path); +Result := True; + end; 1-