From 8422968027d1b17f419a1402d48f406d37bdf752 Mon Sep 17 00:00:00 2001
From: david <darranz@rodax-software.com>
Date: Fri, 16 May 2008 17:18:06 +0000
Subject: [PATCH] Repaso general

git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@373 0c75b7a4-871f-7646-8a2f-f78d34cc349f
---
 Source/ApplicationBase/ApplicationBase.dproj  |  42 ++---
 Source/Base/Base.dproj                        | 102 +++++------
 Source/Base/Base.res                          | Bin 384 -> 4748 bytes
 Source/GUIBase/GUIBase.dpk                    |   9 +-
 Source/GUIBase/GUIBase.dproj                  |  85 +++++-----
 Source/GUIBase/GUIBase.res                    | Bin 4748 -> 384 bytes
 Source/GUIBase/uViewGrid.dfm                  |  37 ++--
 Source/GUIBase/uViewGridBase.pas              | 128 +++++++++++---
 .../Contactos/Views/Contactos_view.dproj      |  64 +++----
 .../Contactos/Views/Contactos_view.res        | Bin 4748 -> 384 bytes
 .../Contactos/Views/uEditorClientes.dfm       |  30 ++--
 .../Contactos/Views/uEditorContactos.dfm      |   2 +-
 .../Contactos/Views/uEditorElegirClientes.dfm |  34 +++-
 .../Views/uEditorElegirProveedores.dfm        |  24 ++-
 .../Contactos/Views/uEditorEmpleados.dfm      |  31 ++--
 .../Contactos/Views/uEditorProveedores.dfm    |  31 ++--
 .../Modulos/Contactos/Views/uViewClientes.dfm | 160 +++++++++++++-----
 .../Modulos/Contactos/Views/uViewClientes.pas |  16 +-
 .../Contactos/Views/uViewContactos.dfm        | 136 ++++++++++++++-
 .../Contactos/Views/uViewContactos.pas        |  68 +++++---
 .../Contactos/Views/uViewEmpleados.dfm        | 124 ++++++++++++--
 .../Contactos/Views/uViewEmpleados.pas        |   8 +-
 .../Contactos/Views/uViewProveedores.dfm      | 151 +++++++++++++----
 .../Contactos/Views/uViewProveedores.pas      |  20 ++-
 24 files changed, 939 insertions(+), 363 deletions(-)

diff --git a/Source/ApplicationBase/ApplicationBase.dproj b/Source/ApplicationBase/ApplicationBase.dproj
index 765914bc..7aa75d9a 100644
--- a/Source/ApplicationBase/ApplicationBase.dproj
+++ b/Source/ApplicationBase/ApplicationBase.dproj
@@ -60,27 +60,27 @@
     <DelphiCompile Include="ApplicationBase.dpk">
       <MainSource>MainSource</MainSource>
     </DelphiCompile>
-    <DCCReference Include="..\Modulos\Almacenes\Base.dcp" />
-    <DCCReference Include="..\Modulos\Almacenes\dbrtl.dcp" />
-    <DCCReference Include="..\Modulos\Almacenes\dclIndyCore.dcp" />
-    <DCCReference Include="..\Modulos\Almacenes\designide.dcp" />
-    <DCCReference Include="..\Modulos\Almacenes\GUIBase.dcp" />
-    <DCCReference Include="..\Modulos\Almacenes\IndyCore.dcp" />
-    <DCCReference Include="..\Modulos\Almacenes\IndyProtocols.dcp" />
-    <DCCReference Include="..\Modulos\Almacenes\IndySystem.dcp" />
-    <DCCReference Include="..\Modulos\Almacenes\JvJansD11R.dcp" />
-    <DCCReference Include="..\Modulos\Almacenes\pckMD5.dcp" />
-    <DCCReference Include="..\Modulos\Almacenes\pckUCDataConnector.dcp" />
-    <DCCReference Include="..\Modulos\Almacenes\pckUserControl_RT.dcp" />
-    <DCCReference Include="..\Modulos\Almacenes\PLuginSDK_D10R.dcp" />
-    <DCCReference Include="..\Modulos\Almacenes\rtl.dcp" />
-    <DCCReference Include="..\Modulos\Almacenes\vcl.dcp" />
-    <DCCReference Include="..\Modulos\Almacenes\vclactnband.dcp" />
-    <DCCReference Include="..\Modulos\Almacenes\vcldb.dcp" />
-    <DCCReference Include="..\Modulos\Almacenes\vcljpg.dcp" />
-    <DCCReference Include="..\Modulos\Almacenes\VclSmp.dcp" />
-    <DCCReference Include="..\Modulos\Almacenes\vclx.dcp" />
-    <DCCReference Include="..\Modulos\Almacenes\xmlrtl.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\Base.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dbrtl.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dclIndyCore.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\designide.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\GUIBase.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\IndyCore.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\IndyProtocols.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\IndySystem.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\JvJansD11R.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\pckMD5.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\pckUCDataConnector.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\pckUserControl_RT.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\PLuginSDK_D10R.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\rtl.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\vcl.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\vclactnband.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\vcldb.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\vcljpg.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\VclSmp.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\vclx.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\xmlrtl.dcp" />
     <DCCReference Include="Empresas\Controller\uDatosBancariosEmpresaController.pas" />
     <DCCReference Include="Empresas\Controller\uEmpresasController.pas" />
     <DCCReference Include="Empresas\Controller\View\uIEditorDatosBancarioEmpresa.pas" />
diff --git a/Source/Base/Base.dproj b/Source/Base/Base.dproj
index 4cbe355e..8b91dde5 100644
--- a/Source/Base/Base.dproj
+++ b/Source/Base/Base.dproj
@@ -53,58 +53,58 @@
     <DelphiCompile Include="Base.dpk">
       <MainSource>MainSource</MainSource>
     </DelphiCompile>
-    <DCCReference Include="..\Modulos\Contactos\adortl.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\cxDataD11.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\cxEditorsD11.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\cxExportD11.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\cxExtEditorsD11.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\cxGridD11.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\cxIntl6D11.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\cxIntlPrintSys3D11.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\cxLibraryD11.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\cxPageControlD11.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\DataAbstract_Core_D11.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\dbrtl.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\dclIndyCore.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\designide.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\dsnap.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\dxGDIPlusD11.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\dxPSCoreD11.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\dxThemeD11.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\GUISDK_D11.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\IndyCore.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\IndyProtocols.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\IndySystem.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\Jcl.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\JclVcl.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\JSDialog100.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\JvCmpD11R.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\JvCoreD11R.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\JvCtrlsD11R.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\JvDlgsD11R.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\JvMMD11R.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\JvNetD11R.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\JvPageCompsD11R.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\JvStdCtrlsD11R.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\JvSystemD11R.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\pckMD5.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\pckUCDataConnector.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\pckUserControl_RT.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\PngComponentsD10.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\PNG_D10.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\RemObjects_Core_D11.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\RemObjects_Indy_D11.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\rtl.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\TB2k_D10.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\tbx_d10.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\vcl.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\vclactnband.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\vcldb.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\vcljpg.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\VclSmp.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\vclx.dcp" />
-    <DCCReference Include="..\Modulos\Contactos\xmlrtl.dcp" />
     <DCCReference Include="..\Servicios\FactuGES_Intf.pas" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\adortl.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\cxDataD11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\cxEditorsD11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\cxExportD11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\cxExtEditorsD11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\cxGridD11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\cxIntl6D11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\cxIntlPrintSys3D11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\cxLibraryD11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\cxPageControlD11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\DataAbstract_Core_D11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\dbrtl.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\dclIndyCore.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\designide.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\dsnap.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\dxGDIPlusD11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\dxPSCoreD11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\dxThemeD11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\GUISDK_D11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\IndyCore.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\IndyProtocols.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\IndySystem.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\Jcl.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\JclVcl.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\JSDialog100.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\JvCmpD11R.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\JvCoreD11R.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\JvCtrlsD11R.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\JvDlgsD11R.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\JvMMD11R.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\JvNetD11R.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\JvPageCompsD11R.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\JvStdCtrlsD11R.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\JvSystemD11R.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\pckMD5.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\pckUCDataConnector.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\pckUserControl_RT.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\PngComponentsD10.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\PNG_D10.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\RemObjects_Core_D11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\RemObjects_Indy_D11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\rtl.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\TB2k_D10.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\tbx_d10.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\vcl.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\vclactnband.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\vcldb.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\vcljpg.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\VclSmp.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\vclx.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\xmlrtl.dcp" />
     <DCCReference Include="Conexion\uConfigurarConexion.pas">
       <Form>fConfigurarConexion</Form>
       <DesignClass>TForm</DesignClass>
