paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-27 00:22:01 +02:00
Code Issues Packages Projects Releases Wiki Activity

fixed TCollectionPropertEditor deleting collection item, when not in sync

Browse Source 
git-svn-id: trunk@6873 -
This commit is contained in:
mattias 2005-03-02 11:49:29 +00:00
parent a2e6b02e8c
commit b33ad8e14d
1 changed files with 0 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
ideintf/propedits.pp
View File

@ -3516,7 +3516,6 @@ begin
if NewItemIndex=i then NewItemIndex:=-1;
end;
CollectionListBox.ItemIndex := -1;
CollectionListBox.Items.Delete(i);
if NewItemIndex>i then dec(NewItemIndex);
//debugln('TCollectionPropertyEditorForm.DeleteClick A NewItemIndex=',dbgs(NewItemIndex),' ItemIndex=',dbgs(CollectionListBox.ItemIndex),' CollectionListBox.Items.Count=',dbgs(CollectionListBox.Items.Count),' Collection.Count=',dbgs(Collection.Count));
// unselect all items in OI (collections can act strange on delete)