diff --git a/source/main.pas b/source/main.pas index c8632c27..6f9ac4a1 100644 --- a/source/main.pas +++ b/source/main.pas @@ -1014,7 +1014,6 @@ type FGridPasting: Boolean; FHasDonatedDatabaseCheck: TThreeStateBoolean; FFocusedTables: TDBObjectList; - FLastActionUpdate: Cardinal; // Host subtabs backend structures FHostListResults: TDBQueryList; @@ -5175,11 +5174,6 @@ var begin // When adding some new TAction here, be sure to apply this procedure to its OnUpdate event - // Ensure this quite complex procedure is not called 100 times when a (popup-)menu pops up - if FLastActionUpdate >= GetTickCount-100 then - Exit; - FLastActionUpdate := GetTickCount; - Grid := ActiveGrid; Results := nil; GridHasChanges := False;