object dlgSelectClientesEmail: TdlgSelectClientesEmail
  Left = 0
  Top = 0
  Caption = 'Env'#237'o por Email de Tarifas de Precios a Clientes'
  ClientHeight = 580
  ClientWidth = 720
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = 'Segoe UI'
  Font.Style = []
  Position = poOwnerFormCenter
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 15
  object pnlMain: TPanel
    Left = 0
    Top = 0
    Width = 720
    Height = 580
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 0
    object pnlHeader: TPanel
      Left = 0
      Top = 0
      Width = 720
      Height = 60
      Align = alTop
      BevelOuter = bvNone
      Padding.Left = 16
      Padding.Top = 10
      Padding.Right = 16
      Padding.Bottom = 10
      TabOrder = 0
      object lblTitulo: TLabel
        Left = 16
        Top = 10
        Width = 688
        Height = 21
        Align = alTop
        Caption = 'Env'#237'o de Tarifa de Precios por Correo Electr'#243'nico'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = 'Segoe UI'
        Font.Style = [fsBold]
        ParentFont = False
        ExplicitWidth = 356
      end
      object lblGrupoInfo: TLabel
        Left = 16
        Top = 33
        Width = 688
        Height = 17
        Align = alBottom
        Caption = 'Grupo de Clientes: [Nombre del Grupo] - Seleccione los destinatarios:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = 2263842
        Font.Height = -13
        Font.Name = 'Segoe UI'
        Font.Style = [fsBold]
        ParentFont = False
        ExplicitWidth = 405
      end
    end
    object pnlConfig: TPanel
      Left = 0
      Top = 60
      Width = 720
      Height = 135
      Align = alTop
      BevelOuter = bvNone
      Padding.Left = 16
      Padding.Right = 16
      Padding.Bottom = 6
      TabOrder = 1
      object gbConfigEnvio: TGroupBox
        Left = 16
        Top = 0
        Width = 688
        Height = 129
        Align = alClient
        Caption = ' Datos del Correo y Remitente '
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'Segoe UI'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 0
        object lblCuenta: TLabel
          Left = 14
          Top = 24
          Width = 86
          Height = 15
          Caption = 'Cuenta Remit.:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'Segoe UI'
          Font.Style = []
          ParentFont = False
        end
        object lblAsunto: TLabel
          Left = 14
          Top = 54
          Width = 40
          Height = 15
          Caption = 'Asunto:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'Segoe UI'
          Font.Style = []
          ParentFont = False
        end
        object lblMensaje: TLabel
          Left = 14
          Top = 84
          Width = 47
          Height = 15
          Caption = 'Mensaje:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'Segoe UI'
          Font.Style = []
          ParentFont = False
        end
        object lblCopia: TLabel
          Left = 370
          Top = 24
          Width = 68
          Height = 15
          Caption = 'Copia (BCC):'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'Segoe UI'
          Font.Style = []
          ParentFont = False
        end
        object cboCuentasEnvio: TComboBox
          Left = 106
          Top = 21
          Width = 248
          Height = 23
          Style = csDropDownList
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'Segoe UI'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
          OnChange = cboCuentasEnvioChange
        end
        object edtEmailCopia: TEdit
          Left = 444
          Top = 21
          Width = 230
          Height = 23
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'Segoe UI'
          Font.Style = []
          ParentFont = False
          TabOrder = 1
        end
        object edtAsunto: TEdit
          Left = 106
          Top = 51
          Width = 568
          Height = 23
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'Segoe UI'
          Font.Style = []
          ParentFont = False
          TabOrder = 2
        end
        object edtMensajePreview: TEdit
          Left = 106
          Top = 81
          Width = 568
          Height = 23
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'Segoe UI'
          Font.Style = []
          ParentFont = False
          TabOrder = 3
        end
      end
    end
    object pnlClientList: TPanel
      Left = 0
      Top = 195
      Width = 720
      Height = 315
      Align = alClient
      BevelOuter = bvNone
      Padding.Left = 16
      Padding.Right = 16
      TabOrder = 2
      object gbClientes: TGroupBox
        Left = 16
        Top = 0
        Width = 688
        Height = 315
        Align = alClient
        Caption = ' Clientes del Grupo (Marque los destinatarios del env'#237'o individual) '
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'Segoe UI'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 0
        object pnlListToolbar: TPanel
          Left = 2
          Top = 18
          Width = 684
          Height = 34
          Align = alTop
          BevelOuter = bvNone
          TabOrder = 0
          object lblContador: TLabel
            Left = 240
            Top = 9
            Width = 320
            Height = 15
            Caption = '0 clientes seleccionados'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clGray
            Font.Height = -12
            Font.Name = 'Segoe UI'
            Font.Style = [fsBold]
            ParentFont = False
          end
          object btnMarcarTodos: TBitBtn
            Left = 10
            Top = 4
            Width = 105
            Height = 26
            Caption = 'Marcar Todos'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Segoe UI'
            Font.Style = []
            ParentFont = False
            TabOrder = 0
            OnClick = btnMarcarTodosClick
          end
          object btnDesmarcarTodos: TBitBtn
            Left = 120
            Top = 4
            Width = 110
            Height = 26
            Caption = 'Desmarcar Todos'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Segoe UI'
            Font.Style = []
            ParentFont = False
            TabOrder = 1
            OnClick = btnDesmarcarTodosClick
          end
        end
        object lvClientes: TListView
          Left = 2
          Top = 52
          Width = 684
          Height = 261
          Align = alClient
          Checkboxes = True
          Columns = <
            item
              Caption = 'Cliente / Raz'#243'n Social'
              Width = 230
            end
            item
              Caption = 'Nombre Comercial'
              Width = 150
            end
            item
              Caption = 'NIF / CIF'
              Width = 85
            end
            item
              Caption = 'Correo Electr'#243'nico'
              Width = 200
            end
            item
              Caption = 'Estado'
              Width = 70
            end>
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'Segoe UI'
          Font.Style = []
          GridLines = True
          RowSelect = True
          ParentFont = False
          TabOrder = 1
          ViewStyle = vsReport
          OnItemChecked = lvClientesItemChecked
        end
      end
    end
    object pnlBottom: TPanel
      Left = 0
      Top = 510
      Width = 720
      Height = 70
      Align = alBottom
      BevelOuter = bvNone
      Padding.Left = 16
      Padding.Top = 6
      Padding.Right = 16
      Padding.Bottom = 10
      TabOrder = 3
      object lblProgreso: TLabel
        Left = 16
        Top = 6
        Width = 688
        Height = 15
        Align = alTop
        Caption = 'Preparado para el env'#237'o...'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Segoe UI'
        Font.Style = [fsItalic]
        ParentFont = False
        Visible = False
        ExplicitWidth = 135
      end
      object pbProgreso: TProgressBar
        Left = 16
        Top = 22
        Width = 350
        Height = 16
        TabOrder = 0
        Visible = False
      end
      object btnEnviar: TBitBtn
        Left = 380
        Top = 15
        Width = 200
        Height = 35
        Caption = 'Enviar Correos Individuales'
        Default = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'Segoe UI'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 1
        OnClick = btnEnviarClick
      end
      object btnCancelar: TBitBtn
        Left = 590
        Top = 15
        Width = 110
        Height = 35
        Cancel = True
        Caption = 'Cancelar'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'Segoe UI'
        Font.Style = []
        ModalResult = 2
        ParentFont = False
        TabOrder = 2
        OnClick = btnCancelarClick
      end
    end
  end
end