On Thu, 20 Apr 2017 07:47:29 +0300 Alexey via Lazarus <lazarus@lists.lazarus-ide.org> 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 > + gtk_tree_path_free(Path); > + Result := True; > + end; > > 1- not need in last check "if Path<>nil", checked before > 2- better StrToIntDef(AStr, -1) to not give exception > (cannot comment there.) Done. Thanks for the hint. Mattias -- _______________________________________________ Lazarus mailing list Lazarus@lists.lazarus-ide.org http://lists.lazarus-ide.org/listinfo/lazarus
