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
This commit is contained in:
roberto 2020-08-27 11:08:20 +00:00
parent f6a83992cc
commit 3ec67c371c
56 changed files with 2342 additions and 31 deletions

Binary file not shown.

Binary file not shown.

View File

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

View File

@ -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]

Binary file not shown.

View File

@ -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;

Binary file not shown.

Binary file not shown.

View File

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

View File

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

View File

@ -5,8 +5,8 @@ object srvFacturasCliente: TsrvFacturasCliente
ConnectionName = 'IBX'
ServiceSchema = schFacturasCliente
ServiceAdapter = DABINAdapter
Left = 567
Height = 446
Left = 568
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'

Binary file not shown.

View File

@ -5,8 +5,8 @@ object srvObras: TsrvObras
ConnectionName = 'IBX'
ServiceSchema = schObras
ServiceAdapter = DABINAdapter
Left = 514
Top = 271
Left = 516
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' +
'OIN CONTACTOS ON (OBRAS.CODIGOCONTACTO = CONTACTOS.CODIGO)'
'ONTACTO, CONTACTOS.NOMBRE as NOMBRECLIENTE, OBRAS.ALMACEN'#10' FROM' +
' OBRAS'#10' LEFT JOIN CONTACTOS ON (OBRAS.CODIGOCONTACTO = CONTACTO' +
'S.CODIGO)'
StatementType = stSQL
ColumnMappings = <
item
@ -343,7 +344,7 @@ object srvObras: TsrvObras
Lookup = False
LookupCache = False
end
item
item
Name = 'ALMACEN'
DataType = datString
Size = 1

Binary file not shown.

View File

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

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

File diff suppressed because it is too large Load Diff

Binary file not shown.

View File

@ -5,8 +5,8 @@ object srvConfiguracion: TsrvConfiguracion
ConnectionName = 'IBX'
ServiceSchema = schConfiguracion
ServiceAdapter = DABINAdapter
Left = 571
Top = 216
Left = 573
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

View File

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

View File

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