Ticket #336 -> Limitar los campos de datos bancarios en la ficha de clientes

git-svn-id: https://192.168.0.254/svn/Proyectos.Noviseda_FactuGES2/trunk@27 f33bb606-9f5c-448d-9c99-757f00063c96

Source/Modulos/Contactos/Views/uEditorDatoBancario.dfm

@@ -5,23 +5,24 @@ object fEditorDatoBancario: TfEditorDatoBancario
   BorderStyle = bsDialog
   Caption = 'Cambiar datos bancarios'
   ClientHeight = 193
-  ClientWidth = 426
+  ClientWidth = 502
   Color = clBtnFace
   ParentFont = True
   OldCreateOrder = True
   Position = poOwnerFormCenter
   DesignSize = (
-    426
+    502
     193)
   PixelsPerInch = 96
   TextHeight = 13
   object Bevel1: TBevel
     Left = 8
     Top = 8
-    Width = 329
+    Width = 405
     Height = 177
     Anchors = [akLeft, akTop, akRight]
     Shape = bsFrame
+    ExplicitWidth = 329
   end
   object Label2: TLabel
     Left = 20
@@ -64,7 +65,7 @@ object fEditorDatoBancario: TfEditorDatoBancario
     Caption = 'C'#243'digo de cuenta:'
   end
   object OKBtn: TButton
-    Left = 343
+    Left = 419
     Top = 7
     Width = 75
     Height = 25
@@ -72,9 +73,10 @@ object fEditorDatoBancario: TfEditorDatoBancario
     Caption = '&Aceptar'
     ModalResult = 1
     TabOrder = 0
+    ExplicitLeft = 343
   end
   object CancelBtn: TButton
-    Left = 343
+    Left = 419
     Top = 38
     Width = 75
     Height = 25
@@ -83,6 +85,7 @@ object fEditorDatoBancario: TfEditorDatoBancario
     Caption = '&Cancelar'
     ModalResult = 2
     TabOrder = 1
+    ExplicitLeft = 343
   end
   object eEntidad: TDBEdit
     Left = 136
@@ -91,6 +94,7 @@ object fEditorDatoBancario: TfEditorDatoBancario
     Height = 21
     DataField = 'ENTIDAD'
     DataSource = dsDatosBancarios
+    MaxLength = 4
     TabOrder = 3
   end
   object eSucursal: TDBEdit
@@ -100,6 +104,7 @@ object fEditorDatoBancario: TfEditorDatoBancario
     Height = 21
     DataField = 'SUCURSAL'
     DataSource = dsDatosBancarios
+    MaxLength = 4
     TabOrder = 4
   end
   object eDC: TDBEdit
@@ -109,12 +114,13 @@ object fEditorDatoBancario: TfEditorDatoBancario
     Height = 21
     DataField = 'DC'
     DataSource = dsDatosBancarios
+    MaxLength = 2
     TabOrder = 5
   end
   object eTitular: TDBEdit
     Left = 135
     Top = 24
-    Width = 191
+    Width = 266
     Height = 21
     DataField = 'TITULAR'
     DataSource = dsDatosBancarios
@@ -127,6 +133,7 @@ object fEditorDatoBancario: TfEditorDatoBancario
     Height = 21
     DataField = 'CUENTA'
     DataSource = dsDatosBancarios
+    MaxLength = 10
     TabOrder = 6
   end
   object dsDatosBancarios: TDADataSource