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, 4 insertions, 1 deletions

diff --git a/UGnome.pas b/UGnome.pas
index 8280132..54386cf 100644
--- a/UGnome.pas
+++ b/UGnome.pas
@@ -212,6 +212,9 @@ var libGlib2Handle, libGtk2Handle, libGnome2Handle, libGnomeUI2Handle: Pointer;
     g_mkdir_with_parents: function (const pathname: PChar; mode: integer): integer; cdecl;
 
 
+function _gtk_notebook_insert_page(notebook:PGtkNotebook; child:PGtkWidget;tab_label:PGtkWidget; position:gint):gint; cdecl; external gtklib name 'gtk_notebook_insert_page';
+
+
 
 
 procedure LoadGnomeLibs;
@@ -557,7 +560,7 @@ begin
   g_object_set_data (G_OBJECT (hbox), 'close-button', close_button);
   g_object_set_data (G_OBJECT (hbox), 'tooltips', FTooltips);
 
-  Result := gtk_notebook_insert_page(PGtkNotebook(FWidget), Child.FWidget, hbox, Position);
+  Result := _gtk_notebook_insert_page(PGtkNotebook(FWidget), Child.FWidget, hbox, Position);
 end;
 
 procedure TEphyNotebook.RemovePage(PageNo: integer);