Acana_Interiorismo/FactuGES2
2
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Ficha de cliente: no se veia bien el apartado de tienda y vendedor (se cortaba por poco espacio).

Browse Source 
git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@108 f4e31baf-9722-1c47-927c-6f952f962d4b
This commit is contained in:
David Arranz 2008-01-15 16:55:18 +00:00
parent c080a2beea
commit 697793a4b4
1 changed files with 66 additions and 70 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

136
Source/Modulos/Contactos/Views/uViewCliente.dfm
View File

@ -11,20 +11,20 @@ inherited frViewCliente: TfrViewCliente
ExplicitWidth = 646 ExplicitWidth = 646
ExplicitHeight = 534 ExplicitHeight = 534
inherited PngSpeedButton1: TPngSpeedButton inherited PngSpeedButton1: TPngSpeedButton
Left = 601 Left = 584
ExplicitLeft = 601 ExplicitLeft = 584
end end
inherited PngSpeedButton2: TPngSpeedButton inherited PngSpeedButton2: TPngSpeedButton
Left = 601 Left = 584
ExplicitLeft = 601 ExplicitLeft = 584
end end
inherited PngSpeedButton3: TPngSpeedButton inherited PngSpeedButton3: TPngSpeedButton
Left = 601 Left = 584
ExplicitLeft = 601 ExplicitLeft = 584
end end
object Label1: TLabel [3] object Label1: TLabel [3]
Left = 308 Left = 333
Top = 358 Top = 385
Width = 269 Width = 269
Height = 39 Height = 39
Margins.Bottom = 0 Margins.Bottom = 0
@ -35,42 +35,36 @@ inherited frViewCliente: TfrViewCliente
end end
inherited eCalle: TcxDBTextEdit inherited eCalle: TcxDBTextEdit
Left = 132 Left = 132
Top = 265 Top = 292
TabOrder = 8 TabOrder = 8
ExplicitLeft = 132 ExplicitLeft = 132
ExplicitTop = 265 ExplicitTop = 292
ExplicitWidth = 181
Width = 181
end end
inherited eProvincia: TcxDBTextEdit inherited eProvincia: TcxDBTextEdit
Left = 132 Left = 132
Top = 319 Top = 346
TabOrder = 11 TabOrder = 11
ExplicitLeft = 132 ExplicitLeft = 132
ExplicitTop = 319 ExplicitTop = 346
ExplicitWidth = 133
Width = 133
end end
inherited ePoblacion: TcxDBTextEdit inherited ePoblacion: TcxDBTextEdit
Left = 132 Left = 132
Top = 292 Top = 319
TabOrder = 9 TabOrder = 9
ExplicitLeft = 132 ExplicitLeft = 132
ExplicitTop = 292 ExplicitTop = 319
ExplicitWidth = 111
Width = 111
end end
inherited eCodigoPostal: TcxDBTextEdit inherited eCodigoPostal: TcxDBTextEdit
Left = 213 Left = 238
Top = 292 Top = 319
TabOrder = 10 TabOrder = 10
ExplicitLeft = 213 ExplicitLeft = 238
ExplicitTop = 292 ExplicitTop = 319
end end
inherited eObservaciones: TcxDBMemo inherited eObservaciones: TcxDBMemo
Top = 460 Top = 487
TabOrder = 23 TabOrder = 23
ExplicitTop = 460 ExplicitTop = 487
ExplicitWidth = 609 ExplicitWidth = 609
ExplicitHeight = 42 ExplicitHeight = 42
Height = 42 Height = 42
@ -98,7 +92,7 @@ inherited frViewCliente: TfrViewCliente
end end
object cbClienteBloqueado: TcxDBCheckBox [10] object cbClienteBloqueado: TcxDBCheckBox [10]
Left = 22 Left = 22
Top = 376 Top = 403
Action = actBloqueoCliente Action = actBloqueoCliente
DataBinding.DataField = 'BLOQUEADO' DataBinding.DataField = 'BLOQUEADO'
DataBinding.DataSource = dsContacto DataBinding.DataSource = dsContacto
@ -146,7 +140,7 @@ inherited frViewCliente: TfrViewCliente
end end
object eBloqueo: TcxDBTextEdit [12] object eBloqueo: TcxDBTextEdit [12]
Left = 132 Left = 132
Top = 403 Top = 430
DataBinding.DataField = 'MOTIVO_BLOQUEO' DataBinding.DataField = 'MOTIVO_BLOQUEO'
DataBinding.DataSource = dsContacto DataBinding.DataSource = dsContacto
Style.BorderColor = clWindowFrame Style.BorderColor = clWindowFrame
@ -164,8 +158,8 @@ inherited frViewCliente: TfrViewCliente
Width = 113 Width = 113
end end
object cxDBCheckBox1: TcxDBCheckBox [13] object cxDBCheckBox1: TcxDBCheckBox [13]
Left = 308 Left = 333
Top = 403 Top = 430
Caption = 'Permitir el acceso de este cliente a la tienda web' Caption = 'Permitir el acceso de este cliente a la tienda web'
DataBinding.DataField = 'TIENDA_WEB' DataBinding.DataField = 'TIENDA_WEB'
DataBinding.DataSource = dsContacto DataBinding.DataSource = dsContacto
@ -208,21 +202,7 @@ inherited frViewCliente: TfrViewCliente
TabOrder = 4 TabOrder = 4
Width = 227 Width = 227
end end
inherited eTlfParticular: TcxDBTextEdit object cbProcedenciaCliente: TcxDBComboBox [15]
Left = 403
TabOrder = 15
ExplicitLeft = 403
ExplicitWidth = 233
Width = 233
end
inherited eTlfTrabajo: TcxDBTextEdit
Left = 403
TabOrder = 14
ExplicitLeft = 403
ExplicitWidth = 233
Width = 233
end
object cbProcedenciaCliente: TcxDBComboBox [17]
Left = 132 Left = 132
Top = 163 Top = 163
DataBinding.DataField = 'PROCEDENCIA_CLIENTE' DataBinding.DataField = 'PROCEDENCIA_CLIENTE'
@ -246,17 +226,31 @@ inherited frViewCliente: TfrViewCliente
TabOrder = 6 TabOrder = 6
Width = 211 Width = 211
end end
inherited eTlfParticular: TcxDBTextEdit
Left = 428
TabOrder = 15
ExplicitLeft = 428
ExplicitWidth = 233
Width = 233
end
inherited eTlfTrabajo: TcxDBTextEdit
Left = 428
TabOrder = 14
ExplicitLeft = 428
ExplicitWidth = 233
Width = 233
end
inherited eTlfMovil: TcxDBTextEdit inherited eTlfMovil: TcxDBTextEdit
Left = 403 Left = 428
TabOrder = 16 TabOrder = 16
ExplicitLeft = 403 ExplicitLeft = 428
ExplicitWidth = 233 ExplicitWidth = 233
Width = 233 Width = 233
end end
inherited eFax: TcxDBTextEdit inherited eFax: TcxDBTextEdit
Left = 403 Left = 428
TabOrder = 17 TabOrder = 17
ExplicitLeft = 403 ExplicitLeft = 428
ExplicitWidth = 233 ExplicitWidth = 233
Width = 233 Width = 233
end end
@ -267,61 +261,63 @@ inherited frViewCliente: TfrViewCliente
Width = 135 Width = 135
end end
inherited eNIFCIF: TcxDBTextEdit inherited eNIFCIF: TcxDBTextEdit
Left = 221 Left = 232
ExplicitLeft = 221 ExplicitLeft = 232
ExplicitWidth = 59 ExplicitWidth = 59
Width = 59 Width = 59
end end
inherited eMailTrabajo: TcxDBHyperLinkEdit inherited eMailTrabajo: TcxDBHyperLinkEdit
Left = 403 Left = 428
Properties.Prefix = 'mailto:' Properties.Prefix = 'mailto:'
TabOrder = 18 TabOrder = 18
ExplicitLeft = 403 ExplicitLeft = 428
ExplicitWidth = 204 ExplicitWidth = 204
Width = 204 Width = 204
end end
inherited eMailParticular: TcxDBHyperLinkEdit inherited eMailParticular: TcxDBHyperLinkEdit
Left = 403 Left = 428
Properties.Prefix = 'mailto:' Properties.Prefix = 'mailto:'
TabOrder = 19 TabOrder = 19
ExplicitLeft = 403 ExplicitLeft = 428
ExplicitWidth = 204 ExplicitWidth = 204
Width = 204 Width = 204
end end
inherited ePaginaWeb: TcxDBHyperLinkEdit inherited ePaginaWeb: TcxDBHyperLinkEdit
Left = 403 Left = 428
TabOrder = 20 TabOrder = 20
ExplicitLeft = 403 ExplicitLeft = 428
ExplicitWidth = 204 ExplicitWidth = 204
Width = 204 Width = 204
end end
inherited eReferencia: TcxDBTextEdit inherited eReferencia: TcxDBTextEdit
Left = 132 Left = 132
ExplicitLeft = 132 ExplicitLeft = 132
ExplicitWidth = 38
Width = 38
end end
inherited ePersonaContacto: TcxDBTextEdit inherited ePersonaContacto: TcxDBTextEdit
Left = 132 Left = 132
Top = 238 Top = 265
TabOrder = 7 TabOrder = 7
ExplicitLeft = 132 ExplicitLeft = 132
ExplicitTop = 238 ExplicitTop = 265
ExplicitWidth = 256
Width = 256
end end
inherited frViewTienda1: TfrViewTienda inherited frViewTienda1: TfrViewTienda
Left = 308 Left = 333
Width = 451 Width = 274
Height = 69
AutoSize = True
TabOrder = 21 TabOrder = 21
ExplicitLeft = 308 ExplicitLeft = 333
ExplicitWidth = 451 ExplicitWidth = 274
ExplicitHeight = 69
inherited dxLayoutControl1: TdxLayoutControl inherited dxLayoutControl1: TdxLayoutControl
Width = 451 Width = 274
Height = 69
inherited cbTienda: TcxDBComboBox inherited cbTienda: TcxDBComboBox
DataBinding.DataSource = dsContacto DataBinding.DataSource = dsContacto
ExplicitWidth = 412 end
Width = 412 inherited cbVendedor: TcxDBLookupComboBox
ExplicitWidth = 376
Width = 376
end end
end end
end end