object fEditorElegirDireccionEntrega: TfEditorElegirDireccionEntrega Left = 227 Top = 108 BorderStyle = bsDialog Caption = 'Elegir una direcciones de entrega' ClientHeight = 383 ClientWidth = 599 Color = clBtnFace ParentFont = True OldCreateOrder = True Position = poOwnerFormCenter PixelsPerInch = 96 TextHeight = 13 object JvgWizardHeader1: TJvgWizardHeader Left = 0 Top = 0 Width = 599 Height = 60 CaptionFont.Charset = DEFAULT_CHARSET CaptionFont.Color = clWindowText CaptionFont.Height = -11 CaptionFont.Name = 'Tahoma' CaptionFont.Style = [fsBold] CommentFont.Charset = DEFAULT_CHARSET CommentFont.Color = clWindowText CommentFont.Height = -11 CommentFont.Name = 'Tahoma' CommentFont.Style = [] SymbolFont.Charset = DEFAULT_CHARSET SymbolFont.Color = clHighlightText SymbolFont.Height = -35 SymbolFont.Name = 'Wingdings' SymbolFont.Style = [fsBold] Captions.Strings = ( 'Seleccione una direcci'#243'n del cliente') Comments.Strings = ( 'Seleccione la direcci'#243'n del cliente que quiere utilizar como dir' + 'ecci'#243'n de envio.') Gradient.FromColor = clHighlight Gradient.ToColor = clWindow Gradient.Active = False Gradient.Orientation = fgdVertical BufferedDraw = False ExplicitLeft = -57 ExplicitTop = 27 ExplicitWidth = 656 end inline frViewBarraSeleccion1: TfrViewBarraSeleccion Left = 0 Top = 334 Width = 599 Height = 49 Align = alBottom Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 0 ReadOnly = False ExplicitTop = 335 ExplicitWidth = 599 inherited JvFooter1: TJvFooter Width = 599 ExplicitWidth = 599 inherited bSeleccionar: TJvFooterBtn Left = 387 ExplicitLeft = 387 end inherited bCancelar: TJvFooterBtn Left = 491 ExplicitLeft = 491 end end inherited BarraSeleccionActionList: TActionList Top = 11 inherited actSeleccionar: TAction OnExecute = frViewBarraSeleccion1actSeleccionarExecute end inherited actCancelar: TAction OnExecute = frViewBarraSeleccion1actCancelarExecute end end end object DBCtrlGrid1: TDBCtrlGrid Left = 8 Top = 66 Width = 583 Height = 263 Margins.Left = 10 Margins.Top = 10 Margins.Right = 10 Margins.Bottom = 0 AllowDelete = False AllowInsert = False DataSource = dsDirecciones PanelHeight = 87 PanelWidth = 566 ParentColor = False TabOrder = 1 SelectedColor = clHighlight OnDblClick = DBCtrlGrid1DblClick object eCalle: TDBText Left = 48 Top = 28 Width = 512 Height = 17 DataField = 'CALLE' DataSource = dsDirecciones Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False Transparent = True end object ePoblacion: TDBText Left = 70 Top = 47 Width = 277 Height = 17 DataField = 'POBLACION' DataSource = dsDirecciones Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False Transparent = True end object eTelefono: TDBText Left = 423 Top = 66 Width = 137 Height = 17 DataField = 'TELEFONO' DataSource = dsDirecciones Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False Transparent = True end object eProvincia: TDBText Left = 423 Top = 47 Width = 137 Height = 17 DataField = 'PROVINCIA' DataSource = dsDirecciones Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False Transparent = True end object ePersonaContacto: TDBText Left = 124 Top = 66 Width = 284 Height = 17 DataField = 'PERSONA_CONTACTO' DataSource = dsDirecciones Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False Transparent = True end object eNombre: TDBText Left = 8 Top = 7 Width = 345 Height = 17 DataField = 'NOMBRE' DataSource = dsDirecciones Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False Transparent = True end object eCodigoPostal: TDBText Left = 353 Top = 47 Width = 64 Height = 17 DataField = 'CODIGO_POSTAL' DataSource = dsDirecciones Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False Transparent = True end object Label1: TLabel Left = 15 Top = 28 Width = 27 Height = 13 Caption = 'Calle:' end object Label2: TLabel Left = 15 Top = 47 Width = 49 Height = 13 Caption = 'Poblaci'#243'n:' end object Label3: TLabel Left = 447 Top = 7 Width = 30 Height = 13 Caption = 'Porte:' end object ePorte: TDBText Left = 483 Top = 7 Width = 70 Height = 17 DataField = 'PORTE' DataSource = dsDirecciones Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False Transparent = True end object Label4: TLabel Left = 15 Top = 66 Width = 103 Height = 13 Caption = 'Persona de contacto:' end end object dsDirecciones: TDADataSource Left = 24 Top = 286 end end