ideintf: more save comparison about current row in the OI (possibly fixes bug #0012998)

git-svn-id: trunk@18485 -

ideintf/objectinspector.lfm

@@ -31,7 +31,6 @@ object ObjectInspectorDlg: TObjectInspectorDlg
     Width = 275
     Align = alTop
     AutoComplete = False
-    Ctl3D = False
     ItemHeight = 13
     ItemWidth = 0
     OnCloseUp = AvailComboBoxCloseUp

ideintf/objectinspector.lrs

@@ -9,8 +9,8 @@ LazarusResources.Add('TObjectInspectorDlg','FORMDATA',[
   +#3#134#2#5'Width'#3#19#1#6'Panels'#14#1#5'Width'#2'd'#0#1#5'Width'#2'2'#0#0
   +#11'SimplePanel'#8#0#0#9'TComboBox'#23'AvailPersistentComboBox'#4'Left'#2#0#6
   +'Height'#2#21#3'Top'#2#0#5'Width'#3#19#1#5'Align'#7#5'alTop'#12'AutoComplete'
-  +#8#5'Ctl3D'#8#10'ItemHeight'#2#13#9'ItemWidth'#2#0#9'OnCloseUp'#7#20'AvailCo'
-  +'mboBoxCloseUp'#5'Style'#7#14'csDropDownList'#8'TabOrder'#2#0#0#0#10'TPopupM'
-  +'enu'#13'MainPopupMenu'#7'OnPopup'#7#20'OnMainPopupMenuPopup'#4'left'#2#9#3
-  +'top'#2#11#0#0#0
+  +#8#10'ItemHeight'#2#13#9'ItemWidth'#2#0#9'OnCloseUp'#7#20'AvailComboBoxClose'
+  +'Up'#5'Style'#7#14'csDropDownList'#8'TabOrder'#2#0#0#0#10'TPopupMenu'#13'Mai'
+  +'nPopupMenu'#7'OnPopup'#7#20'OnMainPopupMenuPopup'#4'left'#2#9#3'top'#2#11#0
+  +#0#0
 ]);

ideintf/objectinspector.pp

@@ -2223,7 +2223,7 @@ begin
     ParentRow:=ParentRow.Parent;
   end;
 
-  if (ItemIndex <> -1) and (Rows[ItemIndex] = ARow) then
+  if (ItemIndex <> -1) and (ItemIndex = ARow.Index) then
     Result := FHighlightFont.Color
   else if IsObjectSubProperty then
     Result := FSubPropertiesColor