diff options
| author | Tomas Bzatek <tbzatek@redhat.com> | 2024-12-24 12:41:48 +0100 |
|---|---|---|
| committer | Tomas Bzatek <tbzatek@redhat.com> | 2025-11-27 19:39:51 +0100 |
| commit | 1b2b4bb4f3ecc034a6e9364d8768e50b167a9680 (patch) | |
| tree | 065ddde53b64f7957a30b7dc9d83a748f309868c /libgtk_kylix/GTKText.pas | |
| parent | b9703b29819b619037cc282d719c187e51bacd30 (diff) | |
| download | tuxcmd-1b2b4bb4f3ecc034a6e9364d8768e50b167a9680.tar.xz | |
Rough GTK3 port
Diffstat (limited to 'libgtk_kylix/GTKText.pas')
| -rw-r--r-- | libgtk_kylix/GTKText.pas | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/libgtk_kylix/GTKText.pas b/libgtk_kylix/GTKText.pas index d3152b1..31423d7 100644 --- a/libgtk_kylix/GTKText.pas +++ b/libgtk_kylix/GTKText.pas @@ -1,6 +1,5 @@ (* GTK-Kylix Library: GTKText - Multiline Text Editor (GtkTextView) - Version 0.5.16 (last updated 2003-01-21) Copyright (C) 2003 Tomas Bzatek <tbzatek@users.sourceforge.net> This library is free software; you can redistribute it and/or @@ -24,7 +23,7 @@ unit GTKText; interface -uses gtk2, lazgobject2, Classes, GTKControls, GTKForms; +uses lazgobject2, lazgtk3, Classes, GTKControls, GTKForms; type @@ -103,7 +102,7 @@ end; procedure TGTKTextView.SetWrapMode(Value: TGTKTextViewWrapMode); begin - gtk_text_view_set_wrap_mode(PGtkTextView(FWidget), integer(Value)); + gtk_text_view_set_wrap_mode(PGtkTextView(FWidget), TGtkWrapMode(Value)); end; function TGTKTextView.GetReadOnly: boolean; |