From e8f011bf1e8d864d974f21f71eaac6268b6be7d9 Mon Sep 17 00:00:00 2001
From: jesus <jesus@lazarus-ide.org>
Date: Thu, 29 Sep 2005 17:26:03 +0000
Subject: [PATCH] copydataset won't find dataset if it's the last on the list

git-svn-id: trunk@7852 -
---
 components/memds/frmselectdataset.pp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/components/memds/frmselectdataset.pp b/components/memds/frmselectdataset.pp
index 6f97e06e2e..280f7f27a2 100644
--- a/components/memds/frmselectdataset.pp
+++ b/components/memds/frmselectdataset.pp
@@ -134,7 +134,7 @@ begin
           DSN:=Items[ItemIndex];
         DS:=Nil;
         I:=0;
-        While (DS=Nil) and (I<F.ComponentCount-1) do
+        While (DS=Nil) and (I<F.ComponentCount) do
           if (F.Components[i] is TDataset) and
              (F.Components[i].Name=DSN) then
             DS:=F.Components[i] as TDataset