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

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

View File

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