inherited fDialogElegirEMail: TfDialogElegirEMail Caption = 'Elegir direcci'#243'n de correo electr'#243'nico' ClientHeight = 220 ClientWidth = 533 OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnDestroy = FormDestroy ExplicitWidth = 539 ExplicitHeight = 252 PixelsPerInch = 96 TextHeight = 13 inherited pnlBotones: TFlowPanel Top = 164 Width = 533 ExplicitTop = 164 ExplicitWidth = 533 inherited Button1: TButton Left = 437 ExplicitLeft = 437 end inherited Button2: TButton Left = 347 ExplicitLeft = 347 end end inherited FlowPanel1: TFlowPanel Width = 533 Height = 164 ExplicitWidth = 533 ExplicitHeight = 164 inherited lblInstruccion: TLabel Width = 411 Caption = 'Indique la direcci'#243'n de correo electr'#243'nico del destinatario:' ExplicitWidth = 411 end inherited Label2: TLabel Height = 3 Visible = False ExplicitHeight = 3 end object Panel1: TPanel Left = 31 Top = 73 Width = 482 Height = 80 Align = alClient BevelOuter = bvNone ParentColor = True TabOrder = 0 object rbCombo: TRadioButton Tag = 1 Left = 10 Top = 6 Width = 170 Height = 17 Caption = 'Usar esta direcci'#243'n de correo:' TabOrder = 0 OnClick = rbComboClick end object cbEMail: TComboBox Left = 211 Top = 6 Width = 262 Height = 21 Style = csDropDownList ItemHeight = 0 TabOrder = 1 end object rbEdit: TRadioButton Tag = 2 Left = 10 Top = 41 Width = 202 Height = 17 Caption = 'Usar la siguiente direcci'#243'n de correo:' TabOrder = 2 OnClick = rbEditClick end object edtEMail: TcxHyperLinkEdit Left = 211 Top = 39 Properties.UsePrefix = upNever Properties.ValidateOnEnter = True Properties.Prefix = '' Style.LookAndFeel.Kind = lfStandard Style.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.Kind = lfStandard StyleDisabled.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.Kind = lfStandard StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.Kind = lfStandard StyleHot.LookAndFeel.NativeStyle = True TabOrder = 3 Width = 262 end end end inherited ActionList1: TActionList Left = 8 Top = 8 inherited actAceptar: TAction OnExecute = actAceptarExecute end inherited actCancelar: TAction OnExecute = actCancelarExecute end end end