From 1c7072d0e8f2e8a13723f092603a47de1d0112bd Mon Sep 17 00:00:00 2001 From: inoussa Date: Sun, 20 Jul 2014 16:02:13 +0000 Subject: [PATCH] Delete non-used variable. git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@3349 8e941d3f-bd1b-0410-a28a-d453659cc2b4 --- wst/trunk/type_lib_edtr/ufclassedit.pas | 1 - 1 file changed, 1 deletion(-) diff --git a/wst/trunk/type_lib_edtr/ufclassedit.pas b/wst/trunk/type_lib_edtr/ufclassedit.pas index c9f0faa89..4edac3f45 100644 --- a/wst/trunk/type_lib_edtr/ufclassedit.pas +++ b/wst/trunk/type_lib_edtr/ufclassedit.pas @@ -261,7 +261,6 @@ procedure TfClassEdit.MovePropertyItem(AItem: TPasProperty; const ANewIndex: Int var locItem : TListItem; - i : Integer; begin if ( AItem <> nil ) and ( ( ANewIndex >= 0 ) and ( ANewIndex < edtProp.Items.Count ) )