From 444d97c881ef7e4d55c98d3620b8e23e6fef5178 Mon Sep 17 00:00:00 2001
From: roberto <rblanco@rodax-software.com>
Date: Wed, 12 Dec 2007 19:52:04 +0000
Subject: [PATCH] =?UTF-8?q?Arreglado=20un=20error=20que=20se=20produc?=
 =?UTF-8?q?=C3=ADa=20al=20comprobar=20si=20un=20DataTable=20sin=20deltas?=
 =?UTF-8?q?=20preparados=20ha=20sido=20modificado.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@58 f4e31baf-9722-1c47-927c-6f952f962d4b
---
 Source/Base/Utiles/uDataTableUtils.pas | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/Source/Base/Utiles/uDataTableUtils.pas b/Source/Base/Utiles/uDataTableUtils.pas
index 610cafe4..76e67f34 100644
--- a/Source/Base/Utiles/uDataTableUtils.pas
+++ b/Source/Base/Utiles/uDataTableUtils.pas
@@ -185,10 +185,11 @@ var
   i : integer;
 begin
   bCambiado := False;
+
   if Assigned(ADataTable) and (ADataTable.Active) then
   begin
-    bCambiado := (ADataTable.State = dsEdit) or
-                DeltaValuesAreDifferent(ADataTable.Delta);
+    bCambiado :=(ADataTable.State = dsEdit) or
+                (ADataTable.HasDelta and DeltaValuesAreDifferent(ADataTable.Delta));
 
     if (not bCambiado) then
     begin
@@ -197,7 +198,8 @@ begin
       begin
         bCambiado := bCambiado or
                     ((TDADataTable(dtDetails.Items[i])).State in dsEditModes) or
-                    DeltaValuesAreDifferent((TDADataTable(dtDetails.Items[i])).Delta);
+                    ((TDADataTable(dtDetails.Items[i])).HasDelta and
+                    DeltaValuesAreDifferent((TDADataTable(dtDetails.Items[i])).Delta));
         if bCambiado then
           Break;
       end;