Delete non-used variable.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@3349 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
inoussa
2014-07-20 16:02:13 +00:00
parent 10ac72edd5
commit 1c7072d0e8

View File

@ -261,7 +261,6 @@ procedure TfClassEdit.MovePropertyItem(AItem: TPasProperty; const ANewIndex: Int
var var
locItem : TListItem; locItem : TListItem;
i : Integer;
begin begin
if ( AItem <> nil ) and if ( AItem <> nil ) and
( ( ANewIndex >= 0 ) and ( ANewIndex < edtProp.Items.Count ) ) ( ( ANewIndex >= 0 ) and ( ANewIndex < edtProp.Items.Count ) )