Cambio color lineas grid para windows 10

git-svn-id: https://192.168.0.254/svn/Proyectos.EstudioCarnicero_ProGestion/trunk@19 1b8572a8-2d6b-b84e-8c90-20ed86fa4eca

Base/uDataModuleBase.dfm

@@ -1,9 +1,8 @@
 object dmBase: TdmBase
   OldCreateOrder = True
   OnCreate = DAClientDataModuleCreate
-  Left = 191
+  Left = 192
-  Top = 130
+  Height = 362
-  Height = 376
   Width = 502
   object SmallImages: TPngImageList
     PngImages = <

Base/uViewGrid.dfm

@@ -41,7 +41,6 @@ inherited frViewGrid: TfrViewGrid
       OptionsView.GridLineColor = cl3DLight
       OptionsView.GroupByBox = False
       OptionsView.HeaderEndEllipsis = True
-      OptionsView.NewItemRowInfoText = 'Click here to add a new row'
       Styles.ContentEven = cxStyleEven
       Styles.ContentOdd = cxStyleOdd
       Styles.Inactive = cxStyleSelection
@@ -81,7 +80,7 @@ inherited frViewGrid: TfrViewGrid
       PrinterPage.PageSize.Y = 297000
       PrinterPage._dxMeasurementUnits_ = 0
       PrinterPage._dxLastMU_ = 2
-      ReportDocument.CreationDate = 40521.697641412040000000
+      ReportDocument.CreationDate = 44070.625980925930000000
       OptionsCharts.Transparent = True
       OptionsFormatting.SuppressBackgroundBitmaps = True
       OptionsOnEveryPage.Caption = False
@@ -107,7 +106,7 @@ inherited frViewGrid: TfrViewGrid
     end
     object cxStyleOdd: TcxStyle
       AssignedValues = [svColor]
-      Color = clInactiveCaptionText
+      Color = clInfoBk
     end
     object cxStyleSelection: TcxStyle
       AssignedValues = [svColor, svTextColor]

Cliente/uPantallaPrincipal.pas

@@ -145,7 +145,7 @@ begin
       HostManager.LoadModule('FacturasCliente.bpl');
       HostManager.LoadModule('Recibos.bpl');      
       HostManager.LoadModule('ObrasFinal.bpl');
-      HostManager.LoadModule('Calendarios.bpl');      
+//      HostManager.LoadModule('Calendarios.bpl');      
     end;
 
     InitializeUI;

Modulos/Calendarios/Servidor/srvCitas_Impl.dfm

@@ -5,8 +5,8 @@ object srvCitas: TsrvCitas
   ConnectionName = 'IBX'
   ServiceSchema = schCitas
   ServiceAdapter = DABINAdapter
-  Left = 394
+  Left = 397
-  Top = 211
+  Top = 159
   Height = 184
   Width = 245
   object schCitas: TDASchema

Modulos/Contactos/Servidor/srvContactos_Impl.dfm

@@ -6,9 +6,8 @@ object srvContactos: TsrvContactos
   ConnectionName = 'IBX'
   ServiceSchema = schContactos
   ServiceAdapter = DABINAdapter
-  Left = 358
+  Left = 361
-  Top = 144
+  Height = 362
-  Height = 368
   Width = 464
   object schContactos: TDASchema
     ConnectionManager = dmServer.ConnectionManager

Modulos/Facturas de cliente/Servidor/srvFacturasCliente_Impl.dfm

@@ -5,8 +5,8 @@ object srvFacturasCliente: TsrvFacturasCliente
   ConnectionName = 'IBX'
   ServiceSchema = schFacturasCliente
   ServiceAdapter = DABINAdapter
-  Left = 567
+  Left = 568
-  Height = 446
+  Height = 362
   Width = 347
   object schFacturasCliente: TDASchema
     ConnectionManager = dmServer.ConnectionManager
@@ -1215,7 +1215,7 @@ object srvFacturasCliente: TsrvFacturasCliente
     ReportOptions.CreateDate = 37871.995398692100000000
     ReportOptions.Description.Strings = (
       'Demonstrates how to create simple list report.')
-    ReportOptions.LastChange = 39014.653229525470000000
+    ReportOptions.LastChange = 42039.464331631900000000
     ReportOptions.VersionBuild = '1'
     ReportOptions.VersionMajor = '12'
     ReportOptions.VersionMinor = '13'

Modulos/Obras/Servidor/srvObras_Impl.dfm

