Use getters instead of direct access to structuresv0.6.71

This will hopefully fix remaining GUI issues on PPC64. Needs further testing!

Also, libgtk_kylix sources have been altered for use with gtk2forpascal-1.0.7 for Kylix compilation.

1 files changed, 2 insertions, 0 deletions

diff --git a/libgtk_kylix/GTKView.pas b/libgtk_kylix/GTKView.pas
index 85a13a0..db1dc93 100644
--- a/libgtk_kylix/GTKView.pas
+++ b/libgtk_kylix/GTKView.pas
@@ -378,6 +378,7 @@ var sort_column_id: gint;
     order: TGtkSortType;
 begin
   Result := -1;
+  sort_column_id := -1;
   if (FTreeModelSort <> nil) and gtk_tree_sortable_get_sort_column_id(PGtkTreeSortable(FTreeModelSort), @sort_column_id, @order)
     then Result := sort_column_id;
 end;
@@ -419,6 +420,7 @@ var sort_column_id: gint;
     order: TGtkSortType;
 begin
   Result := soNone;
+  order := 0;
   if (FTreeModelSort <> nil) and gtk_tree_sortable_get_sort_column_id(PGtkTreeSortable(FTreeModelSort), @sort_column_id, @order)
     then Result := TGTKTreeViewSortOrder(order);
 end;