diff --git a/Source/Base/Base.res b/Source/Base/Base.res
index 8b251f312bcccec5485024f6fe8d80e1cdf25746..1641339fcc482e7e3492d1b45813a86619622c33 100644
GIT binary patch
literal 4748
zcmbW5&ub)A5XUPdpe&2#;C*uNAUVhgd+&(4um@dnom`vXF9g}ZuHJ;se=<3UNdFJg
zbCw+UD9j$byGIXV`~6hC>h4S?F|k9X-j90q{Z_qtZ<;nUJCO8!h?<w4U-ol;S2jC7
zx4(byej2@_#)0HWvg0i^wC4Xli+W*aXJ^(njceK|Kb@c3qFNX>p${kR>3GhM`oH*q
zk=UsjOCIgA_4!`B+Gb&`I84R)bT4dy-BQV<-SyFz?R8ILEQ(+JB$u{sEXE@j@B*7W
zT;iZH#|OJ<&DO$RCkM6VbK3(B(k{nbdv1lpc;E$xz9as|v3uE1V{hw2w~g3eD0an7
z{BT%G%irdMe*|oDJmgvJ<ltI;x5J<Oc>aA2`9B<Z5Toyra?r{a4$fnJHGXo6Pmcq8
z{JGCD500t1h4|yI?-f&xoj9;YT&Ch&JLO*X#NC3sCI0Xmc<f_vh`jn-1E!?th$%QM
znzGM|)$vl3f7;nE+9qR}|A?C$H3K&BFdq9?uxrIqHIne#5?8G@da2ybWLGKA686M2
z*LJMMMk4<U`dzFC9}HrSxLfOGll{P#??xir)$c2}C;ql+y-&Wa(LP{PgPk1E1@{uR
zIMCNz;u9;r(axhQvEx%?i#p<Vn=Z!SK%f10?4_`0@RY8lXRM3(t(nFSzJ$4kJr6&x
ze)~B%biu*TY$HDstHD=|UGxJceYiUQQa0Gu(p3og@%ZJ><6Xi*?M~Q;)@Sbfwf3uf
zVaWkbU<NjR3%=~AdoZbkXp`f@b0%GBT^$^V5e(n|#O(?P)hBbF)4n%2cw6U#adPM!
zz(!`V|Bfl{aH0)Y&w;SK7R4<z{p;Gwz1D%l86L3ZFZQ&=pB$<&esXT|OZ?=AGaWoe
z{>jU=;sL{BlYemIZXv%qZ{SZw{-TCU+;!nH6KDDIJumU+9{E0zXW4>7T)y|>$DQlv
zRJe?TjSp{c!DqeayAnSMTtZZT;>LN7J0Rls+5m@q)MbyB*eL%Eu@(+$Cw}Pd@q7N|
z%Q0*AHpCP^b9v`@jx-l_FD>khpW2W8(OU2&V5TrnoAY-m_hlcV?zq3;7{2gF{J#Hc
z6R+o~mVenX?>@W0@_DVzyOFs(5464CY{!q9ChoF#_*eXi@4gFuV8?vhl=_w5$iKL0
zEV0nMBcN08xtRmsgJrqjh@s#|{?*ssnsG)mH*wa6{efF0JFWHok@kA5%b661{B38=
zCcgJ|*ZFTpV$8<-&+AWpa)Q8*`wL&hMeNQ^v6I7$HSdLZhZ^&+6<@Uw_Zsml9^v3W
zVvPDBKHh;i=RU4J_ta3E;)M<P+=2X7;VbzliQZ=IHV#+fr#{!(ukt%UJMS8=332qg
z7jD)rSbpCW+^j*cd6LUEe8#9n&v!NEJM(@?SHvB$=h@|)fjw|&qD?NQ5A&R>n>Y+L
zKLZ0UQ+*km9FO-b?U4gmn-62iwzH6&*duKGo~aUV)bYDla8wWZ9+^7p-F<8lP@i!m
z@vhbD_${F}h>^T;C(?(b*OJDk?{dEXB?nuehoON3HAb!7Mr7-ls!84-5V-jJu<OVP
zzHjp+hnwo*3NQE$JTA(agu~silV5T`du+GJgWGi_7mAy`Nk8fLt~%GF$;XXcE-ri?
zyIglyyzA`K-);4Eem2MZm07RBza@W3UP)d`Rz=RFk-I);`s{$L%yyBNX0OTjo5Gk0
zs}g44uXg*l%xo^{`#0=kd*2?}Cz22Bv2;Gu?;3o~(D#gk1OKYQSCAb$(&vu@_pvWO
z>gbu<_$}mU=Yd9!?TOX;|B-#B)+0x#9q*yqJiqS!`49d=7ztk$O+9=1i;?K_|J<8T
z?0b7=-`Z3A#vV$4XJ5(lQ~TOZHUFdA%oWvK5zg&_IKXIbughQBA8XAsd#=@|TFLXC
zy(^m((;DnQmDQ<zX+PK(Lfu@ox#mOnbZjSDl}IBqv$qwK+2@))5$ba>Katmw!@c`|
G?EMQ&4NnpP

delta 11
ScmeBCZD5|Duvteife`=|>;pCc

diff --git a/Source/GUIBase/GUIBase.dpk b/Source/GUIBase/GUIBase.dpk
index 182a7139..eb13b13f 100644
--- a/Source/GUIBase/GUIBase.dpk
+++ b/Source/GUIBase/GUIBase.dpk
@@ -64,7 +64,14 @@ requires
   dxSkinSilverD11,
   dxSkinStardustD11,
   dxSkinValentineD11,
-  dxSkinXmas2008BlueD11;
+  dxSkinXmas2008BlueD11,
+  cxLibraryD11,
+  dxThemeD11,
+  dxGDIPlusD11,
+  dxComnD11,
+  dxPSCoreD11,
+  vcljpg,
+  vclx;
 
 contains
   uEditorBase in 'uEditorBase.pas' {fEditorBase: TCustomEditor},
diff --git a/Source/GUIBase/GUIBase.dproj b/Source/GUIBase/GUIBase.dproj
index 3232a732..a7a1c283 100644
--- a/Source/GUIBase/GUIBase.dproj
+++ b/Source/GUIBase/GUIBase.dproj
@@ -58,43 +58,52 @@
     <DelphiCompile Include="GUIBase.dpk">
       <MainSource>MainSource</MainSource>
     </DelphiCompile>
-    <DCCReference Include="Base.dcp" />
-    <DCCReference Include="dbrtl.dcp" />
-    <DCCReference Include="dxBarD11.dcp" />
-    <DCCReference Include="dxBarExtItemsD11.dcp" />
-    <DCCReference Include="dxLayoutControlD11.dcp" />
-    <DCCReference Include="dxPScxCommonD11.dcp" />
-    <DCCReference Include="dxPScxGrid6LnkD11.dcp" />
-    <DCCReference Include="dxPsPrVwAdvD11.dcp" />
-    <DCCReference Include="dxSkinBlackD11.dcp" />
-    <DCCReference Include="dxSkinBlueD11.dcp" />
-    <DCCReference Include="dxSkinCaramelD11.dcp" />
-    <DCCReference Include="dxSkinCoffeeD11.dcp" />
-    <DCCReference Include="dxSkinGlassOceansD11.dcp" />
-    <DCCReference Include="dxSkiniMaginaryD11.dcp" />
-    <DCCReference Include="dxSkinLilianD11.dcp" />
-    <DCCReference Include="dxSkinLiquidSkyD11.dcp" />
-    <DCCReference Include="dxSkinLondonLiquidSkyD11.dcp" />
-    <DCCReference Include="dxSkinMcSkinD11.dcp" />
-    <DCCReference Include="dxSkinMoneyTwinsD11.dcp" />
-    <DCCReference Include="dxSkinOffice2007BlackD11.dcp" />
-    <DCCReference Include="dxSkinOffice2007BlueD11.dcp" />
-    <DCCReference Include="dxSkinOffice2007GreenD11.dcp" />
-    <DCCReference Include="dxSkinOffice2007PinkD11.dcp" />
-    <DCCReference Include="dxSkinOffice2007SilverD11.dcp" />
-    <DCCReference Include="dxSkinsCoreD11.dcp" />
-    <DCCReference Include="dxSkinscxPCPainterD11.dcp" />
-    <DCCReference Include="dxSkinsdxLCPainterD11.dcp" />
-    <DCCReference Include="dxSkinSilverD11.dcp" />
-    <DCCReference Include="dxSkinStardustD11.dcp" />
-    <DCCReference Include="dxSkinValentineD11.dcp" />
-    <DCCReference Include="dxSkinXmas2008BlueD11.dcp" />
-    <DCCReference Include="frx11.dcp" />
-    <DCCReference Include="frxe11.dcp" />
-    <DCCReference Include="fs11.dcp" />
-    <DCCReference Include="JvAppFrmD11R.dcp" />
-    <DCCReference Include="JvCtrlsD11R.dcp" />
-    <DCCReference Include="rtl.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\Base.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\cxLibraryD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dbrtl.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxBarD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxBarExtItemsD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxComnD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxGDIPlusD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxLayoutControlD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxPSCoreD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxPScxCommonD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxPScxGrid6LnkD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxPsPrVwAdvD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxSkinBlackD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxSkinBlueD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxSkinCaramelD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxSkinCoffeeD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxSkinGlassOceansD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxSkiniMaginaryD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxSkinLilianD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxSkinLiquidSkyD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxSkinLondonLiquidSkyD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxSkinMcSkinD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxSkinMoneyTwinsD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxSkinOffice2007BlackD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxSkinOffice2007BlueD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxSkinOffice2007GreenD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxSkinOffice2007PinkD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxSkinOffice2007SilverD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxSkinsCoreD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxSkinscxPCPainterD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxSkinsdxLCPainterD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxSkinSilverD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxSkinStardustD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxSkinValentineD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxSkinXmas2008BlueD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\dxThemeD11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\frx11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\frxe11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\fs11.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\JvAppFrmD11R.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\JvCtrlsD11R.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\rtl.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\vcl.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\vcldb.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\vcljpg.dcp" />
+    <DCCReference Include="..\Modulos\Contactos\vclx.dcp" />
     <DCCReference Include="uDialogBase.pas">
       <Form>fDialogBase</Form>
     </DCCReference>
@@ -185,8 +194,6 @@
       <Form>frViewTotales</Form>
       <DesignClass>TFrame</DesignClass>
     </DCCReference>
-    <DCCReference Include="vcl.dcp" />
-    <DCCReference Include="vcldb.dcp" />
   </ItemGroup>
 </Project>
 <!-- EurekaLog First Line
diff --git a/Source/GUIBase/GUIBase.res b/Source/GUIBase/GUIBase.res
index 1641339fcc482e7e3492d1b45813a86619622c33..8b251f312bcccec5485024f6fe8d80e1cdf25746 100644
GIT binary patch
delta 11
ScmeBCZD5|Duvteife`=|>;pCc

literal 4748
zcmbW5&ub)A5XUPdpe&2#;C*uNAUVhgd+&(4um@dnom`vXF9g}ZuHJ;se=<3UNdFJg
zbCw+UD9j$byGIXV`~6hC>h4S?F|k9X-j90q{Z_qtZ<;nUJCO8!h?<w4U-ol;S2jC7
zx4(byej2@_#)0HWvg0i^wC4Xli+W*aXJ^(njceK|Kb@c3qFNX>p${kR>3GhM`oH*q
zk=UsjOCIgA_4!`B+Gb&`I84R)bT4dy-BQV<-SyFz?R8ILEQ(+JB$u{sEXE@j@B*7W
zT;iZH#|OJ<&DO$RCkM6VbK3(B(k{nbdv1lpc;E$xz9as|v3uE1V{hw2w~g3eD0an7
z{BT%G%irdMe*|oDJmgvJ<ltI;x5J<Oc>aA2`9B<Z5Toyra?r{a4$fnJHGXo6Pmcq8
z{JGCD500t1h4|yI?-f&xoj9;YT&Ch&JLO*X#NC3sCI0Xmc<f_vh`jn-1E!?th$%QM
znzGM|)$vl3f7;nE+9qR}|A?C$H3K&BFdq9?uxrIqHIne#5?8G@da2ybWLGKA686M2
z*LJMMMk4<U`dzFC9}HrSxLfOGll{P#??xir)$c2}C;ql+y-&Wa(LP{PgPk1E1@{uR
zIMCNz;u9;r(axhQvEx%?i#p<Vn=Z!SK%f10?4_`0@RY8lXRM3(t(nFSzJ$4kJr6&x
ze)~B%biu*TY$HDstHD=|UGxJceYiUQQa0Gu(p3og@%ZJ><6Xi*?M~Q;)@Sbfwf3uf
zVaWkbU<NjR3%=~AdoZbkXp`f@b0%GBT^$^V5e(n|#O(?P)hBbF)4n%2cw6U#adPM!
zz(!`V|Bfl{aH0)Y&w;SK7R4<z{p;Gwz1D%l86L3ZFZQ&=pB$<&esXT|OZ?=AGaWoe
z{>jU=;sL{BlYemIZXv%qZ{SZw{-TCU+;!nH6KDDIJumU+9{E0zXW4>7T)y|>$DQlv
zRJe?TjSp{c!DqeayAnSMTtZZT;>LN7J0Rls+5m@q)MbyB*eL%Eu@(+$Cw}Pd@q7N|
z%Q0*AHpCP^b9v`@jx-l_FD>khpW2W8(OU2&V5TrnoAY-m_hlcV?zq3;7{2gF{J#Hc
z6R+o~mVenX?>@W0@_DVzyOFs(5464CY{!q9ChoF#_*eXi@4gFuV8?vhl=_w5$iKL0
zEV0nMBcN08xtRmsgJrqjh@s#|{?*ssnsG)mH*wa6{efF0JFWHok@kA5%b661{B38=
zCcgJ|*ZFTpV$8<-&+AWpa)Q8*`wL&hMeNQ^v6I7$HSdLZhZ^&+6<@Uw_Zsml9^v3W
zVvPDBKHh;i=RU4J_ta3E;)M<P+=2X7;VbzliQZ=IHV#+fr#{!(ukt%UJMS8=332qg
z7jD)rSbpCW+^j*cd6LUEe8#9n&v!NEJM(@?SHvB$=h@|)fjw|&qD?NQ5A&R>n>Y+L
zKLZ0UQ+*km9FO-b?U4gmn-62iwzH6&*duKGo~aUV)bYDla8wWZ9+^7p-F<8lP@i!m
z@vhbD_${F}h>^T;C(?(b*OJDk?{dEXB?nuehoON3HAb!7Mr7-ls!84-5V-jJu<OVP
zzHjp+hnwo*3NQE$JTA(agu~silV5T`du+GJgWGi_7mAy`Nk8fLt~%GF$;XXcE-ri?
zyIglyyzA`K-);4Eem2MZm07RBza@W3UP)d`Rz=RFk-I);`s{$L%yyBNX0OTjo5Gk0
zs}g44uXg*l%xo^{`#0=kd*2?}Cz22Bv2;Gu?;3o~(D#gk1OKYQSCAb$(&vu@_pvWO
z>gbu<_$}mU=Yd9!?TOX;|B-#B)+0x#9q*yqJiqS!`49d=7ztk$O+9=1i;?K_|J<8T
z?0b7=-`Z3A#vV$4XJ5(lQ~TOZHUFdA%oWvK5zg&_IKXIbughQBA8XAsd#=@|TFLXC
zy(^m((;DnQmDQ<zX+PK(Lfu@ox#mOnbZjSDl}IBqv$qwK+2@))5$ba>Katmw!@c`|
G?EMQ&4NnpP

diff --git a/Source/GUIBase/uViewGrid.dfm b/Source/GUIBase/uViewGrid.dfm
index cf57adff..4ce1c83b 100644
--- a/Source/GUIBase/uViewGrid.dfm
+++ b/Source/GUIBase/uViewGrid.dfm
@@ -18,8 +18,6 @@ inherited frViewGrid: TfrViewGrid
     TabOrder = 0
     LookAndFeel.Kind = lfOffice11
     LookAndFeel.NativeStyle = True
-    ExplicitWidth = 554
-    ExplicitHeight = 271
     object cxGridView: TcxGridDBTableView
       OnDblClick = cxGridViewDblClick
       NavigatorButtons.ConfirmDelete = False
@@ -65,28 +63,28 @@ inherited frViewGrid: TfrViewGrid
     Align = alTop
     TabOrder = 1
     Visible = False
-    ExplicitWidth = 554
+    ExplicitWidth = 607
     inherited TBXDockablePanel1: TTBXDockablePanel
-      ExplicitWidth = 554
+      ExplicitWidth = 607
       ExplicitHeight = 102
       inherited dxLayoutControl1: TdxLayoutControl
         Width = 607
-        ExplicitWidth = 554
+        ExplicitWidth = 607
         inherited txtFiltroTodo: TcxTextEdit
           Style.LookAndFeel.SkinName = ''
           StyleDisabled.LookAndFeel.SkinName = ''
           StyleFocused.LookAndFeel.SkinName = ''
           StyleHot.LookAndFeel.SkinName = ''
-          ExplicitWidth = 457
-          Width = 457
+          ExplicitWidth = 510
+          Width = 510
         end
         inherited edtFechaIniFiltro: TcxDateEdit
           Style.LookAndFeel.SkinName = ''
           StyleDisabled.LookAndFeel.SkinName = ''
           StyleFocused.LookAndFeel.SkinName = ''
           StyleHot.LookAndFeel.SkinName = ''
-          ExplicitWidth = 240
-          Width = 240
+          ExplicitWidth = 272
+          Width = 272
         end
         inherited edtFechaFinFiltro: TcxDateEdit
           Left = 376
@@ -95,16 +93,16 @@ inherited frViewGrid: TfrViewGrid
           StyleFocused.LookAndFeel.SkinName = ''
           StyleHot.LookAndFeel.SkinName = ''
           ExplicitLeft = 376
-          ExplicitWidth = 200
-          Width = 200
+          ExplicitWidth = 221
+          Width = 221
         end
       end
       inherited TBXAlignmentPanel1: TTBXAlignmentPanel
         Width = 607
-        ExplicitWidth = 554
+        ExplicitWidth = 607
         inherited tbxBotones: TTBXToolbar
           Width = 597
-          ExplicitWidth = 544
+          ExplicitWidth = 597
         end
       end
     end
@@ -121,8 +119,6 @@ inherited frViewGrid: TfrViewGrid
     SupportedDocks = [dkStandardDock, dkMultiDock]
     TabOrder = 2
     Visible = False
-    ExplicitTop = 373
-    ExplicitWidth = 554
     object TBXAlignmentPanel1: TTBXAlignmentPanel
       Left = 0
       Top = 0
@@ -131,7 +127,6 @@ inherited frViewGrid: TfrViewGrid
       Margins.Left = 10
       Align = alTop
       TabOrder = 0
-      ExplicitWidth = 554
       object TBXToolbar1: TTBXToolbar
         Left = 10
         Top = 0
@@ -141,7 +136,6 @@ inherited frViewGrid: TfrViewGrid
         AutoResize = False
         Caption = 'TBXToolbar1'
         TabOrder = 0
-        ExplicitWidth = 544
         object TBXItem1: TTBXItem
           Action = actQuitarAgrupaciones
         end
@@ -172,7 +166,7 @@ inherited frViewGrid: TfrViewGrid
       PrinterPage.ScaleMode = smFit
       PrinterPage._dxMeasurementUnits_ = 0
       PrinterPage._dxLastMU_ = 2
-      ReportDocument.CreationDate = 39581.739711365740000000
+      ReportDocument.CreationDate = 39584.791125752320000000
       StyleManager = dxPrintStyleManager1
       OptionsCards.Shadow.Depth = 0
       OptionsExpanding.ExpandGroupRows = True
@@ -245,12 +239,7 @@ inherited frViewGrid: TfrViewGrid
   end
   object cxViewGridPopupMenu: TcxGridPopupMenu
     Grid = cxGrid
-    PopupMenus = <
-      item
-        GridView = cxGridView
-        HitTypes = [gvhtCell]
-        Index = 0
-      end>
+    PopupMenus = <>
     Left = 264
     Top = 128
   end
diff --git a/Source/GUIBase/uViewGridBase.pas b/Source/GUIBase/uViewGridBase.pas
index 3f69b1c6..224cd640 100644
--- a/Source/GUIBase/uViewGridBase.pas
+++ b/Source/GUIBase/uViewGridBase.pas
@@ -110,6 +110,22 @@ type
     procedure SetViewFiltros(const Value: IViewFiltroBase); virtual;
     procedure FilterChanged(Sender : TObject); virtual;
 
+    procedure cxGridViewInitStoredObject(Sender: TcxCustomGridView;  AObject: TObject);
+    procedure cxGridViewGetStoredProperties(Sender: TcxCustomGridView;
+      AProperties: TStrings);
+    procedure cxGridViewGetStoredPropertyValue(Sender: TcxCustomGridView;
+      const AName: string; var AValue: Variant);
+    procedure cxGridViewSetStoredPropertyValue(Sender: TcxCustomGridView;
+      const AName: string; const AValue: Variant);
+
+    procedure cxGridViewColumnGetStoredProperties(
+      Sender: TcxCustomGridTableItem; AProperties: TStrings);
+    procedure cxGridViewColumnGetStoredPropertyValue(
+      Sender: TcxCustomGridTableItem; const AName: string; var AValue: Variant);
+    procedure cxGridViewColumnSetStoredPropertyValue(
+      Sender: TcxCustomGridTableItem; const AName: string;
+      const AValue: Variant);
+
   public
     constructor Create(AOwner: TComponent); override;
     destructor Destroy; override;
@@ -137,7 +153,7 @@ type
 
     function Locate(const AItemIndex: Integer; const AValue: String;
       const APartialCompare: Boolean = False) : Boolean;
-    
+
     property Filter: string read GetFilter write SetFilter;
     property Filtered : Boolean read GetFiltered;
 
@@ -150,6 +166,7 @@ type
     property PopupMenu: TPopupMenu read GetPopupMenu write SetPopupMenu;
     property MultiSelect : Boolean read GetMultiSelect write SetMultiSelect;
     property NumSeleccionados: Integer read getNumSeleccionados;
+
   end;
 
 procedure Register;
@@ -157,7 +174,7 @@ procedure Register;
 implementation
 
 uses
-  CCReg, uDMBase, uDBSelectionListUtils;
+  CCReg, uDMBase, cxGridBandedTableView, uDBSelectionListUtils;
 
 {$R *.dfm}
 
@@ -170,21 +187,16 @@ procedure BestFitAllColumns (TheView:TcxGridDBTableView; ALimit:Integer = 0);
 var
   i : Integer ;
 begin
-   try
-      TheView.BeginUpdate;
-      for i :=  0 to TheView.VisibleColumnCount-1 do
-      begin
-        //TheView.VisibleColumns[i].BestFitMaxWidth := 0;
-        TheView.VisibleColumns[i].ApplyBestFit;
-        if (ALimit > 0) then
-        begin
-          if (TheView.VisibleColumns[i].Width > ALimit) then
-            TheView.VisibleColumns[i].Width := ALimit;
-        end;
-      end;
-   finally
-      TheView.EndUpdate;
-   end;
+  for i :=  0 to TheView.VisibleColumnCount-1 do
+  begin
+    //TheView.VisibleColumns[i].BestFitMaxWidth := 0;
+    TheView.VisibleColumns[i].ApplyBestFit;
+    if (ALimit > 0) then
+    begin
+      if (TheView.VisibleColumns[i].Width > ALimit) then
+        TheView.VisibleColumns[i].Width := ALimit;
+    end;
+  end;
 End;
 
 { TfrViewGrid }
@@ -209,6 +221,8 @@ begin
 end;
 
 constructor TfrViewGridBase.Create(AOwner: TComponent);
+var
+  I: Integer;
 begin
   inherited;
   FFilter := '';
@@ -216,6 +230,60 @@ begin
   FPopupMenu := nil;
   FOnDblClick := nil;
   FGridStatus := NIL;
+
+  if Assigned(_FocusedView) then
+  begin
+    _FocusedView.OnInitStoredObject := cxGridViewInitStoredObject;
+    _FocusedView.OnGetStoredProperties := cxGridViewGetStoredProperties;
+    _FocusedView.OnGetStoredPropertyValue := cxGridViewGetStoredPropertyValue;
+    _FocusedView.OnSetStoredPropertyValue := cxGridViewSetStoredPropertyValue;
+    for I := 0 to _FocusedView.ColumnCount - 1 do
+    begin
+      _FocusedView.Columns[i].OnGetStoredProperties := cxGridViewColumnGetStoredProperties;
+      _FocusedView.Columns[i].OnGetStoredPropertyValue := cxGridViewColumnGetStoredPropertyValue;
+      _FocusedView.Columns[i].OnSetStoredPropertyValue := cxGridViewColumnSetStoredPropertyValue;
+    end;
+  end;
+end;
+
+procedure TfrViewGridBase.cxGridViewColumnGetStoredProperties(
+  Sender: TcxCustomGridTableItem; AProperties: TStrings);
+begin
+//  ShowMessage(Sender.Name + ' cxGridViewColumnGetStoredProperties');
+end;
+
+procedure TfrViewGridBase.cxGridViewColumnGetStoredPropertyValue(
+  Sender: TcxCustomGridTableItem; const AName: string; var AValue: Variant);
+begin
+//  ShowMessage(Sender.Name + ' cxGridViewColumnGetStoredPropertyValue');
+end;
+
+procedure TfrViewGridBase.cxGridViewColumnSetStoredPropertyValue(
+  Sender: TcxCustomGridTableItem; const AName: string; const AValue: Variant);
+begin
+//  ShowMessage(Sender.Name + ' cxGridViewColumnSetStoredPropertyValue');
+end;
+
+procedure TfrViewGridBase.cxGridViewGetStoredProperties(
+  Sender: TcxCustomGridView; AProperties: TStrings);
+begin
+//  ShowMessage('cxGridViewGetStoredProperties');
+  AProperties.Delete(AProperties.IndexOf('Footer'));
+  AProperties.Delete(AProperties.IndexOf('GroupByBox'));
+  AProperties.Delete(AProperties.IndexOf('GroupFooters'));
+  AProperties.Delete(AProperties.IndexOf('NewItemRow'));    
+end;
+
+procedure TfrViewGridBase.cxGridViewGetStoredPropertyValue(
+  Sender: TcxCustomGridView; const AName: string; var AValue: Variant);
+begin
+//  ShowMessage('cxGridViewGetStoredPropertyValue');
+end;
+
+procedure TfrViewGridBase.cxGridViewSetStoredPropertyValue(
+  Sender: TcxCustomGridView; const AName: string; const AValue: Variant);
+begin
+//  ShowMessage('cxGridViewSetStoredPropertyValue');
 end;
 
 procedure TfrViewGridBase.ExpandirTodo;
@@ -275,6 +343,19 @@ begin
     _FocusedView.DataController.GotoLast;
 end;
 
+procedure TfrViewGridBase.cxGridViewInitStoredObject(Sender: TcxCustomGridView;
+  AObject: TObject);
+begin
+  if AObject is TcxGridDBColumn then
+    with TcxGridDBColumn(AObject) do
+    begin
+//      ShowMessage('InitStoredObject');
+      OnGetStoredProperties := cxGridViewColumnGetStoredProperties;
+      OnGetStoredPropertyValue := cxGridViewColumnGetStoredPropertyValue;
+      OnSetStoredPropertyValue := cxGridViewColumnSetStoredPropertyValue;
+    end;
+end;
+
 function TfrViewGridBase.IsEmpty: Boolean;
 begin
   Result := (_FocusedView.ViewData.RowCount < 1);
@@ -314,7 +395,13 @@ end;
 procedure TfrViewGridBase.RestoreFromRegistry(const Path : String);
 begin
   if Assigned(_FocusedView) then
-    _FocusedView.RestoreFromRegistry(Path + '\\GridSettings\\' + Self.Name, False, False, [], Self.Name);
+    _FocusedView.RestoreFromRegistry(Path + '\\GridSettings\\' + Self.Name, False, False, []);
+end;
+
+procedure TfrViewGridBase.StoreToRegistry(const Path : String);
+begin
+  if Assigned(_FocusedView) then
+    _FocusedView.StoreToRegistry(Path + '\\GridSettings\\' + Self.Name, True, []);
 end;
 
 procedure TfrViewGridBase.RestoreGridStatus;
@@ -388,11 +475,6 @@ begin
   end;
 end;
 
-procedure TfrViewGridBase.StoreToRegistry(const Path : String);
-begin
-  if Assigned(_FocusedView) then
-    _FocusedView.StoreToRegistry(Path + '\\GridSettings\\' + Self.Name, False, [], Self.Name);
-end;
 
 procedure TfrViewGridBase.FiltrarGrid(TextoFiltro : String);
 var
diff --git a/Source/Modulos/Contactos/Views/Contactos_view.dproj b/Source/Modulos/Contactos/Views/Contactos_view.dproj
index bfae06bf..cadc3d06 100644
--- a/Source/Modulos/Contactos/Views/Contactos_view.dproj
+++ b/Source/Modulos/Contactos/Views/Contactos_view.dproj
@@ -49,38 +49,38 @@
     <DelphiCompile Include="Contactos_view.dpk">
       <MainSource>MainSource</MainSource>
     </DelphiCompile>
-    <DCCReference Include="..\..\Obras\adortl.dcp" />
-    <DCCReference Include="..\..\Obras\ApplicationBase.dcp" />
-    <DCCReference Include="..\..\Obras\Base.dcp" />
-    <DCCReference Include="..\..\Obras\Contactos_controller.dcp" />
-    <DCCReference Include="..\..\Obras\Contactos_model.dcp" />
-    <DCCReference Include="..\..\Obras\cxDataD11.dcp" />
-    <DCCReference Include="..\..\Obras\cxEditorsD11.dcp" />
-    <DCCReference Include="..\..\Obras\cxExportD11.dcp" />
-    <DCCReference Include="..\..\Obras\cxExtEditorsD11.dcp" />
-    <DCCReference Include="..\..\Obras\cxGridD11.dcp" />
-    <DCCReference Include="..\..\Obras\cxLibraryD11.dcp" />
-    <DCCReference Include="..\..\Obras\cxPageControlD11.dcp" />
-    <DCCReference Include="..\..\Obras\DataAbstract_Core_D11.dcp" />
-    <DCCReference Include="..\..\Obras\dbrtl.dcp" />
-    <DCCReference Include="..\..\Obras\dsnap.dcp" />
-    <DCCReference Include="..\..\Obras\dxGDIPlusD11.dcp" />
-    <DCCReference Include="..\..\Obras\dxThemeD11.dcp" />
-    <DCCReference Include="..\..\Obras\FormasPago_controller.dcp" />
-    <DCCReference Include="..\..\Obras\FormasPago_model.dcp" />
-    <DCCReference Include="..\..\Obras\GUIBase.dcp" />
-    <DCCReference Include="..\..\Obras\JvGlobusD11R.dcp" />
-    <DCCReference Include="..\..\Obras\PngComponentsD10.dcp" />
-    <DCCReference Include="..\..\Obras\PNG_D10.dcp" />
-    <DCCReference Include="..\..\Obras\RemObjects_Core_D11.dcp" />
-    <DCCReference Include="..\..\Obras\rtl.dcp" />
-    <DCCReference Include="..\..\Obras\TiposIVA_controller.dcp" />
-    <DCCReference Include="..\..\Obras\TiposIVA_model.dcp" />
-    <DCCReference Include="..\..\Obras\vcl.dcp" />
-    <DCCReference Include="..\..\Obras\vclactnband.dcp" />
-    <DCCReference Include="..\..\Obras\vcldb.dcp" />
-    <DCCReference Include="..\..\Obras\vcljpg.dcp" />
-    <DCCReference Include="..\..\Obras\vclx.dcp" />
+    <DCCReference Include="..\adortl.dcp" />
+    <DCCReference Include="..\ApplicationBase.dcp" />
+    <DCCReference Include="..\Base.dcp" />
+    <DCCReference Include="..\Contactos_controller.dcp" />
+    <DCCReference Include="..\Contactos_model.dcp" />
+    <DCCReference Include="..\cxDataD11.dcp" />
+    <DCCReference Include="..\cxEditorsD11.dcp" />
+    <DCCReference Include="..\cxExportD11.dcp" />
+    <DCCReference Include="..\cxExtEditorsD11.dcp" />
+    <DCCReference Include="..\cxGridD11.dcp" />
+    <DCCReference Include="..\cxLibraryD11.dcp" />
+    <DCCReference Include="..\cxPageControlD11.dcp" />
+    <DCCReference Include="..\DataAbstract_Core_D11.dcp" />
+    <DCCReference Include="..\dbrtl.dcp" />
+    <DCCReference Include="..\dsnap.dcp" />
+    <DCCReference Include="..\dxGDIPlusD11.dcp" />
+    <DCCReference Include="..\dxThemeD11.dcp" />
+    <DCCReference Include="..\FormasPago_controller.dcp" />
+    <DCCReference Include="..\FormasPago_model.dcp" />
+    <DCCReference Include="..\GUIBase.dcp" />
+    <DCCReference Include="..\JvGlobusD11R.dcp" />
+    <DCCReference Include="..\PngComponentsD10.dcp" />
+    <DCCReference Include="..\PNG_D10.dcp" />
+    <DCCReference Include="..\RemObjects_Core_D11.dcp" />
+    <DCCReference Include="..\rtl.dcp" />
+    <DCCReference Include="..\TiposIVA_controller.dcp" />
+    <DCCReference Include="..\TiposIVA_model.dcp" />
+    <DCCReference Include="..\vcl.dcp" />
+    <DCCReference Include="..\vclactnband.dcp" />
+    <DCCReference Include="..\vcldb.dcp" />
+    <DCCReference Include="..\vcljpg.dcp" />
+    <DCCReference Include="..\vclx.dcp" />
     <DCCReference Include="uContactosViewRegister.pas" />
     <DCCReference Include="uEditorCliente.pas">
       <Form>fEditorCliente</Form>
diff --git a/Source/Modulos/Contactos/Views/Contactos_view.res b/Source/Modulos/Contactos/Views/Contactos_view.res
index 1641339fcc482e7e3492d1b45813a86619622c33..8b251f312bcccec5485024f6fe8d80e1cdf25746 100644
GIT binary patch
delta 11
ScmeBCZD5|Duvteife`=|>;pCc

literal 4748
zcmbW5&ub)A5XUPdpe&2#;C*uNAUVhgd+&(4um@dnom`vXF9g}ZuHJ;se=<3UNdFJg
zbCw+UD9j$byGIXV`~6hC>h4S?F|k9X-j90q{Z_qtZ<;nUJCO8!h?<w4U-ol;S2jC7
zx4(byej2@_#)0HWvg0i^wC4Xli+W*aXJ^(njceK|Kb@c3qFNX>p${kR>3GhM`oH*q
zk=UsjOCIgA_4!`B+Gb&`I84R)bT4dy-BQV<-SyFz?R8ILEQ(+JB$u{sEXE@j@B*7W
zT;iZH#|OJ<&DO$RCkM6VbK3(B(k{nbdv1lpc;E$xz9as|v3uE1V{hw2w~g3eD0an7
z{BT%G%irdMe*|oDJmgvJ<ltI;x5J<Oc>aA2`9B<Z5Toyra?r{a4$fnJHGXo6Pmcq8
z{JGCD500t1h4|yI?-f&xoj9;YT&Ch&JLO*X#NC3sCI0Xmc<f_vh`jn-1E!?th$%QM
znzGM|)$vl3f7;nE+9qR}|A?C$H3K&BFdq9?uxrIqHIne#5?8G@da2ybWLGKA686M2
z*LJMMMk4<U`dzFC9}HrSxLfOGll{P#??xir)$c2}C;ql+y-&Wa(LP{PgPk1E1@{uR
zIMCNz;u9;r(axhQvEx%?i#p<Vn=Z!SK%f10?4_`0@RY8lXRM3(t(nFSzJ$4kJr6&x
ze)~B%biu*TY$HDstHD=|UGxJceYiUQQa0Gu(p3og@%ZJ><6Xi*?M~Q;)@Sbfwf3uf
zVaWkbU<NjR3%=~AdoZbkXp`f@b0%GBT^$^V5e(n|#O(?P)hBbF)4n%2cw6U#adPM!
zz(!`V|Bfl{aH0)Y&w;SK7R4<z{p;Gwz1D%l86L3ZFZQ&=pB$<&esXT|OZ?=AGaWoe
z{>jU=;sL{BlYemIZXv%qZ{SZw{-TCU+;!nH6KDDIJumU+9{E0zXW4>7T)y|>$DQlv
zRJe?TjSp{c!DqeayAnSMTtZZT;>LN7J0Rls+5m@q)MbyB*eL%Eu@(+$Cw}Pd@q7N|
z%Q0*AHpCP^b9v`@jx-l_FD>khpW2W8(OU2&V5TrnoAY-m_hlcV?zq3;7{2gF{J#Hc
z6R+o~mVenX?>@W0@_DVzyOFs(5464CY{!q9ChoF#_*eXi@4gFuV8?vhl=_w5$iKL0
zEV0nMBcN08xtRmsgJrqjh@s#|{?*ssnsG)mH*wa6{efF0JFWHok@kA5%b661{B38=
zCcgJ|*ZFTpV$8<-&+AWpa)Q8*`wL&hMeNQ^v6I7$HSdLZhZ^&+6<@Uw_Zsml9^v3W
zVvPDBKHh;i=RU4J_ta3E;)M<P+=2X7;VbzliQZ=IHV#+fr#{!(ukt%UJMS8=332qg
z7jD)rSbpCW+^j*cd6LUEe8#9n&v!NEJM(@?SHvB$=h@|)fjw|&qD?NQ5A&R>n>Y+L
zKLZ0UQ+*km9FO-b?U4gmn-62iwzH6&*duKGo~aUV)bYDla8wWZ9+^7p-F<8lP@i!m
z@vhbD_${F}h>^T;C(?(b*OJDk?{dEXB?nuehoON3HAb!7Mr7-ls!84-5V-jJu<OVP
zzHjp+hnwo*3NQE$JTA(agu~silV5T`du+GJgWGi_7mAy`Nk8fLt~%GF$;XXcE-ri?
zyIglyyzA`K-);4Eem2MZm07RBza@W3UP)d`Rz=RFk-I);`s{$L%yyBNX0OTjo5Gk0
zs}g44uXg*l%xo^{`#0=kd*2?}Cz22Bv2;Gu?;3o~(D#gk1OKYQSCAb$(&vu@_pvWO
z>gbu<_$}mU=Yd9!?TOX;|B-#B)+0x#9q*yqJiqS!`49d=7ztk$O+9=1i;?K_|J<8T
z?0b7=-`Z3A#vV$4XJ5(lQ~TOZHUFdA%oWvK5zg&_IKXIbughQBA8XAsd#=@|TFLXC
zy(^m((;DnQmDQ<zX+PK(Lfu@ox#mOnbZjSDl}IBqv$qwK+2@))5$ba>Katmw!@c`|
G?EMQ&4NnpP

diff --git a/Source/Modulos/Contactos/Views/uEditorClientes.dfm b/Source/Modulos/Contactos/Views/uEditorClientes.dfm
index cc158719..f32655ea 100644
--- a/Source/Modulos/Contactos/Views/uEditorClientes.dfm
+++ b/Source/Modulos/Contactos/Views/uEditorClientes.dfm
@@ -5,7 +5,7 @@ inherited fEditorClientes: TfEditorClientes
   ClientHeight = 519
   ClientWidth = 786
   ExplicitWidth = 794
-  ExplicitHeight = 546
+  ExplicitHeight = 553
   PixelsPerInch = 96
   TextHeight = 13
   inherited JvNavPanelHeader: TJvNavPanelHeader
@@ -104,18 +104,30 @@ inherited fEditorClientes: TfEditorClientes
           Width = 786
           ExplicitWidth = 786
           inherited txtFiltroTodo: TcxTextEdit
-            ExplicitWidth = 457
-            Width = 457
+            Style.LookAndFeel.SkinName = ''
+            StyleDisabled.LookAndFeel.SkinName = ''
+            StyleFocused.LookAndFeel.SkinName = ''
+            StyleHot.LookAndFeel.SkinName = ''
+            ExplicitWidth = 689
+            Width = 689
           end
           inherited edtFechaIniFiltro: TcxDateEdit
-            ExplicitWidth = 240
-            Width = 240
+            Style.LookAndFeel.SkinName = ''
+            StyleDisabled.LookAndFeel.SkinName = ''
+            StyleFocused.LookAndFeel.SkinName = ''
+            StyleHot.LookAndFeel.SkinName = ''
+            ExplicitWidth = 460
+            Width = 460
           end
           inherited edtFechaFinFiltro: TcxDateEdit
             Left = 564
+            Style.LookAndFeel.SkinName = ''
+            StyleDisabled.LookAndFeel.SkinName = ''
+            StyleFocused.LookAndFeel.SkinName = ''
+            StyleHot.LookAndFeel.SkinName = ''
             ExplicitLeft = 564
-            ExplicitWidth = 121
-            Width = 121
+            ExplicitWidth = 212
+            Width = 212
           end
         end
         inherited TBXAlignmentPanel1: TTBXAlignmentPanel
@@ -164,10 +176,6 @@ inherited fEditorClientes: TfEditorClientes
         BuiltInStyle = True
       end
     end
-    inherited PngImageList: TPngImageList
-      Left = 120
-      Top = 56
-    end
   end
   inherited EditorActionList: TActionList [4]
     Left = 56
diff --git a/Source/Modulos/Contactos/Views/uEditorContactos.dfm b/Source/Modulos/Contactos/Views/uEditorContactos.dfm
index 6126e8ab..2cb5f409 100644
--- a/Source/Modulos/Contactos/Views/uEditorContactos.dfm
+++ b/Source/Modulos/Contactos/Views/uEditorContactos.dfm
@@ -3,7 +3,7 @@ inherited fEditorContactos: TfEditorContactos
   Top = 448
   Caption = 'Lista de contactos'
   ExplicitWidth = 320
-  ExplicitHeight = 471
+  ExplicitHeight = 240
   PixelsPerInch = 96
   TextHeight = 13
   inherited JvNavPanelHeader: TJvNavPanelHeader
diff --git a/Source/Modulos/Contactos/Views/uEditorElegirClientes.dfm b/Source/Modulos/Contactos/Views/uEditorElegirClientes.dfm
index 7dc23fbf..ddb12780 100644
--- a/Source/Modulos/Contactos/Views/uEditorElegirClientes.dfm
+++ b/Source/Modulos/Contactos/Views/uEditorElegirClientes.dfm
@@ -51,17 +51,17 @@ inherited fEditorElegirClientes: TfEditorElegirClientes
     ExplicitTop = 87
     ExplicitWidth = 683
     inherited tbxMain: TTBXToolbar
-      ExplicitWidth = 126
+      ExplicitWidth = 284
       inherited TBXItem36: TTBXItem
         Action = actAnchoAuto2
       end
     end
     inherited tbxFiltro: TTBXToolbar
-      Left = 126
+      Left = 284
       Top = 23
       DockPos = 96
       DockRow = 1
-      ExplicitLeft = 126
+      ExplicitLeft = 284
       ExplicitTop = 23
       inherited TBXItem34: TTBXItem
         Action = actQuitarFiltro2
@@ -165,9 +165,25 @@ inherited fEditorElegirClientes: TfEditorElegirClientes
         inherited dxLayoutControl1: TdxLayoutControl
           Width = 663
           ExplicitWidth = 663
+          inherited txtFiltroTodo: TcxTextEdit
+            Style.LookAndFeel.SkinName = ''
+            StyleDisabled.LookAndFeel.SkinName = ''
+            StyleFocused.LookAndFeel.SkinName = ''
+            StyleHot.LookAndFeel.SkinName = ''
+          end
+          inherited edtFechaIniFiltro: TcxDateEdit
+            Style.LookAndFeel.SkinName = ''
+            StyleDisabled.LookAndFeel.SkinName = ''
+            StyleFocused.LookAndFeel.SkinName = ''
+            StyleHot.LookAndFeel.SkinName = ''
+          end
           inherited edtFechaFinFiltro: TcxDateEdit
-            ExplicitWidth = 232
-            Width = 232
+            Style.LookAndFeel.SkinName = ''
+            StyleDisabled.LookAndFeel.SkinName = ''
+            StyleFocused.LookAndFeel.SkinName = ''
+            StyleHot.LookAndFeel.SkinName = ''
+            ExplicitWidth = 123
+            Width = 123
           end
         end
         inherited TBXAlignmentPanel1: TTBXAlignmentPanel
@@ -188,6 +204,10 @@ inherited fEditorElegirClientes: TfEditorElegirClientes
       ExplicitWidth = 663
       inherited TBXAlignmentPanel1: TTBXAlignmentPanel
         Width = 663
+        ExplicitWidth = 663
+        inherited TBXToolbar1: TTBXToolbar
+          Width = 653
+        end
       end
     end
     inherited dsDataSource: TDADataSource
@@ -212,10 +232,6 @@ inherited fEditorElegirClientes: TfEditorElegirClientes
         BuiltInStyle = True
       end
     end
-    inherited PngImageList: TPngImageList
-      Left = 40
-      Top = 96
-    end
   end
   inherited EditorActionList: TActionList [6]
     Left = 112
diff --git a/Source/Modulos/Contactos/Views/uEditorElegirProveedores.dfm b/Source/Modulos/Contactos/Views/uEditorElegirProveedores.dfm
index d0e3c64a..4d82858a 100644
--- a/Source/Modulos/Contactos/Views/uEditorElegirProveedores.dfm
+++ b/Source/Modulos/Contactos/Views/uEditorElegirProveedores.dfm
@@ -3,7 +3,7 @@ inherited fEditorElegirProveedores: TfEditorElegirProveedores
   ClientHeight = 480
   ClientWidth = 656
   ExplicitWidth = 664
-  ExplicitHeight = 507
+  ExplicitHeight = 514
   PixelsPerInch = 96
   TextHeight = 13
   object JvgWizardHeader1: TJvgWizardHeader [0]
@@ -54,9 +54,6 @@ inherited fEditorElegirProveedores: TfEditorElegirProveedores
     ExplicitWidth = 656
     inherited tbxMain: TTBXToolbar
       ExplicitWidth = 284
-      inherited TBXItem2: TTBXItem
-        Images = frViewProveedores1.PngImageList
-      end
       inherited TBXItem36: TTBXItem
         Action = actAnchoAuto2
       end
@@ -172,6 +169,24 @@ inherited fEditorElegirProveedores: TfEditorElegirProveedores
         inherited dxLayoutControl1: TdxLayoutControl
           Width = 636
           ExplicitWidth = 636
+          inherited txtFiltroTodo: TcxTextEdit
+            Style.LookAndFeel.SkinName = ''
+            StyleDisabled.LookAndFeel.SkinName = ''
+            StyleFocused.LookAndFeel.SkinName = ''
+            StyleHot.LookAndFeel.SkinName = ''
+          end
+          inherited edtFechaIniFiltro: TcxDateEdit
+            Style.LookAndFeel.SkinName = ''
+            StyleDisabled.LookAndFeel.SkinName = ''
+            StyleFocused.LookAndFeel.SkinName = ''
+            StyleHot.LookAndFeel.SkinName = ''
+          end
+          inherited edtFechaFinFiltro: TcxDateEdit
+            Style.LookAndFeel.SkinName = ''
+            StyleDisabled.LookAndFeel.SkinName = ''
+            StyleFocused.LookAndFeel.SkinName = ''
+            StyleHot.LookAndFeel.SkinName = ''
+          end
         end
         inherited TBXAlignmentPanel1: TTBXAlignmentPanel
           Width = 636
@@ -193,6 +208,7 @@ inherited fEditorElegirProveedores: TfEditorElegirProveedores
         ExplicitWidth = 636
         inherited TBXToolbar1: TTBXToolbar
           Width = 626
+          ExplicitWidth = 626
         end
       end
     end
diff --git a/Source/Modulos/Contactos/Views/uEditorEmpleados.dfm b/Source/Modulos/Contactos/Views/uEditorEmpleados.dfm
index 3ecd82ef..4d815fee 100644
--- a/Source/Modulos/Contactos/Views/uEditorEmpleados.dfm
+++ b/Source/Modulos/Contactos/Views/uEditorEmpleados.dfm
@@ -103,18 +103,30 @@ inherited fEditorEmpleados: TfEditorEmpleados
           Width = 786
           ExplicitWidth = 786
           inherited txtFiltroTodo: TcxTextEdit
-            ExplicitWidth = 273
-            Width = 273
+            Style.LookAndFeel.SkinName = ''
+            StyleDisabled.LookAndFeel.SkinName = ''
+            StyleFocused.LookAndFeel.SkinName = ''
+            StyleHot.LookAndFeel.SkinName = ''
+            ExplicitWidth = 689
+            Width = 689
           end
           inherited edtFechaIniFiltro: TcxDateEdit
-            ExplicitWidth = 121
-            Width = 121
+            Style.LookAndFeel.SkinName = ''
+            StyleDisabled.LookAndFeel.SkinName = ''
+            StyleFocused.LookAndFeel.SkinName = ''
+            StyleHot.LookAndFeel.SkinName = ''
+            ExplicitWidth = 290
+            Width = 290
           end
           inherited edtFechaFinFiltro: TcxDateEdit
             Left = 394
+            Style.LookAndFeel.SkinName = ''
+            StyleDisabled.LookAndFeel.SkinName = ''
+            StyleFocused.LookAndFeel.SkinName = ''
+            StyleHot.LookAndFeel.SkinName = ''
             ExplicitLeft = 394
-            ExplicitWidth = 201
-            Width = 201
+            ExplicitWidth = 382
+            Width = 382
           end
         end
         inherited TBXAlignmentPanel1: TTBXAlignmentPanel
@@ -163,10 +175,6 @@ inherited fEditorEmpleados: TfEditorEmpleados
         BuiltInStyle = True
       end
     end
-    inherited PngImageList: TPngImageList
-      Left = 224
-      Top = 128
-    end
   end
   inherited EditorActionList: TActionList [4]
     Left = 72
@@ -1531,6 +1539,9 @@ inherited fEditorEmpleados: TfEditorEmpleados
   end
   inherited JvFormStorage: TJvFormStorage [7]
   end
+  inherited JvAppRegistryStorage: TJvAppRegistryStorage
+    Left = 440
+  end
   inherited dsDataTable: TDADataSource [9]
   end
   inherited StatusBarImages: TPngImageList [10]
diff --git a/Source/Modulos/Contactos/Views/uEditorProveedores.dfm b/Source/Modulos/Contactos/Views/uEditorProveedores.dfm
index d3aa38b4..f31b0477 100644
--- a/Source/Modulos/Contactos/Views/uEditorProveedores.dfm
+++ b/Source/Modulos/Contactos/Views/uEditorProveedores.dfm
@@ -1,6 +1,5 @@
 inherited fEditorProveedores: TfEditorProveedores
   Caption = 'fEditorProveedores'
-  ExplicitWidth = 551
   PixelsPerInch = 96
   TextHeight = 13
   inherited JvNavPanelHeader: TJvNavPanelHeader
@@ -88,18 +87,30 @@ inherited fEditorProveedores: TfEditorProveedores
           Width = 543
           ExplicitWidth = 543
           inherited txtFiltroTodo: TcxTextEdit
-            ExplicitWidth = 460
-            Width = 460
+            Style.LookAndFeel.SkinName = ''
+            StyleDisabled.LookAndFeel.SkinName = ''
+            StyleFocused.LookAndFeel.SkinName = ''
+            StyleHot.LookAndFeel.SkinName = ''
+            ExplicitWidth = 446
+            Width = 446
           end
           inherited edtFechaIniFiltro: TcxDateEdit
-            ExplicitWidth = 207
-            Width = 207
+            Style.LookAndFeel.SkinName = ''
+            StyleDisabled.LookAndFeel.SkinName = ''
+            StyleFocused.LookAndFeel.SkinName = ''
+            StyleHot.LookAndFeel.SkinName = ''
+            ExplicitWidth = 219
+            Width = 219
           end
           inherited edtFechaFinFiltro: TcxDateEdit
             Left = 323
+            Style.LookAndFeel.SkinName = ''
+            StyleDisabled.LookAndFeel.SkinName = ''
+            StyleFocused.LookAndFeel.SkinName = ''
+            StyleHot.LookAndFeel.SkinName = ''
             ExplicitLeft = 323
-            ExplicitWidth = 201
-            Width = 201
+            ExplicitWidth = 210
+            Width = 210
           end
         end
         inherited TBXAlignmentPanel1: TTBXAlignmentPanel
@@ -144,10 +155,6 @@ inherited fEditorProveedores: TfEditorProveedores
         BuiltInStyle = True
       end
     end
-    inherited PngImageList: TPngImageList
-      Left = 228
-      Top = 128
-    end
   end
   inherited EditorActionList: TActionList [4]
     inherited actNuevo: TAction
@@ -1315,7 +1322,7 @@ inherited fEditorProveedores: TfEditorProveedores
       001F8000003F800000FFF8FFFFFF}
     Width = 550
     Left = 328
-    Top = 144
+    Top = 136
   end
   object JsListaContactosNoEliminados: TJSDialog
     Glyph.Data = {
diff --git a/Source/Modulos/Contactos/Views/uViewClientes.dfm b/Source/Modulos/Contactos/Views/uViewClientes.dfm
index 27b51d09..5eb87fab 100644
--- a/Source/Modulos/Contactos/Views/uViewClientes.dfm
+++ b/Source/Modulos/Contactos/Views/uViewClientes.dfm
@@ -15,12 +15,6 @@ inherited frViewClientes: TfrViewClientes
           Kind = skCount
           Column = cxGridViewNIF_CIF
         end>
-      inherited cxGridViewICONO: TcxGridDBColumn
-        BestFitMaxWidth = 22
-        MinWidth = 22
-        Options.HorzSizing = False
-        Width = 22
-      end
       object cxGridViewBLOQUEADO: TcxGridDBColumn [1]
         DataBinding.FieldName = 'BLOQUEADO'
         PropertiesClassName = 'TcxTextEditProperties'
@@ -35,7 +29,6 @@ inherited frViewClientes: TfrViewClientes
         Caption = 'Acceso a tienda web'
         DataBinding.FieldName = 'TIENDA_WEB'
         PropertiesClassName = 'TcxImageComboBoxProperties'
-        Properties.Images = PngImageList
         Properties.Items = <
           item
             Value = 0
@@ -68,14 +61,30 @@ inherited frViewClientes: TfrViewClientes
         Width = 793
         ExplicitWidth = 793
         inherited txtFiltroTodo: TcxTextEdit
-          ExplicitWidth = 273
-          Width = 273
+          Style.LookAndFeel.SkinName = ''
+          StyleDisabled.LookAndFeel.SkinName = ''
+          StyleFocused.LookAndFeel.SkinName = ''
+          StyleHot.LookAndFeel.SkinName = ''
+          ExplicitWidth = 696
+          Width = 696
+        end
+        inherited edtFechaIniFiltro: TcxDateEdit
+          Style.LookAndFeel.SkinName = ''
+          StyleDisabled.LookAndFeel.SkinName = ''
+          StyleFocused.LookAndFeel.SkinName = ''
+          StyleHot.LookAndFeel.SkinName = ''
+          ExplicitWidth = 154
+          Width = 154
         end
         inherited edtFechaFinFiltro: TcxDateEdit
-          Left = 335
-          ExplicitLeft = 335
-          ExplicitWidth = 284
-          Width = 284
+          Left = 258
+          Style.LookAndFeel.SkinName = ''
+          StyleDisabled.LookAndFeel.SkinName = ''
+          StyleFocused.LookAndFeel.SkinName = ''
+          StyleHot.LookAndFeel.SkinName = ''
+          ExplicitLeft = 258
+          ExplicitWidth = 525
+          Width = 525
         end
       end
       inherited TBXAlignmentPanel1: TTBXAlignmentPanel
@@ -119,13 +128,110 @@ inherited frViewClientes: TfrViewClientes
   inherited cxViewGridPopupMenu: TcxGridPopupMenu
     Left = 32
   end
+  inherited PngImageList10: TPngImageList
+    Left = 104
+    Top = 216
+  end
   inherited dxPrintStyleManager1: TdxPrintStyleManager
     inherited dxPrintStyleManager1Style1: TdxPSPrintStyle
       BuiltInStyle = True
     end
   end
-  inherited PngImageList: TPngImageList
+  inherited GridImageList: TPngImageList
     PngImages = <
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
+          61000000097048597300000B1300000B1301009A9C1800000A4F694343505068
+          6F746F73686F70204943432070726F66696C65000078DA9D53675453E9163DF7
+          DEF4424B8880944B6F5215082052428B801491262A2109104A8821A1D91551C1
+          114545041BC8A088038E8E808C15512C0C8A0AD807E421A28E83A3888ACAFBE1
+          7BA36BD6BCF7E6CDFEB5D73EE7ACF39DB3CF07C0080C9648335135800CA9421E
+          11E083C7C4C6E1E42E40810A2470001008B3642173FD230100F87E3C3C2B22C0
+          07BE000178D30B0800C04D9BC0301C87FF0FEA42995C01808401C07491384B08
+          801400407A8E42A600404601809D98265300A0040060CB6362E300502D006027
+          7FE6D300809DF8997B01005B94211501A09100201365884400683B00ACCF568A
+          450058300014664BC43900D82D00304957664800B0B700C0CE100BB200080C00
+          305188852900047B0060C8232378008499001446F2573CF12BAE10E72A000078
+          99B23CB9243945815B082D710757572E1E28CE49172B14366102619A402EC279
+          99193281340FE0F3CC0000A0911511E083F3FD78CE0EAECECE368EB60E5F2DEA
+          BF06FF226262E3FEE5CFAB70400000E1747ED1FE2C2FB31A803B06806DFEA225
+          EE04685E0BA075F78B66B20F40B500A0E9DA57F370F87E3C3C45A190B9D9D9E5
+          E4E4D84AC4425B61CA577DFE67C25FC057FD6CF97E3CFCF7F5E0BEE22481325D
+          814704F8E0C2CCF44CA51CCF92098462DCE68F47FCB70BFFFC1DD322C44962B9
+          582A14E35112718E449A8CF332A52289429229C525D2FF64E2DF2CFB033EDF35
+          00B06A3E017B912DA85D6303F64B27105874C0E2F70000F2BB6FC1D428080380
+          6883E1CF77FFEF3FFD47A02500806649927100005E44242E54CAB33FC7080000
+          44A0812AB0411BF4C1182CC0061CC105DCC10BFC6036844224C4C24210420A64
+          801C726029AC82422886CDB01D2A602FD4401D34C051688693700E2EC255B80E
+          3D700FFA61089EC128BC81090441C808136121DA8801628A58238E08179985F8
+          21C14804128B2420C9881451224B91354831528A542055481DF23D720239875C
+          46BA913BC8003282FC86BC47319481B2513DD40CB543B9A8371A8446A20BD064
+          74319A8F16A09BD072B41A3D8C36A1E7D0AB680FDA8F3E43C730C0E8180733C4
+          6C302EC6C342B1382C099363CBB122AC0CABC61AB056AC03BB89F563CFB17704
+          128145C0093604774220611E4148584C584ED848A8201C243411DA0937090384
+          51C2272293A84BB426BA11F9C4186232318758482C23D6128F132F107B8843C4
+          37241289433227B9900249B1A454D212D246D26E5223E92CA99B34481A2393C9
+          DA646BB20739942C202BC885E49DE4C3E433E41BE421F25B0A9D624071A4F853
+          E22852CA6A4A19E510E534E5066598324155A39A52DDA8A15411358F5A42ADA1
+          B652AF5187A81334759A39CD8316494BA5ADA295D31A681768F769AFE874BA11
+          DD951E4E97D057D2CBE947E897E803F4770C0D861583C7886728199B18071867
+          197718AF984CA619D38B19C754303731EB98E7990F996F55582AB62A7C1591CA
+          0A954A9526951B2A2F54A9AAA6AADEAA0B55F355CB548FA95E537DAE46553353
+          E3A909D496AB55AA9D50EB531B5367A93BA887AA67A86F543FA47E59FD890659
+          C34CC34F43A451A0B15FE3BCC6200B6319B3782C216B0DAB86758135C426B1CD
+          D97C762ABB98FD1DBB8B3DAAA9A13943334A3357B352F394663F07E39871F89C
+          744E09E728A797F37E8ADE14EF29E2291BA6344CB931655C6BAA96979658AB48
+          AB51AB47EBBD36AEEDA79DA6BD45BB59FB810E41C74A275C2747678FCE059DE7
+          53D953DDA70AA7164D3D3AF5AE2EAA6BA51BA1BB4477BF6EA7EE989EBE5E809E
+          4C6FA7DE79BDE7FA1C7D2FFD54FD6DFAA7F5470C5806B30C2406DB0CCE183CC5
+          35716F3C1D2FC7DBF151435DC34043A561956197E18491B9D13CA3D5468D460F
+          8C69C65CE324E36DC66DC6A326062621264B4DEA4DEE9A524DB9A629A63B4C3B
+          4CC7CDCCCDA2CDD699359B3D31D732E79BE79BD79BDFB7605A785A2CB6A8B6B8
+          6549B2E45AA659EEB6BC6E855A3959A558555A5DB346AD9DAD25D6BBADBBA711
+          A7B94E934EAB9ED667C3B0F1B6C9B6A9B719B0E5D806DBAEB66DB67D61676217
+          67B7C5AEC3EE93BD937DBA7D8DFD3D070D87D90EAB1D5A1D7E73B472143A563A
+          DE9ACE9CEE3F7DC5F496E92F6758CF10CFD833E3B613CB29C4699D539BD34767
+          1767B97383F3888B894B82CB2E973E2E9B1BC6DDC8BDE44A74F5715DE17AD2F5
+          9D9BB39BC2EDA8DBAFEE36EE69EE87DC9FCC349F299E593373D0C3C843E051E5
+          D13F0B9F95306BDFAC7E4F434F8167B5E7232F632F9157ADD7B0B7A577AAF761
+          EF173EF63E729FE33EE33C37DE32DE595FCC37C0B7C8B7CB4FC36F9E5F85DF43
+          7F23FF64FF7AFFD100A78025016703898141815B02FBF87A7C21BF8E3F3ADB65
+          F6B2D9ED418CA0B94115418F82AD82E5C1AD2168C8EC90AD21F7E798CE91CE69
+          0E85507EE8D6D00761E6618BC37E0C2785878557863F8E7088581AD131973577
+          D1DC4373DF44FA449644DE9B67314F39AF2D4A352A3EAA2E6A3CDA37BA34BA3F
+          C62E6659CCD5589D58496C4B1C392E2AAE366E6CBEDFFCEDF387E29DE20BE37B
+          17982FC85D7079A1CEC2F485A716A92E122C3A96404C884E3894F041102AA816
+          8C25F21377258E0A79C21DC267222FD136D188D8435C2A1E4EF2482A4D7A92EC
+          91BC357924C533A52CE5B98427A990BC4C0D4CDD9B3A9E169A76206D323D3ABD
+          31839291907142AA214D93B667EA67E66676CBAC6585B2FEC56E8BB72F1E9507
+          C96BB390AC05592D0AB642A6E8545A28D72A07B267655766BFCD89CA3996AB9E
+          2BCDEDCCB3CADB90379CEF9FFFED12C212E192B6A5864B572D1D58E6BDAC6A39
+          B23C7179DB0AE315052B865606AC3CB88AB62A6DD54FABED5797AE7EBD267A4D
+          6B815EC1CA82C1B5016BEB0B550AE5857DEBDCD7ED5D4F582F59DFB561FA869D
+          1B3E15898AAE14DB1797157FD828DC78E51B876FCABF99DC94B4A9ABC4B964CF
+          66D266E9E6DE2D9E5B0E96AA97E6970E6E0DD9DAB40DDF56B4EDF5F645DB2F97
+          CD28DBBB83B643B9A3BF3CB8BC65A7C9CECD3B3F54A454F454FA5436EED2DDB5
+          61D7F86ED1EE1B7BBCF634ECD5DB5BBCF7FD3EC9BEDB5501554DD566D565FB49
+          FBB3F73FAE89AAE9F896FB6D5DAD4E6D71EDC703D203FD07230EB6D7B9D4D51D
+          D23D54528FD62BEB470EC71FBEFE9DEF772D0D360D558D9CC6E223704479E4E9
+          F709DFF71E0D3ADA768C7BACE107D31F761D671D2F6A429AF29A469B539AFB5B
+          625BBA4FCC3ED1D6EADE7AFC47DB1F0F9C343C59794AF354C969DAE982D39367
+          F2CF8C9D959D7D7E2EF9DC60DBA2B67BE763CEDF6A0F6FEFBA1074E1D245FF8B
+          E73BBC3BCE5CF2B874F2B2DBE51357B8579AAF3A5F6DEA74EA3CFE93D34FC7BB
+          9CBB9AAEB95C6BB9EE7ABDB57B66F7E91B9E37CEDDF4BD79F116FFD6D59E393D
+          DDBDF37A6FF7C5F7F5DF16DD7E7227FDCECBBBD97727EEADBC4FBC5FF440ED41
+          D943DD87D53F5BFEDCD8EFDC7F6AC077A0F3D1DC47F7068583CFFE91F58F0F43
+          058F998FCB860D86EB9E383E3939E23F72FDE9FCA743CF64CF269E17FEA2FECB
+          AE17162F7EF8D5EBD7CED198D1A197F29793BF6D7CA5FDEAC0EB19AFDBC6C2C6
+          1EBEC97833315EF456FBEDC177DC771DEFA3DF0F4FE47C207F28FF68F9B1F553
+          D0A7FB93199393FF040398F3FC63332DDB000000434944415478DA63FCFFFF3F
+          03258011D900464646ACA601D530126D00BA6298A1B80C21CA0090183639925C
+          80CB3B040DC0E69A510306BD010C04005E03C801036F00008D248BE16F9028BA
+          0000000049454E44AE426082}
+        Name = 'PngImage0'
+        Background = clWindow
+      end
       item
         PngImage.Data = {
           89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
@@ -152,7 +258,7 @@ inherited frViewClientes: TfrViewClientes
           D855B34A247F074A8BA91A40A2808C91803955E6E70233F36F3D0D58C6DEEDD6
           B8D35040179B9DA602305266AC028925A4A0B822A090C20BAB09BF96F35D736E
           53F70B90E997F07974AFDF0000000049454E44AE426082}
-        Name = 'PngImage0'
+        Name = 'PngImage2'
         Background = clWindow
       end
       item
@@ -268,31 +374,7 @@ inherited frViewClientes: TfrViewClientes
           49454E44AE426082}
         Name = 'PngImage1'
         Background = clWindow
-      end
-      item
-        PngImage.Data = {
-          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
-          61000001E34944415478DAA5932D72E43010855F98D934341BC1858261D10D76
-          8E3047305C1685051A067A59A0E042E70682863D6C608719EE6B399EADDABFAA
-          AD7595CAB2DCFDF5EB1FDDE13F9FBB9F0FF258225F27AEC415D109B05A35C3CC
-          EF32E653FD2380CE035F4388720C41609DC2D68ABA28B42688E1820E79CAE7E9
-          17407316E4788F43E8033CF2F46D42F804E8E29084E0A2ACBE7B90E9798334C0
-          40D9145AC2BD1E8591A58B5CFE27406D462915EA59AD4A70812CF142FBD3340E
-          750764113C8648C9A214E20A0C762560A1A925A662A8FDD0D48A06846B782220
-          6F80E732C7181F14858079CB69895B1D57D6824BBB99FF4A03C9952134BD9597
-          21ED008BF1F341F52BAA3035098CC23428DB561A70D53EC39888EFB941D4F45E
-          5EB2DC0021A6035BC56A0F306660BD1B464A3DB5A8B00CED89606A62B201A61D
-          90CB8C3E3EA03BD2F002BD8EF4550FB441D421532B62658D02CFC4C2DBFC9AD3
-          0EC86CDBA349DC24B2F7BA8E2D227BCF9CFD3CB573EC69409EE6D731EF804899
-          EC4F3CB6D631927623FFD48F5AC84741B1B572D58B4FEB5CC67A1BA4739ECE34
-          18D185435DE756B070B5CDB17305B63BB741A2F38F41BA41BE38C4324D8FE6C6
-          3E0FBE7CEF15F602716877E7DF5EA6F330B6CBC4F6A55641CAE69EC973245714
-          97FDD7DBF8AFCF7740E00D20BA266C3A0000000049454E44AE426082}
-        Name = 'PngImage2'
-        Background = clWindow
       end>
-    Left = 104
-    Top = 168
     Bitmap = {}
   end
 end
diff --git a/Source/Modulos/Contactos/Views/uViewClientes.pas b/Source/Modulos/Contactos/Views/uViewClientes.pas
index 66da7d4a..d1a1bd70 100644
--- a/Source/Modulos/Contactos/Views/uViewClientes.pas
+++ b/Source/Modulos/Contactos/Views/uViewClientes.pas
@@ -14,7 +14,13 @@ uses
   dxPScxCommon, cxImageComboBox, cxGridCustomPopupMenu, cxGridPopupMenu,
   dxPScxGrid6Lnk, ExtCtrls, JvComponentBase, JvBalloonHint, JvHint,
   uViewFiltroBase, dxPgsDlg, TB2Item, TBX, TB2Toolbar, TBXDkPanels, TB2Dock,
-  uDAInterfaces, cxTextEdit;
+  uDAInterfaces, cxTextEdit, dxSkinsCore, dxSkinBlack, dxSkinBlue,
+  dxSkinCaramel, dxSkinCoffee, dxSkinGlassOceans, dxSkiniMaginary, dxSkinLilian,
+  dxSkinLiquidSky, dxSkinLondonLiquidSky, dxSkinMcSkin, dxSkinMoneyTwins,
+  dxSkinOffice2007Black, dxSkinOffice2007Blue, dxSkinOffice2007Green,
+  dxSkinOffice2007Pink, dxSkinOffice2007Silver, dxSkinSilver, dxSkinStardust,
+  dxSkinsDefaultPainters, dxSkinValentine, dxSkinXmas2008Blue,
+  dxSkinscxPCPainter, Menus;
 
 type
   IViewClientes = interface(IViewContactos)
@@ -29,7 +35,7 @@ type
       ARecord: TcxCustomGridRecord; ACellViewInfo: TcxGridTableDataCellViewInfo;
       const AMousePos: TPoint; var AHintText: TCaption;
       var AIsHintMultiLine: Boolean; var AHintTextRect: TRect);
-    procedure cxGridViewCODIGOCustomDrawCell(Sender: TcxCustomGridTableView;
+    procedure cxGridViewICONOCustomDrawCell(Sender: TcxCustomGridTableView;
       ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo;
       var ADone: Boolean);
   end;
@@ -43,7 +49,7 @@ uses uViewGridBase;
 {$R *.dfm}
 
 
-procedure TfrViewClientes.cxGridViewCODIGOCustomDrawCell(
+procedure TfrViewClientes.cxGridViewICONOCustomDrawCell(
   Sender: TcxCustomGridTableView; ACanvas: TcxCanvas;
   AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
 var
@@ -54,9 +60,9 @@ begin
   ACanvas.FillRect(R);
   if (cxGridView.DataController.DisplayTexts[AViewInfo.GridRecord.RecordIndex,
     cxGridViewBLOQUEADO.Index] = '1') then
-    ACanvas.DrawImage(PngImageList, R.Left + 2, R.Top + 2, 1)
+    ACanvas.DrawImage(GridImageList, R.Left + 2, R.Top + 2, 2)
   else
-    ACanvas.DrawImage(PngImageList, R.Left + 2, R.Top + 2, 0);
+    ACanvas.DrawImage(GridImageList, R.Left + 2, R.Top + 2, 1);
   ADone := True;
 end;
 
diff --git a/Source/Modulos/Contactos/Views/uViewContactos.dfm b/Source/Modulos/Contactos/Views/uViewContactos.dfm
index c6f369a5..262970d2 100644
--- a/Source/Modulos/Contactos/Views/uViewContactos.dfm
+++ b/Source/Modulos/Contactos/Views/uViewContactos.dfm
@@ -19,10 +19,14 @@ inherited frViewContactos: TfrViewContactos
         end>
       OptionsBehavior.PullFocusing = True
       object cxGridViewICONO: TcxGridDBColumn
-        OnCustomDrawCell = cxGridViewCODIGOCustomDrawCell
-        BestFitMaxWidth = 18
+        Caption = 'Icono'
+        OnCustomDrawCell = cxGridViewICONOCustomDrawCell
+        BestFitMaxWidth = 22
+        MinWidth = 22
+        Options.HorzSizing = False
         Options.Sorting = False
-        Width = 20
+        Width = 22
+        OnCustomDrawHeader = cxGridViewICONOCustomDrawHeader
       end
       object cxGridViewREFERENCIA: TcxGridDBColumn
         Caption = 'C'#243'digo'
@@ -112,15 +116,27 @@ inherited frViewContactos: TfrViewContactos
         Width = 557
         ExplicitWidth = 557
         inherited txtFiltroTodo: TcxTextEdit
-          ExplicitWidth = 273
-          Width = 273
+          Style.LookAndFeel.SkinName = ''
+          StyleDisabled.LookAndFeel.SkinName = ''
+          StyleFocused.LookAndFeel.SkinName = ''
+          StyleHot.LookAndFeel.SkinName = ''
+          ExplicitWidth = 460
+          Width = 460
         end
         inherited edtFechaIniFiltro: TcxDateEdit
+          Style.LookAndFeel.SkinName = ''
+          StyleDisabled.LookAndFeel.SkinName = ''
+          StyleFocused.LookAndFeel.SkinName = ''
+          StyleHot.LookAndFeel.SkinName = ''
           ExplicitWidth = 121
           Width = 121
         end
         inherited edtFechaFinFiltro: TcxDateEdit
           Left = 225
+          Style.LookAndFeel.SkinName = ''
+          StyleDisabled.LookAndFeel.SkinName = ''
+          StyleFocused.LookAndFeel.SkinName = ''
+          StyleHot.LookAndFeel.SkinName = ''
           ExplicitLeft = 225
           ExplicitWidth = 322
           Width = 322
@@ -159,14 +175,116 @@ inherited frViewContactos: TfrViewContactos
       BuiltInReportLink = True
     end
   end
+  inherited ActionList1: TActionList
+    Left = 336
+    Top = 304
+  end
+  inherited PngImageList10: TPngImageList
+    Left = 232
+    Top = 304
+  end
   inherited dxPrintStyleManager1: TdxPrintStyleManager
     inherited dxPrintStyleManager1Style1: TdxPSPrintStyle
       BuiltInStyle = True
     end
   end
-  object PngImageList: TPngImageList
-    PngImages = <>
-    Left = 160
-    Top = 32
+  object GridImageList: TPngImageList
+    PngImages = <
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
+          61000000097048597300000B1300000B1301009A9C1800000A4F694343505068
+          6F746F73686F70204943432070726F66696C65000078DA9D53675453E9163DF7
+          DEF4424B8880944B6F5215082052428B801491262A2109104A8821A1D91551C1
+          114545041BC8A088038E8E808C15512C0C8A0AD807E421A28E83A3888ACAFBE1
+          7BA36BD6BCF7E6CDFEB5D73EE7ACF39DB3CF07C0080C9648335135800CA9421E
+          11E083C7C4C6E1E42E40810A2470001008B3642173FD230100F87E3C3C2B22C0
+          07BE000178D30B0800C04D9BC0301C87FF0FEA42995C01808401C07491384B08
+          801400407A8E42A600404601809D98265300A0040060CB6362E300502D006027
+          7FE6D300809DF8997B01005B94211501A09100201365884400683B00ACCF568A
+          450058300014664BC43900D82D00304957664800B0B700C0CE100BB200080C00
+          305188852900047B0060C8232378008499001446F2573CF12BAE10E72A000078
+          99B23CB9243945815B082D710757572E1E28CE49172B14366102619A402EC279
+          99193281340FE0F3CC0000A0911511E083F3FD78CE0EAECECE368EB60E5F2DEA
+          BF06FF226262E3FEE5CFAB70400000E1747ED1FE2C2FB31A803B06806DFEA225
+          EE04685E0BA075F78B66B20F40B500A0E9DA57F370F87E3C3C45A190B9D9D9E5
+          E4E4D84AC4425B61CA577DFE67C25FC057FD6CF97E3CFCF7F5E0BEE22481325D
+          814704F8E0C2CCF44CA51CCF92098462DCE68F47FCB70BFFFC1DD322C44962B9
+          582A14E35112718E449A8CF332A52289429229C525D2FF64E2DF2CFB033EDF35
+          00B06A3E017B912DA85D6303F64B27105874C0E2F70000F2BB6FC1D428080380
+          6883E1CF77FFEF3FFD47A02500806649927100005E44242E54CAB33FC7080000
+          44A0812AB0411BF4C1182CC0061CC105DCC10BFC6036844224C4C24210420A64
+          801C726029AC82422886CDB01D2A602FD4401D34C051688693700E2EC255B80E
+          3D700FFA61089EC128BC81090441C808136121DA8801628A58238E08179985F8
+          21C14804128B2420C9881451224B91354831528A542055481DF23D720239875C
+          46BA913BC8003282FC86BC47319481B2513DD40CB543B9A8371A8446A20BD064
+          74319A8F16A09BD072B41A3D8C36A1E7D0AB680FDA8F3E43C730C0E8180733C4
+          6C302EC6C342B1382C099363CBB122AC0CABC61AB056AC03BB89F563CFB17704
+          128145C0093604774220611E4148584C584ED848A8201C243411DA0937090384
+          51C2272293A84BB426BA11F9C4186232318758482C23D6128F132F107B8843C4
+          37241289433227B9900249B1A454D212D246D26E5223E92CA99B34481A2393C9
+          DA646BB20739942C202BC885E49DE4C3E433E41BE421F25B0A9D624071A4F853
+          E22852CA6A4A19E510E534E5066598324155A39A52DDA8A15411358F5A42ADA1
+          B652AF5187A81334759A39CD8316494BA5ADA295D31A681768F769AFE874BA11
+          DD951E4E97D057D2CBE947E897E803F4770C0D861583C7886728199B18071867
+          197718AF984CA619D38B19C754303731EB98E7990F996F55582AB62A7C1591CA
+          0A954A9526951B2A2F54A9AAA6AADEAA0B55F355CB548FA95E537DAE46553353
+          E3A909D496AB55AA9D50EB531B5367A93BA887AA67A86F543FA47E59FD890659
+          C34CC34F43A451A0B15FE3BCC6200B6319B3782C216B0DAB86758135C426B1CD
+          D97C762ABB98FD1DBB8B3DAAA9A13943334A3357B352F394663F07E39871F89C
+          744E09E728A797F37E8ADE14EF29E2291BA6344CB931655C6BAA96979658AB48
+          AB51AB47EBBD36AEEDA79DA6BD45BB59FB810E41C74A275C2747678FCE059DE7
+          53D953DDA70AA7164D3D3AF5AE2EAA6BA51BA1BB4477BF6EA7EE989EBE5E809E
+          4C6FA7DE79BDE7FA1C7D2FFD54FD6DFAA7F5470C5806B30C2406DB0CCE183CC5
+          35716F3C1D2FC7DBF151435DC34043A561956197E18491B9D13CA3D5468D460F
+          8C69C65CE324E36DC66DC6A326062621264B4DEA4DEE9A524DB9A629A63B4C3B
+          4CC7CDCCCDA2CDD699359B3D31D732E79BE79BD79BDFB7605A785A2CB6A8B6B8
+          6549B2E45AA659EEB6BC6E855A3959A558555A5DB346AD9DAD25D6BBADBBA711
+          A7B94E934EAB9ED667C3B0F1B6C9B6A9B719B0E5D806DBAEB66DB67D61676217
+          67B7C5AEC3EE93BD937DBA7D8DFD3D070D87D90EAB1D5A1D7E73B472143A563A
+          DE9ACE9CEE3F7DC5F496E92F6758CF10CFD833E3B613CB29C4699D539BD34767
+          1767B97383F3888B894B82CB2E973E2E9B1BC6DDC8BDE44A74F5715DE17AD2F5
+          9D9BB39BC2EDA8DBAFEE36EE69EE87DC9FCC349F299E593373D0C3C843E051E5
+          D13F0B9F95306BDFAC7E4F434F8167B5E7232F632F9157ADD7B0B7A577AAF761
+          EF173EF63E729FE33EE33C37DE32DE595FCC37C0B7C8B7CB4FC36F9E5F85DF43
+          7F23FF64FF7AFFD100A78025016703898141815B02FBF87A7C21BF8E3F3ADB65
+          F6B2D9ED418CA0B94115418F82AD82E5C1AD2168C8EC90AD21F7E798CE91CE69
+          0E85507EE8D6D00761E6618BC37E0C2785878557863F8E7088581AD131973577
+          D1DC4373DF44FA449644DE9B67314F39AF2D4A352A3EAA2E6A3CDA37BA34BA3F
+          C62E6659CCD5589D58496C4B1C392E2AAE366E6CBEDFFCEDF387E29DE20BE37B
+          17982FC85D7079A1CEC2F485A716A92E122C3A96404C884E3894F041102AA816
+          8C25F21377258E0A79C21DC267222FD136D188D8435C2A1E4EF2482A4D7A92EC
+          91BC357924C533A52CE5B98427A990BC4C0D4CDD9B3A9E169A76206D323D3ABD
+          31839291907142AA214D93B667EA67E66676CBAC6585B2FEC56E8BB72F1E9507
+          C96BB390AC05592D0AB642A6E8545A28D72A07B267655766BFCD89CA3996AB9E
+          2BCDEDCCB3CADB90379CEF9FFFED12C212E192B6A5864B572D1D58E6BDAC6A39
+          B23C7179DB0AE315052B865606AC3CB88AB62A6DD54FABED5797AE7EBD267A4D
+          6B815EC1CA82C1B5016BEB0B550AE5857DEBDCD7ED5D4F582F59DFB561FA869D
+          1B3E15898AAE14DB1797157FD828DC78E51B876FCABF99DC94B4A9ABC4B964CF
+          66D266E9E6DE2D9E5B0E96AA97E6970E6E0DD9DAB40DDF56B4EDF5F645DB2F97
+          CD28DBBB83B643B9A3BF3CB8BC65A7C9CECD3B3F54A454F454FA5436EED2DDB5
+          61D7F86ED1EE1B7BBCF634ECD5DB5BBCF7FD3EC9BEDB5501554DD566D565FB49
+          FBB3F73FAE89AAE9F896FB6D5DAD4E6D71EDC703D203FD07230EB6D7B9D4D51D
+          D23D54528FD62BEB470EC71FBEFE9DEF772D0D360D558D9CC6E223704479E4E9
+          F709DFF71E0D3ADA768C7BACE107D31F761D671D2F6A429AF29A469B539AFB5B
+          625BBA4FCC3ED1D6EADE7AFC47DB1F0F9C343C59794AF354C969DAE982D39367
+          F2CF8C9D959D7D7E2EF9DC60DBA2B67BE763CEDF6A0F6FEFBA1074E1D245FF8B
+          E73BBC3BCE5CF2B874F2B2DBE51357B8579AAF3A5F6DEA74EA3CFE93D34FC7BB
+          9CBB9AAEB95C6BB9EE7ABDB57B66F7E91B9E37CEDDF4BD79F116FFD6D59E393D
+          DDBDF37A6FF7C5F7F5DF16DD7E7227FDCECBBBD97727EEADBC4FBC5FF440ED41
+          D943DD87D53F5BFEDCD8EFDC7F6AC077A0F3D1DC47F7068583CFFE91F58F0F43
+          058F998FCB860D86EB9E383E3939E23F72FDE9FCA743CF64CF269E17FEA2FECB
+          AE17162F7EF8D5EBD7CED198D1A197F29793BF6D7CA5FDEAC0EB19AFDBC6C2C6
+          1EBEC97833315EF456FBEDC177DC771DEFA3DF0F4FE47C207F28FF68F9B1F553
+          D0A7FB93199393FF040398F3FC63332DDB000000434944415478DA63FCFFFF3F
+          03258011D900464646ACA601D530126D00BA6298A1B80C21CA0090183639925C
+          80CB3B040DC0E69A510306BD010C04005E03C801036F00008D248BE16F9028BA
+          0000000049454E44AE426082}
+        Name = 'PngImage0'
+        Background = clWindow
+      end>
+    Left = 184
+    Top = 304
+    Bitmap = {}
   end
 end
diff --git a/Source/Modulos/Contactos/Views/uViewContactos.pas b/Source/Modulos/Contactos/Views/uViewContactos.pas
index 46d8f8bb..10775968 100644
--- a/Source/Modulos/Contactos/Views/uViewContactos.pas
+++ b/Source/Modulos/Contactos/Views/uViewContactos.pas
@@ -13,8 +13,14 @@ uses
   dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns,
   dxPSEdgePatterns, cxIntlPrintSys3, dxPSCore, dxPScxCommon, 
   uDataModuleClientes, cxGridCustomPopupMenu, cxGridPopupMenu, uViewFiltroBase,
-  ComCtrls, TB2Item, TBX, TB2Toolbar, TBXDkPanels, TB2Dock, dxPgsDlg,
-  uDAInterfaces, dxPScxGrid6Lnk;
+  ComCtrls, TB2Item, TBX, TB2Toolbar, dxSkinsCore, dxSkinBlack, dxSkinBlue,
+  dxSkinCaramel, dxSkinCoffee, dxSkinGlassOceans, dxSkiniMaginary, dxSkinLilian,
+  dxSkinLiquidSky, dxSkinLondonLiquidSky, dxSkinMcSkin, dxSkinMoneyTwins,
+  dxSkinOffice2007Black, dxSkinOffice2007Blue, dxSkinOffice2007Green,
+  dxSkinOffice2007Pink, dxSkinOffice2007Silver, dxSkinSilver, dxSkinStardust,
+  dxSkinsDefaultPainters, dxSkinValentine, dxSkinXmas2008Blue,
+  dxSkinscxPCPainter, dxPgsDlg, dxPScxGrid6Lnk, uDAInterfaces, TBXDkPanels,
+  TB2Dock;
 
 type
   IViewContactos = interface(IViewGrid)
@@ -25,7 +31,6 @@ type
   end;
 
   TfrViewContactos = class(TfrViewGrid, IViewContactos)
-    PngImageList: TPngImageList;
     cxGridViewICONO: TcxGridDBColumn;
     cxGridViewNIF_CIF: TcxGridDBColumn;
     cxGridViewNOMBRE: TcxGridDBColumn;
@@ -41,9 +46,13 @@ type
     cxGridViewEMAIL_2: TcxGridDBColumn;
     cxGridViewPAGINA_WEB: TcxGridDBColumn;
     cxGridViewREFERENCIA: TcxGridDBColumn;
-    procedure cxGridViewCODIGOCustomDrawCell(
-      Sender: TcxCustomGridTableView; ACanvas: TcxCanvas;
-      AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
+    GridImageList: TPngImageList;
+    procedure cxGridViewICONOCustomDrawHeader(Sender: TcxGridTableView;
+      ACanvas: TcxCanvas; AViewInfo: TcxGridColumnHeaderViewInfo;
+      var ADone: Boolean);
+    procedure cxGridViewICONOCustomDrawCell(Sender: TcxCustomGridTableView;
+      ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo;
+      var ADone: Boolean);
   protected
     FContactos: IBizContacto;
     function GetContactos: IBizContacto; virtual;
@@ -61,6 +70,40 @@ implementation
 {
 ******************************* TfrViewContactos *******************************
 }
+procedure TfrViewContactos.cxGridViewICONOCustomDrawCell(
+  Sender: TcxCustomGridTableView; ACanvas: TcxCanvas;
+  AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
+var
+  R : TRect;
+begin
+  inherited;
+  R := AViewInfo.ContentBounds;
+  ACanvas.FillRect(R);
+  ACanvas.DrawImage(GridImageList, R.Left + 2, R.Top + 2, 1);
+  ADone := True;
+end;
+
+procedure TfrViewContactos.cxGridViewICONOCustomDrawHeader(
+  Sender: TcxGridTableView; ACanvas: TcxCanvas;
+  AViewInfo: TcxGridColumnHeaderViewInfo; var ADone: Boolean);
+var
+  R : TRect;
+begin
+  inherited;
+  with AViewInfo do
+  begin
+    LookAndFeelPainter.DrawHeader(ACanvas, Bounds, TextAreaBounds, Neighbors,
+      Borders, ButtonState, AlignmentHorz, AlignmentVert, MultiLine,
+      False, '', Params.Font, Params.TextColor, Params.Color);
+
+    R := AViewInfo.ContentBounds;
+    ACanvas.FillRect(R);
+    ACanvas.DrawImage(GridImageList, R.Left + 2, R.Top + 2, 0);
+  end;
+
+  ADone := True;
+end;
+
 function TfrViewContactos.GetContactos: IBizContacto;
 begin
   Result := FContactos;
@@ -74,17 +117,4 @@ begin
 end;
 
 
-procedure TfrViewContactos.cxGridViewCODIGOCustomDrawCell(
-  Sender: TcxCustomGridTableView; ACanvas: TcxCanvas;
-  AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
-var
-  R : TRect;
-begin
-  inherited;
-  R := AViewInfo.ContentBounds;
-  ACanvas.FillRect(R);
-  ACanvas.DrawImage(PngImageList, R.Left + 2, R.Top + 2, 0);
-  ADone := True;
-end;
-
 end.
diff --git a/Source/Modulos/Contactos/Views/uViewEmpleados.dfm b/Source/Modulos/Contactos/Views/uViewEmpleados.dfm
index 90056c8b..68707e06 100644
--- a/Source/Modulos/Contactos/Views/uViewEmpleados.dfm
+++ b/Source/Modulos/Contactos/Views/uViewEmpleados.dfm
@@ -9,11 +9,7 @@ inherited frViewEmpleados: TfrViewEmpleados
           Column = cxGridViewNIF_CIF
         end>
       inherited cxGridViewICONO: TcxGridDBColumn
-        BestFitMaxWidth = 22
-        MinWidth = 22
-        Options.HorzSizing = False
         VisibleForCustomization = False
-        Width = 22
       end
       inherited cxGridViewNIF_CIF: TcxGridDBColumn
         Caption = 'DNI'
@@ -32,12 +28,26 @@ inherited frViewEmpleados: TfrViewEmpleados
   inherited frViewFiltroBase1: TfrViewFiltroBase
     inherited TBXDockablePanel1: TTBXDockablePanel
       inherited dxLayoutControl1: TdxLayoutControl
+        inherited txtFiltroTodo: TcxTextEdit
+          Style.LookAndFeel.SkinName = ''
+          StyleDisabled.LookAndFeel.SkinName = ''
+          StyleFocused.LookAndFeel.SkinName = ''
+          StyleHot.LookAndFeel.SkinName = ''
+        end
         inherited edtFechaIniFiltro: TcxDateEdit
-          ExplicitWidth = 239
-          Width = 239
+          Style.LookAndFeel.SkinName = ''
+          StyleDisabled.LookAndFeel.SkinName = ''
+          StyleFocused.LookAndFeel.SkinName = ''
+          StyleHot.LookAndFeel.SkinName = ''
+          ExplicitWidth = 238
+          Width = 238
         end
         inherited edtFechaFinFiltro: TcxDateEdit
           Left = 342
+          Style.LookAndFeel.SkinName = ''
+          StyleDisabled.LookAndFeel.SkinName = ''
+          StyleFocused.LookAndFeel.SkinName = ''
+          StyleHot.LookAndFeel.SkinName = ''
           ExplicitLeft = 342
           ExplicitWidth = 205
           Width = 205
@@ -45,6 +55,9 @@ inherited frViewEmpleados: TfrViewEmpleados
       end
     end
   end
+  inherited pnlAgrupaciones: TTBXDockablePanel
+    ExplicitWidth = 128
+  end
   inherited dxComponentPrinter: TdxComponentPrinter
     inherited dxComponentPrinterLink: TdxGridReportLink
       ReportDocument.CreationDate = 39211.791248726860000000
@@ -56,8 +69,101 @@ inherited frViewEmpleados: TfrViewEmpleados
       BuiltInStyle = True
     end
   end
-  inherited PngImageList: TPngImageList
+  inherited GridImageList: TPngImageList
     PngImages = <
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
+          61000000097048597300000B1300000B1301009A9C1800000A4F694343505068
+          6F746F73686F70204943432070726F66696C65000078DA9D53675453E9163DF7
+          DEF4424B8880944B6F5215082052428B801491262A2109104A8821A1D91551C1
+          114545041BC8A088038E8E808C15512C0C8A0AD807E421A28E83A3888ACAFBE1
+          7BA36BD6BCF7E6CDFEB5D73EE7ACF39DB3CF07C0080C9648335135800CA9421E
+          11E083C7C4C6E1E42E40810A2470001008B3642173FD230100F87E3C3C2B22C0
+          07BE000178D30B0800C04D9BC0301C87FF0FEA42995C01808401C07491384B08
+          801400407A8E42A600404601809D98265300A0040060CB6362E300502D006027
+          7FE6D300809DF8997B01005B94211501A09100201365884400683B00ACCF568A
+          450058300014664BC43900D82D00304957664800B0B700C0CE100BB200080C00
+          305188852900047B0060C8232378008499001446F2573CF12BAE10E72A000078
+          99B23CB9243945815B082D710757572E1E28CE49172B14366102619A402EC279
+          99193281340FE0F3CC0000A0911511E083F3FD78CE0EAECECE368EB60E5F2DEA
+          BF06FF226262E3FEE5CFAB70400000E1747ED1FE2C2FB31A803B06806DFEA225
+          EE04685E0BA075F78B66B20F40B500A0E9DA57F370F87E3C3C45A190B9D9D9E5
+          E4E4D84AC4425B61CA577DFE67C25FC057FD6CF97E3CFCF7F5E0BEE22481325D
+          814704F8E0C2CCF44CA51CCF92098462DCE68F47FCB70BFFFC1DD322C44962B9
+          582A14E35112718E449A8CF332A52289429229C525D2FF64E2DF2CFB033EDF35
+          00B06A3E017B912DA85D6303F64B27105874C0E2F70000F2BB6FC1D428080380
+          6883E1CF77FFEF3FFD47A02500806649927100005E44242E54CAB33FC7080000
+          44A0812AB0411BF4C1182CC0061CC105DCC10BFC6036844224C4C24210420A64
+          801C726029AC82422886CDB01D2A602FD4401D34C051688693700E2EC255B80E
+          3D700FFA61089EC128BC81090441C808136121DA8801628A58238E08179985F8
+          21C14804128B2420C9881451224B91354831528A542055481DF23D720239875C
+          46BA913BC8003282FC86BC47319481B2513DD40CB543B9A8371A8446A20BD064
+          74319A8F16A09BD072B41A3D8C36A1E7D0AB680FDA8F3E43C730C0E8180733C4
+          6C302EC6C342B1382C099363CBB122AC0CABC61AB056AC03BB89F563CFB17704
+          128145C0093604774220611E4148584C584ED848A8201C243411DA0937090384
+          51C2272293A84BB426BA11F9C4186232318758482C23D6128F132F107B8843C4
+          37241289433227B9900249B1A454D212D246D26E5223E92CA99B34481A2393C9
+          DA646BB20739942C202BC885E49DE4C3E433E41BE421F25B0A9D624071A4F853
+          E22852CA6A4A19E510E534E5066598324155A39A52DDA8A15411358F5A42ADA1
+          B652AF5187A81334759A39CD8316494BA5ADA295D31A681768F769AFE874BA11
+          DD951E4E97D057D2CBE947E897E803F4770C0D861583C7886728199B18071867
+          197718AF984CA619D38B19C754303731EB98E7990F996F55582AB62A7C1591CA
+          0A954A9526951B2A2F54A9AAA6AADEAA0B55F355CB548FA95E537DAE46553353
+          E3A909D496AB55AA9D50EB531B5367A93BA887AA67A86F543FA47E59FD890659
+          C34CC34F43A451A0B15FE3BCC6200B6319B3782C216B0DAB86758135C426B1CD
+          D97C762ABB98FD1DBB8B3DAAA9A13943334A3357B352F394663F07E39871F89C
+          744E09E728A797F37E8ADE14EF29E2291BA6344CB931655C6BAA96979658AB48
+          AB51AB47EBBD36AEEDA79DA6BD45BB59FB810E41C74A275C2747678FCE059DE7
+          53D953DDA70AA7164D3D3AF5AE2EAA6BA51BA1BB4477BF6EA7EE989EBE5E809E
+          4C6FA7DE79BDE7FA1C7D2FFD54FD6DFAA7F5470C5806B30C2406DB0CCE183CC5
+          35716F3C1D2FC7DBF151435DC34043A561956197E18491B9D13CA3D5468D460F
+          8C69C65CE324E36DC66DC6A326062621264B4DEA4DEE9A524DB9A629A63B4C3B
+          4CC7CDCCCDA2CDD699359B3D31D732E79BE79BD79BDFB7605A785A2CB6A8B6B8
+          6549B2E45AA659EEB6BC6E855A3959A558555A5DB346AD9DAD25D6BBADBBA711
+          A7B94E934EAB9ED667C3B0F1B6C9B6A9B719B0E5D806DBAEB66DB67D61676217
+          67B7C5AEC3EE93BD937DBA7D8DFD3D070D87D90EAB1D5A1D7E73B472143A563A
+          DE9ACE9CEE3F7DC5F496E92F6758CF10CFD833E3B613CB29C4699D539BD34767
+          1767B97383F3888B894B82CB2E973E2E9B1BC6DDC8BDE44A74F5715DE17AD2F5
+          9D9BB39BC2EDA8DBAFEE36EE69EE87DC9FCC349F299E593373D0C3C843E051E5
+          D13F0B9F95306BDFAC7E4F434F8167B5E7232F632F9157ADD7B0B7A577AAF761
+          EF173EF63E729FE33EE33C37DE32DE595FCC37C0B7C8B7CB4FC36F9E5F85DF43
+          7F23FF64FF7AFFD100A78025016703898141815B02FBF87A7C21BF8E3F3ADB65
+          F6B2D9ED418CA0B94115418F82AD82E5C1AD2168C8EC90AD21F7E798CE91CE69
+          0E85507EE8D6D00761E6618BC37E0C2785878557863F8E7088581AD131973577
+          D1DC4373DF44FA449644DE9B67314F39AF2D4A352A3EAA2E6A3CDA37BA34BA3F
+          C62E6659CCD5589D58496C4B1C392E2AAE366E6CBEDFFCEDF387E29DE20BE37B
+          17982FC85D7079A1CEC2F485A716A92E122C3A96404C884E3894F041102AA816
+          8C25F21377258E0A79C21DC267222FD136D188D8435C2A1E4EF2482A4D7A92EC
+          91BC357924C533A52CE5B98427A990BC4C0D4CDD9B3A9E169A76206D323D3ABD
+          31839291907142AA214D93B667EA67E66676CBAC6585B2FEC56E8BB72F1E9507
+          C96BB390AC05592D0AB642A6E8545A28D72A07B267655766BFCD89CA3996AB9E
+          2BCDEDCCB3CADB90379CEF9FFFED12C212E192B6A5864B572D1D58E6BDAC6A39
+          B23C7179DB0AE315052B865606AC3CB88AB62A6DD54FABED5797AE7EBD267A4D
+          6B815EC1CA82C1B5016BEB0B550AE5857DEBDCD7ED5D4F582F59DFB561FA869D
+          1B3E15898AAE14DB1797157FD828DC78E51B876FCABF99DC94B4A9ABC4B964CF
+          66D266E9E6DE2D9E5B0E96AA97E6970E6E0DD9DAB40DDF56B4EDF5F645DB2F97
+          CD28DBBB83B643B9A3BF3CB8BC65A7C9CECD3B3F54A454F454FA5436EED2DDB5
+          61D7F86ED1EE1B7BBCF634ECD5DB5BBCF7FD3EC9BEDB5501554DD566D565FB49
+          FBB3F73FAE89AAE9F896FB6D5DAD4E6D71EDC703D203FD07230EB6D7B9D4D51D
+          D23D54528FD62BEB470EC71FBEFE9DEF772D0D360D558D9CC6E223704479E4E9
+          F709DFF71E0D3ADA768C7BACE107D31F761D671D2F6A429AF29A469B539AFB5B
+          625BBA4FCC3ED1D6EADE7AFC47DB1F0F9C343C59794AF354C969DAE982D39367
+          F2CF8C9D959D7D7E2EF9DC60DBA2B67BE763CEDF6A0F6FEFBA1074E1D245FF8B
+          E73BBC3BCE5CF2B874F2B2DBE51357B8579AAF3A5F6DEA74EA3CFE93D34FC7BB
+          9CBB9AAEB95C6BB9EE7ABDB57B66F7E91B9E37CEDDF4BD79F116FFD6D59E393D
+          DDBDF37A6FF7C5F7F5DF16DD7E7227FDCECBBBD97727EEADBC4FBC5FF440ED41
+          D943DD87D53F5BFEDCD8EFDC7F6AC077A0F3D1DC47F7068583CFFE91F58F0F43
+          058F998FCB860D86EB9E383E3939E23F72FDE9FCA743CF64CF269E17FEA2FECB
+          AE17162F7EF8D5EBD7CED198D1A197F29793BF6D7CA5FDEAC0EB19AFDBC6C2C6
+          1EBEC97833315EF456FBEDC177DC771DEFA3DF0F4FE47C207F28FF68F9B1F553
+          D0A7FB93199393FF040398F3FC63332DDB000000434944415478DA63FCFFFF3F
+          03258011D900464646ACA601D530126D00BA6298A1B80C21CA0090183639925C
+          80CB3B040DC0E69A510306BD010C04005E03C801036F00008D248BE16F9028BA
+          0000000049454E44AE426082}
+        Name = 'PngImage0'
+        Background = clWindow
+      end
       item
         PngImage.Data = {
           89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
@@ -85,11 +191,9 @@ inherited frViewEmpleados: TfrViewEmpleados
           9909ACCC0D379189D8CF2D53309BCD658273AF1BAD705582466F4064492329AC
           20F15C0E2882449716226A5930AD66ADE71FDF3497F05E932988000000004945
           4E44AE426082}
-        Name = 'PngImage0'
+        Name = 'PngImage1'
         Background = clWindow
       end>
-    Left = 296
-    Top = 168
     Bitmap = {}
   end
 end
diff --git a/Source/Modulos/Contactos/Views/uViewEmpleados.pas b/Source/Modulos/Contactos/Views/uViewEmpleados.pas
index f49da4be..1db3a917 100644
--- a/Source/Modulos/Contactos/Views/uViewEmpleados.pas
+++ b/Source/Modulos/Contactos/Views/uViewEmpleados.pas
@@ -11,7 +11,13 @@ uses
   cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk, uDADataTable,
   cxGridLevel, cxGridCustomTableView, cxGridTableView, cxGridDBTableView,
   cxClasses, cxControls, cxGridCustomView, cxGrid, dxPgsDlg, ActnList, TB2Item,
-  TBX, TB2Toolbar, TBXDkPanels, TB2Dock, uViewFiltroBase, uDAInterfaces;
+  TBX, TB2Toolbar, TBXDkPanels, TB2Dock, uViewFiltroBase, uDAInterfaces,
+  dxSkinsCore, dxSkinBlack, dxSkinBlue, dxSkinCaramel, dxSkinCoffee,
+  dxSkinGlassOceans, dxSkiniMaginary, dxSkinLilian, dxSkinLiquidSky,
+  dxSkinLondonLiquidSky, dxSkinMcSkin, dxSkinMoneyTwins, dxSkinOffice2007Black,
+  dxSkinOffice2007Blue, dxSkinOffice2007Green, dxSkinOffice2007Pink,
+  dxSkinOffice2007Silver, dxSkinSilver, dxSkinStardust, dxSkinsDefaultPainters,
+  dxSkinValentine, dxSkinXmas2008Blue, dxSkinscxPCPainter, Menus;
 
 type
   IViewEmpleados = interface(IViewContactos)
diff --git a/Source/Modulos/Contactos/Views/uViewProveedores.dfm b/Source/Modulos/Contactos/Views/uViewProveedores.dfm
index 114718be..af292b3a 100644
--- a/Source/Modulos/Contactos/Views/uViewProveedores.dfm
+++ b/Source/Modulos/Contactos/Views/uViewProveedores.dfm
@@ -18,17 +18,11 @@ inherited frViewProveedores: TfrViewProveedores
         end>
       inherited cxGridViewICONO: TcxGridDBColumn
         OnGetCellHint = cxGridViewICONOGetCellHint
-        BestFitMaxWidth = 22
-        MinWidth = 22
-        Options.HorzSizing = False
-        VisibleForCustomization = False
-        Width = 22
       end
       object cxGridViewTIENDA_WEB: TcxGridDBColumn [1]
         Caption = 'Incluido en tienda web'
         DataBinding.FieldName = 'TIENDA_WEB'
         PropertiesClassName = 'TcxImageComboBoxProperties'
-        Properties.Images = PngImageList
         Properties.Items = <
           item
             Value = 0
@@ -62,14 +56,30 @@ inherited frViewProveedores: TfrViewProveedores
         Width = 483
         ExplicitWidth = 483
         inherited txtFiltroTodo: TcxTextEdit
-          ExplicitWidth = 273
-          Width = 273
+          Style.LookAndFeel.SkinName = ''
+          StyleDisabled.LookAndFeel.SkinName = ''
+          StyleFocused.LookAndFeel.SkinName = ''
+          StyleHot.LookAndFeel.SkinName = ''
+          ExplicitWidth = 386
+          Width = 386
+        end
+        inherited edtFechaIniFiltro: TcxDateEdit
+          Style.LookAndFeel.SkinName = ''
+          StyleDisabled.LookAndFeel.SkinName = ''
+          StyleFocused.LookAndFeel.SkinName = ''
+          StyleHot.LookAndFeel.SkinName = ''
+          ExplicitWidth = 125
+          Width = 125
         end
         inherited edtFechaFinFiltro: TcxDateEdit
-          Left = 234
-          ExplicitLeft = 234
-          ExplicitWidth = 228
-          Width = 228
+          Left = 229
+          Style.LookAndFeel.SkinName = ''
+          StyleDisabled.LookAndFeel.SkinName = ''
+          StyleFocused.LookAndFeel.SkinName = ''
+          StyleHot.LookAndFeel.SkinName = ''
+          ExplicitLeft = 229
+          ExplicitWidth = 244
+          Width = 244
         end
       end
       inherited TBXAlignmentPanel1: TTBXAlignmentPanel
@@ -106,8 +116,101 @@ inherited frViewProveedores: TfrViewProveedores
       BuiltInStyle = True
     end
   end
-  inherited PngImageList: TPngImageList
+  inherited GridImageList: TPngImageList
     PngImages = <
+      item
+        PngImage.Data = {
+          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
+          61000000097048597300000B1300000B1301009A9C1800000A4F694343505068
+          6F746F73686F70204943432070726F66696C65000078DA9D53675453E9163DF7
+          DEF4424B8880944B6F5215082052428B801491262A2109104A8821A1D91551C1
+          114545041BC8A088038E8E808C15512C0C8A0AD807E421A28E83A3888ACAFBE1
+          7BA36BD6BCF7E6CDFEB5D73EE7ACF39DB3CF07C0080C9648335135800CA9421E
+          11E083C7C4C6E1E42E40810A2470001008B3642173FD230100F87E3C3C2B22C0
+          07BE000178D30B0800C04D9BC0301C87FF0FEA42995C01808401C07491384B08
+          801400407A8E42A600404601809D98265300A0040060CB6362E300502D006027
+          7FE6D300809DF8997B01005B94211501A09100201365884400683B00ACCF568A
+          450058300014664BC43900D82D00304957664800B0B700C0CE100BB200080C00
+          305188852900047B0060C8232378008499001446F2573CF12BAE10E72A000078
+          99B23CB9243945815B082D710757572E1E28CE49172B14366102619A402EC279
+          99193281340FE0F3CC0000A0911511E083F3FD78CE0EAECECE368EB60E5F2DEA
+          BF06FF226262E3FEE5CFAB70400000E1747ED1FE2C2FB31A803B06806DFEA225
+          EE04685E0BA075F78B66B20F40B500A0E9DA57F370F87E3C3C45A190B9D9D9E5
+          E4E4D84AC4425B61CA577DFE67C25FC057FD6CF97E3CFCF7F5E0BEE22481325D
+          814704F8E0C2CCF44CA51CCF92098462DCE68F47FCB70BFFFC1DD322C44962B9
+          582A14E35112718E449A8CF332A52289429229C525D2FF64E2DF2CFB033EDF35
+          00B06A3E017B912DA85D6303F64B27105874C0E2F70000F2BB6FC1D428080380
+          6883E1CF77FFEF3FFD47A02500806649927100005E44242E54CAB33FC7080000
+          44A0812AB0411BF4C1182CC0061CC105DCC10BFC6036844224C4C24210420A64
+          801C726029AC82422886CDB01D2A602FD4401D34C051688693700E2EC255B80E
+          3D700FFA61089EC128BC81090441C808136121DA8801628A58238E08179985F8
+          21C14804128B2420C9881451224B91354831528A542055481DF23D720239875C
+          46BA913BC8003282FC86BC47319481B2513DD40CB543B9A8371A8446A20BD064
+          74319A8F16A09BD072B41A3D8C36A1E7D0AB680FDA8F3E43C730C0E8180733C4
+          6C302EC6C342B1382C099363CBB122AC0CABC61AB056AC03BB89F563CFB17704
+          128145C0093604774220611E4148584C584ED848A8201C243411DA0937090384
+          51C2272293A84BB426BA11F9C4186232318758482C23D6128F132F107B8843C4
+          37241289433227B9900249B1A454D212D246D26E5223E92CA99B34481A2393C9
+          DA646BB20739942C202BC885E49DE4C3E433E41BE421F25B0A9D624071A4F853
+          E22852CA6A4A19E510E534E5066598324155A39A52DDA8A15411358F5A42ADA1
+          B652AF5187A81334759A39CD8316494BA5ADA295D31A681768F769AFE874BA11
+          DD951E4E97D057D2CBE947E897E803F4770C0D861583C7886728199B18071867
+          197718AF984CA619D38B19C754303731EB98E7990F996F55582AB62A7C1591CA
+          0A954A9526951B2A2F54A9AAA6AADEAA0B55F355CB548FA95E537DAE46553353
+          E3A909D496AB55AA9D50EB531B5367A93BA887AA67A86F543FA47E59FD890659
+          C34CC34F43A451A0B15FE3BCC6200B6319B3782C216B0DAB86758135C426B1CD
+          D97C762ABB98FD1DBB8B3DAAA9A13943334A3357B352F394663F07E39871F89C
+          744E09E728A797F37E8ADE14EF29E2291BA6344CB931655C6BAA96979658AB48
+          AB51AB47EBBD36AEEDA79DA6BD45BB59FB810E41C74A275C2747678FCE059DE7
+          53D953DDA70AA7164D3D3AF5AE2EAA6BA51BA1BB4477BF6EA7EE989EBE5E809E
+          4C6FA7DE79BDE7FA1C7D2FFD54FD6DFAA7F5470C5806B30C2406DB0CCE183CC5
+          35716F3C1D2FC7DBF151435DC34043A561956197E18491B9D13CA3D5468D460F
+          8C69C65CE324E36DC66DC6A326062621264B4DEA4DEE9A524DB9A629A63B4C3B
+          4CC7CDCCCDA2CDD699359B3D31D732E79BE79BD79BDFB7605A785A2CB6A8B6B8
+          6549B2E45AA659EEB6BC6E855A3959A558555A5DB346AD9DAD25D6BBADBBA711
+          A7B94E934EAB9ED667C3B0F1B6C9B6A9B719B0E5D806DBAEB66DB67D61676217
+          67B7C5AEC3EE93BD937DBA7D8DFD3D070D87D90EAB1D5A1D7E73B472143A563A
+          DE9ACE9CEE3F7DC5F496E92F6758CF10CFD833E3B613CB29C4699D539BD34767
+          1767B97383F3888B894B82CB2E973E2E9B1BC6DDC8BDE44A74F5715DE17AD2F5
+          9D9BB39BC2EDA8DBAFEE36EE69EE87DC9FCC349F299E593373D0C3C843E051E5
+          D13F0B9F95306BDFAC7E4F434F8167B5E7232F632F9157ADD7B0B7A577AAF761
+          EF173EF63E729FE33EE33C37DE32DE595FCC37C0B7C8B7CB4FC36F9E5F85DF43
+          7F23FF64FF7AFFD100A78025016703898141815B02FBF87A7C21BF8E3F3ADB65
+          F6B2D9ED418CA0B94115418F82AD82E5C1AD2168C8EC90AD21F7E798CE91CE69
+          0E85507EE8D6D00761E6618BC37E0C2785878557863F8E7088581AD131973577
+          D1DC4373DF44FA449644DE9B67314F39AF2D4A352A3EAA2E6A3CDA37BA34BA3F
+          C62E6659CCD5589D58496C4B1C392E2AAE366E6CBEDFFCEDF387E29DE20BE37B
+          17982FC85D7079A1CEC2F485A716A92E122C3A96404C884E3894F041102AA816
+          8C25F21377258E0A79C21DC267222FD136D188D8435C2A1E4EF2482A4D7A92EC
+          91BC357924C533A52CE5B98427A990BC4C0D4CDD9B3A9E169A76206D323D3ABD
+          31839291907142AA214D93B667EA67E66676CBAC6585B2FEC56E8BB72F1E9507
+          C96BB390AC05592D0AB642A6E8545A28D72A07B267655766BFCD89CA3996AB9E
+          2BCDEDCCB3CADB90379CEF9FFFED12C212E192B6A5864B572D1D58E6BDAC6A39
+          B23C7179DB0AE315052B865606AC3CB88AB62A6DD54FABED5797AE7EBD267A4D
+          6B815EC1CA82C1B5016BEB0B550AE5857DEBDCD7ED5D4F582F59DFB561FA869D
+          1B3E15898AAE14DB1797157FD828DC78E51B876FCABF99DC94B4A9ABC4B964CF
+          66D266E9E6DE2D9E5B0E96AA97E6970E6E0DD9DAB40DDF56B4EDF5F645DB2F97
+          CD28DBBB83B643B9A3BF3CB8BC65A7C9CECD3B3F54A454F454FA5436EED2DDB5
+          61D7F86ED1EE1B7BBCF634ECD5DB5BBCF7FD3EC9BEDB5501554DD566D565FB49
+          FBB3F73FAE89AAE9F896FB6D5DAD4E6D71EDC703D203FD07230EB6D7B9D4D51D
+          D23D54528FD62BEB470EC71FBEFE9DEF772D0D360D558D9CC6E223704479E4E9
+          F709DFF71E0D3ADA768C7BACE107D31F761D671D2F6A429AF29A469B539AFB5B
+          625BBA4FCC3ED1D6EADE7AFC47DB1F0F9C343C59794AF354C969DAE982D39367
+          F2CF8C9D959D7D7E2EF9DC60DBA2B67BE763CEDF6A0F6FEFBA1074E1D245FF8B
+          E73BBC3BCE5CF2B874F2B2DBE51357B8579AAF3A5F6DEA74EA3CFE93D34FC7BB
+          9CBB9AAEB95C6BB9EE7ABDB57B66F7E91B9E37CEDDF4BD79F116FFD6D59E393D
+          DDBDF37A6FF7C5F7F5DF16DD7E7227FDCECBBBD97727EEADBC4FBC5FF440ED41
+          D943DD87D53F5BFEDCD8EFDC7F6AC077A0F3D1DC47F7068583CFFE91F58F0F43
+          058F998FCB860D86EB9E383E3939E23F72FDE9FCA743CF64CF269E17FEA2FECB
+          AE17162F7EF8D5EBD7CED198D1A197F29793BF6D7CA5FDEAC0EB19AFDBC6C2C6
+          1EBEC97833315EF456FBEDC177DC771DEFA3DF0F4FE47C207F28FF68F9B1F553
+          D0A7FB93199393FF040398F3FC63332DDB000000434944415478DA63FCFFFF3F
+          03258011D900464646ACA601D530126D00BA6298A1B80C21CA0090183639925C
+          80CB3B040DC0E69A510306BD010C04005E03C801036F00008D248BE16F9028BA
+          0000000049454E44AE426082}
+        Name = 'PngImage0'
+        Background = clWindow
+      end
       item
         PngImage.Data = {
           89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
@@ -220,28 +323,6 @@ inherited frViewProveedores: TfrViewProveedores
         Name = 'PngImage1'
         Background = clWindow
       end
-      item
-        PngImage.Data = {
-          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
-          61000001E34944415478DAA5932D72E43010855F98D934341BC1858261D10D76
-          8E3047305C1685051A067A59A0E042E70682863D6C608719EE6B399EADDABFAA
-          AD7595CAB2DCFDF5EB1FDDE13F9FBB9F0FF258225F27AEC415D109B05A35C3CC
-          EF32E653FD2380CE035F4388720C41609DC2D68ABA28B42688E1820E79CAE7E9
-          17407316E4788F43E8033CF2F46D42F804E8E29084E0A2ACBE7B90E9798334C0
-          40D9145AC2BD1E8591A58B5CFE27406D462915EA59AD4A70812CF142FBD3340E
-          750764113C8648C9A214E20A0C762560A1A925A662A8FDD0D48A06846B782220
-          6F80E732C7181F14858079CB69895B1D57D6824BBB99FF4A03C9952134BD9597
-          21ED008BF1F341F52BAA3035098CC23428DB561A70D53EC39888EFB941D4F45E
-          5EB2DC0021A6035BC56A0F306660BD1B464A3DB5A8B00CED89606A62B201A61D
-          90CB8C3E3EA03BD2F002BD8EF4550FB441D421532B62658D02CFC4C2DBFC9AD3
-          0EC86CDBA349DC24B2F7BA8E2D227BCF9CFD3CB573EC69409EE6D731EF804899
-          EC4F3CB6D631927623FFD48F5AC84741B1B572D58B4FEB5CC67A1BA4739ECE34
-          18D185435DE756B070B5CDB17305B63BB741A2F38F41BA41BE38C4324D8FE6C6
-          3E0FBE7CEF15F602716877E7DF5EA6F330B6CBC4F6A55641CAE69EC973245714
-          97FDD7DBF8AFCF7740E00D20BA266C3A0000000049454E44AE426082}
-        Name = 'PngImage0'
-        Background = clWindow
-      end
       item
         PngImage.Data = {
           89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
diff --git a/Source/Modulos/Contactos/Views/uViewProveedores.pas b/Source/Modulos/Contactos/Views/uViewProveedores.pas
index 9b0c5b03..df7a3ed0 100644
--- a/Source/Modulos/Contactos/Views/uViewProveedores.pas
+++ b/Source/Modulos/Contactos/Views/uViewProveedores.pas
@@ -12,7 +12,13 @@ uses
   cxGridLevel, cxGridCustomTableView, cxGridTableView, cxGridDBTableView,
   cxClasses, cxControls, cxGridCustomView, cxGrid, dxPgsDlg, ActnList, TB2Item,
   TBX, TB2Toolbar, TBXDkPanels, TB2Dock, uViewFiltroBase, cxImageComboBox,
-  uDAInterfaces;
+  uDAInterfaces, dxSkinsCore, dxSkinBlack, dxSkinBlue, dxSkinCaramel,
+  dxSkinCoffee, dxSkinGlassOceans, dxSkiniMaginary, dxSkinLilian,
+  dxSkinLiquidSky, dxSkinLondonLiquidSky, dxSkinMcSkin, dxSkinMoneyTwins,
+  dxSkinOffice2007Black, dxSkinOffice2007Blue, dxSkinOffice2007Green,
+  dxSkinOffice2007Pink, dxSkinOffice2007Silver, dxSkinSilver, dxSkinStardust,
+  dxSkinsDefaultPainters, dxSkinValentine, dxSkinXmas2008Blue,
+  dxSkinscxPCPainter, Menus;
 
 type
   IViewProveedores = interface(IViewContactos)
@@ -22,20 +28,20 @@ type
   TfrViewProveedores = class(TfrViewContactos, IViewProveedores)
     cxGridViewTIENDA_WEB: TcxGridDBColumn;
     cxGridViewHOMOLOGADO: TcxGridDBColumn;
-    procedure cxGridViewCODIGOCustomDrawCell(Sender: TcxCustomGridTableView;
-      ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo;
-      var ADone: Boolean);
     procedure cxGridViewICONOGetCellHint(Sender: TcxCustomGridTableItem;
       ARecord: TcxCustomGridRecord; ACellViewInfo: TcxGridTableDataCellViewInfo;
       const AMousePos: TPoint; var AHintText: TCaption;
       var AIsHintMultiLine: Boolean; var AHintTextRect: TRect);
+    procedure cxGridViewICONOCustomDrawCell(Sender: TcxCustomGridTableView;
+      ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo;
+      var ADone: Boolean);
   end;
 
 implementation
 
 {$R *.dfm}
 
-procedure TfrViewProveedores.cxGridViewCODIGOCustomDrawCell(
+procedure TfrViewProveedores.cxGridViewICONOCustomDrawCell(
   Sender: TcxCustomGridTableView; ACanvas: TcxCanvas;
   AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
 var
@@ -46,9 +52,9 @@ begin
   ACanvas.FillRect(R);
   if (cxGridView.DataController.DisplayTexts[AViewInfo.GridRecord.RecordIndex,
     cxGridViewHOMOLOGADO.Index] = '1') then
-    ACanvas.DrawImage(PngImageList, R.Left + 2, R.Top + 2, 2)
+    ACanvas.DrawImage(GridImageList, R.Left + 2, R.Top + 2, 2)
   else
-    ACanvas.DrawImage(PngImageList, R.Left + 2, R.Top + 2, 0);
+    ACanvas.DrawImage(GridImageList, R.Left + 2, R.Top + 2, 1);
   ADone := True;
 end;