paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-18 04:59:08 +02:00
Code Issues Packages Projects Releases Wiki Activity

Gtk3: make EnableScrollBar result similar to qt and gtk2 ws.

Browse Source
This commit is contained in:
zeljan1 2025-02-25 09:22:22 +01:00
parent f38f4c730f
commit 406e06d1a9
1 changed files with 1 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lcl/interfaces/gtk3/gtk3winapi.inc
View File

@ -1054,10 +1054,7 @@ end;
function TGtk3WidgetSet.EnableScrollBar(Wnd: HWND; wSBflags, wArrows: Cardinal function TGtk3WidgetSet.EnableScrollBar(Wnd: HWND; wSBflags, wArrows: Cardinal
): Boolean; ): Boolean;
begin begin
{$IFDEF GTK3DEBUGNOTIMPLEMENTED} Result := False;
DebugLn('WARNING: TGtk3WidgetSet.EnableScrollBar not implemented ...');
{$ENDIF}
Result := inherited EnableScrollBar(Wnd, wSBflags, wArrows);
end; end;
function TGtk3WidgetSet.EnableWindow(hWnd: HWND; bEnable: Boolean): Boolean; function TGtk3WidgetSet.EnableWindow(hWnd: HWND; bEnable: Boolean): Boolean;