From 67d1097c03eb5eaf58efe557741f7020504946f8 Mon Sep 17 00:00:00 2001
From: juha <juha@lazarus-ide.org>
Date: Sat, 12 May 2012 13:05:11 +0000
Subject: [PATCH] IDE: harmonize the casing of variables.

git-svn-id: trunk@37257 -
---
 ideintf/frmselectprops.pas | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/ideintf/frmselectprops.pas b/ideintf/frmselectprops.pas
index fd7075d69d..de27953401 100644
--- a/ideintf/frmselectprops.pas
+++ b/ideintf/frmselectprops.pas
@@ -155,7 +155,7 @@ begin
     L.Delimiter:=';';
     L.DelimitedText:=AValue;
     For I:=0 to L.Count-1 do
-      L[i]:=Trim(L[i]);
+      L[I]:=Trim(L[I]);
     L.Sort;
     LBSelected.Items.Assign(L);
   Finally
@@ -255,10 +255,10 @@ begin
         LBSelected.Items.BeginUpdate;
         //writeln('TSelectPropertiesForm.AddSelectedProperties B');
         For I:=Items.Count-1 downto 0 do
-          If Selected[i] then
+          If Selected[I] then
             begin
             //writeln('TSelectPropertiesForm.AddSelectedProperties C ',i);
-            N:=Items[i];
+            N:=Items[I];
             If (FSelectedComponent<>FPropComponent) then
               N:=FSelectedComponent.Name+'.'+N;
             LBSelected.Items.Add(N);
@@ -279,7 +279,7 @@ begin
     try
       Items.BeginUpdate;
       For I:=Items.Count-1 downto 0 do
-        If Selected[i] then
+        If Selected[I] then
           Items.Delete(I);
     Finally
       Items.EndUpdate;