diff --git a/ideintf/objectinspector.pp b/ideintf/objectinspector.pp
index 78fdffce7b..c123836091 100644
--- a/ideintf/objectinspector.pp
+++ b/ideintf/objectinspector.pp
@@ -403,11 +403,7 @@ type
     procedure ValueComboBoxMouseUp(Sender: TObject; Button: TMouseButton;
                                    Shift: TShiftState; X, Y: Integer);
     procedure ValueComboBoxCloseUp(Sender: TObject);
-  {$IFDEF UseOnGetItems}
     procedure ValueComboBoxGetItems(Sender: TObject);
-  {$ELSE}
-    procedure ValueComboBoxDropDown(Sender: TObject);
-  {$ENDIF}
     procedure ValueButtonClick(Sender: TObject);
     procedure ValueComboBoxDrawItem(Control: TWinControl; Index: Integer;
           ARect: TRect; State: TOwnerDrawState);
@@ -866,11 +862,7 @@ begin
     OnKeyDown:=@ValueComboBoxKeyDown;
     OnKeyUp:=@ValueComboBoxKeyUp;
     OnMouseUp:=@ValueComboBoxMouseUp;
-  {$IFDEF UseOnGetItems}
     OnGetItems:=@ValueComboBoxGetItems;
-  {$ELSE}
-    OnDropDown:=@ValueComboBoxDropDown;
-  {$ENDIF}
     OnCloseUp:=@ValueComboBoxCloseUp;
     OnDrawItem:=@ValueComboBoxDrawItem;
   end;
@@ -2643,11 +2635,7 @@ begin
   SetRowValue;
 end;
 
-{$IFDEF UseOnGetItems}
 procedure TOICustomPropertyGrid.ValueComboBoxGetItems(Sender: TObject);
-{$ELSE}
-procedure TOICustomPropertyGrid.ValueComboBoxDropDown(Sender: TObject);
-{$ENDIF}
 var
   CurRow: TOIPropertyGridRow;
   MaxItemWidth, CurItemWidth, i, Cnt: integer;