diff options
| author | Tomas Bzatek <tbzatek@redhat.com> | 2024-12-23 23:59:45 +0100 |
|---|---|---|
| committer | Tomas Bzatek <tbzatek@redhat.com> | 2025-11-27 19:36:10 +0100 |
| commit | b9703b29819b619037cc282d719c187e51bacd30 (patch) | |
| tree | bd6d73e5fb6bcb6eb307844103b3dff185f2ac9a /libgtk_kylix/GTKText.pas | |
| parent | a9634b933f71a9045e61d29c486f2d51d39fd1e2 (diff) | |
| download | tuxcmd-b9703b29819b619037cc282d719c187e51bacd30.tar.xz | |
Port to g-i generated glib2 bindings
Includes switch to FPC -Mobjfpc and related pointer style fixes.
Diffstat (limited to 'libgtk_kylix/GTKText.pas')
| -rw-r--r-- | libgtk_kylix/GTKText.pas | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libgtk_kylix/GTKText.pas b/libgtk_kylix/GTKText.pas index 127e399..d3152b1 100644 --- a/libgtk_kylix/GTKText.pas +++ b/libgtk_kylix/GTKText.pas @@ -24,7 +24,7 @@ unit GTKText; interface -uses gtk2, gdk2, glib2, Classes, GTKControls, GTKConsts, GTKUtils, GTKClasses, GTKForms; +uses gtk2, lazgobject2, Classes, GTKControls, GTKForms; type @@ -88,7 +88,7 @@ begin FTextBuffer := TGTKTextBuffer.Create(Self); FWidget := gtk_text_view_new_with_buffer(FTextBuffer.FBuffer); Show; - g_object_unref(FTextBuffer.FBuffer); + g_object_unref(PGObject(FTextBuffer.FBuffer)); end; destructor TGTKTextView.Destroy; |