From 5de8d0e1a4c9fa90801952f89e13b03cfb1c3f02 Mon Sep 17 00:00:00 2001 From: david Date: Thu, 10 Jul 2008 10:29:35 +0000 Subject: [PATCH] =?UTF-8?q?Tipos=20de=20IVA:=20Error=20en=20literal=20(pon?= =?UTF-8?q?=C3=ADa=20eliminar=20forma=20de=20pago).?= 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@267 f4e31baf-9722-1c47-927c-6f952f962d4b --- Source/Modulos/Tipos de IVA/Views/uEditorTiposIVA.pas | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/Source/Modulos/Tipos de IVA/Views/uEditorTiposIVA.pas b/Source/Modulos/Tipos de IVA/Views/uEditorTiposIVA.pas index c1dbbbd7..b5814c99 100644 --- a/Source/Modulos/Tipos de IVA/Views/uEditorTiposIVA.pas +++ b/Source/Modulos/Tipos de IVA/Views/uEditorTiposIVA.pas @@ -28,7 +28,7 @@ interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, uIEditorTiposIVA, uBizTiposIVA, uTiposIVAController, DB, uDADataTable, - ActnList, Grids, DBGrids, StdCtrls, ComCtrls; + ActnList, Grids, DBGrids, StdCtrls, ComCtrls, uDAInterfaces; type TfEditorTiposIVA = class(TForm, IEditorTiposIVA) @@ -106,7 +106,7 @@ end; procedure TfEditorTiposIVA.actEliminarExecute(Sender: TObject); begin - if (ShowConfirmMessage('¿Desea borrar esta forma de pago?', '') = IDYES) then + if (ShowConfirmMessage('¿Desea borrar este tipo de IVA?', '') = IDYES) then FController.Eliminar(FTiposIVA) end;