@@ -5,8 +5,8 @@ object srvObras: TsrvObras
   ConnectionName = 'IBX'
   ServiceSchema = schObras
   ServiceAdapter = DABINAdapter
-  Left = 514
+  Left = 516
-  Top = 271
+  Top = 145
   Height = 300
   Width = 300
   object schObras: TDASchema
@@ -27,8 +27,9 @@ object srvObras: TsrvObras
               'S.PROVINCIA, OBRAS.TIPO,'#10'    OBRAS.DIMENSIONES, OBRAS.HONORARIOS' +
               ', OBRAS.IMPORTEHONORARIOS,'#10'    OBRAS.APLICAHONORARIOS, OBRAS.TOT' +
               'ALPRESUPUESTOSINI, OBRAS.TOTALPRESUPUESTOSFIN,'#10'    OBRAS.CODIGOC' +
-              'ONTACTO, CONTACTOS.NOMBRE as NOMBRECLIENTE, OBRAS.ALMACEN'#10'  FROM OBRAS'#10'  LEFT J' +
+              'ONTACTO, CONTACTOS.NOMBRE as NOMBRECLIENTE, OBRAS.ALMACEN'#10'  FROM' +
-              'OIN CONTACTOS ON (OBRAS.CODIGOCONTACTO = CONTACTOS.CODIGO)'
+              ' OBRAS'#10'  LEFT JOIN CONTACTOS ON (OBRAS.CODIGOCONTACTO = CONTACTO' +
+              'S.CODIGO)'
             StatementType = stSQL
             ColumnMappings = <
               item

Modulos/Recibos/Servidor/srvRecibosCliente_Impl.dfm

@@ -5,8 +5,8 @@ object srvRecibosCliente: TsrvRecibosCliente
   ConnectionName = 'IBX'
   ServiceSchema = schRecibosCliente
   ServiceAdapter = DABINAdapter
-  Left = 441
+  Left = 445
-  Top = 217
+  Top = 79
   Height = 328
   Width = 207
   object DABINAdapter: TDABINAdapter

Servidor/srvConfiguracion_Impl.dfm

@@ -5,8 +5,8 @@ object srvConfiguracion: TsrvConfiguracion
   ConnectionName = 'IBX'
   ServiceSchema = schConfiguracion
   ServiceAdapter = DABINAdapter
-  Left = 571
+  Left = 573
-  Top = 216
+  Top = 145
   Height = 300
   Width = 300
   object schConfiguracion: TDASchema
@@ -51,7 +51,9 @@ object srvConfiguracion: TsrvConfiguracion
           item
             Connection = 'IBX'
             TargetTable = 'INTERVALOS'
-            SQL = 'SELECT VALOR'#10'FROM CONFIGURACION'#10'WHERE CODIGO = '#39'PATH_PROYECTOS_NUEVO'#39
+            SQL = 
+              'SELECT VALOR'#10'FROM CONFIGURACION'#10'WHERE CODIGO = '#39'PATH_PROYECTOS_N' +
+              'UEVO'#39
             StatementType = stSQL
             ColumnMappings = <
               item
@@ -113,7 +115,9 @@ object srvConfiguracion: TsrvConfiguracion
           item
             Connection = 'IBX'
             TargetTable = 'INTERVALOS'
-            SQL = 'SELECT VALOR'#10'FROM CONFIGURACION'#10'WHERE CODIGO = '#39'PATH_NORMATIVAS_NUEVO'#39
+            SQL = 
+              'SELECT VALOR'#10'FROM CONFIGURACION'#10'WHERE CODIGO = '#39'PATH_NORMATIVAS_' +
+              'NUEVO'#39
             StatementType = stSQL
             ColumnMappings = <
               item

Servidor/srvLogin_Impl.dfm

@@ -1,7 +1,7 @@
 object srvLogin: TsrvLogin
   OldCreateOrder = True
-  Left = 445
+  Left = 447
-  Top = 271
+  Top = 145
   Height = 300
   Width = 300
   object DABINAdapter: TDABINAdapter

Servidor/uDataModuleServer.dfm

@@ -1,9 +1,8 @@
 object dmServer: TdmServer
   OldCreateOrder = False
   OnCreate = DataModuleCreate
-  Left = 607
+  Left = 608
-  Top = 150
+  Height = 362
-  Height = 365
   Width = 302
   object HTTPServer: TROIndyHTTPServer
     Encryption.UseCompression = True