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

Qt: removed workaround for qt 4.3, fixes #15744

Browse Source 
git-svn-id: trunk@23838 -
This commit is contained in:
zeljko 2010-03-04 18:39:43 +00:00
parent 0c45fb0f79
commit 8abecb2ba9
1 changed files with 0 additions and 16 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
lcl/interfaces/qt/qtwscomctrls.pp
View File

@ -900,21 +900,6 @@ begin
Exit;
QtTreeWidget := TQtTreeWidget(ALV.Handle);
QtTreeWidget.takeTopLevelItem(AIndex);
{$note FIXME workaround issue #9746, TQtWSCustomListView.ItemDelete}
{workaround for ListOutOfBounds in some cases. Described with issue #9746}
QtItem := QtTreeWidget.currentItem;
if QtItem <> nil then
begin
Item := ALV.Selected;
if Assigned(Item) then
begin
if Item.Index <> QtTreeWidget.indexOfTopLevelItem(QtItem) then
TListView(ALV).Items[QtTreeWidget.indexOfTopLevelItem(QtItem)].Selected := True;
end;
end;
end;
{------------------------------------------------------------------------------
@ -989,7 +974,6 @@ begin
lisFocused: AIsSet := TWI = QtTreeWidget.currentItem;
lisSelected: AIsSet := QTreeWidgetItem_isSelected(TWI);
end;
Result := True;
end;