From 585635371a182d2b3cd5400f6d26d8e20ade6dbd Mon Sep 17 00:00:00 2001 From: Tomas Bzatek Date: Mon, 23 Dec 2024 12:09:37 +0100 Subject: Drop Application.GTKVersion_2_xxx_Up ...and related quirks along with it. Assume latest gtk2 release. --- UConnectionManager.pas | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'UConnectionManager.pas') diff --git a/UConnectionManager.pas b/UConnectionManager.pas index f029bcb..a9cbbfb 100644 --- a/UConnectionManager.pas +++ b/UConnectionManager.pas @@ -344,7 +344,7 @@ begin Item.SetValue(1, ConnMgrItem.ConnectionName); Item.SetValue(2, FConnectionProperties.MakeURI(True)); Item.Selected := True; - Item.SetCursor(0, False, not Application.GTKVersion_2_2_0_Up, 0.5, 0); + Item.SetCursor(0, False, False, 0.5, 0); end; finally FConnectionProperties.Free; @@ -434,7 +434,7 @@ begin Item.SetValue(1, ConnMgrItem.ConnectionName); Item.SetValue(2, FConnectionProperties.MakeURI(True)); Item.Selected := True; - Item.SetCursor(0, False, not Application.GTKVersion_2_2_0_Up, 0.5, 0); + Item.SetCursor(0, False, False, 0.5, 0); end; finally FConnectionProperties.Free; @@ -470,7 +470,7 @@ begin then OldIndex := ListView.ConvertFromSorted(ListView.Items.Count - 1) else OldIndex := ListView.ConvertFromSorted(OldIndex); ListView.Items[OldIndex].Selected := True; - ListView.Items[OldIndex].SetCursor(0, False, not Application.GTKVersion_2_2_0_Up, 0.5, 0); + ListView.Items[OldIndex].SetCursor(0, False, False, 0.5, 0); end; ListView.SetFocus; end; -- cgit v1.2.3