inherited frmConfigEnvioEditor: TfrmConfigEnvioEditor
  Caption = 'Configuraci'#243'n de Cuenta de Correo y Perfil de Env'#237'o'
  ClientHeight = 580
  ClientWidth = 840
  OnShow = FormShow
  ExplicitWidth = 856
  ExplicitHeight = 619
  PixelsPerInch = 96
  TextHeight = 16
  inherited pnlToolbar: TPanel
    Width = 840
    ExplicitWidth = 840
    inherited btnBuscar: TBitBtn
      Visible = False
    end
    inherited btnImprimir: TBitBtn
      Visible = False
    end
    inherited btnIA: TBitBtn
      Visible = False
    end
    inherited btnDuplicar: TBitBtn
      Visible = False
    end
    inherited btnRect: TBitBtn
      Visible = False
    end
    inherited btnAyuda: TBitBtn
      Left = 730
      ExplicitLeft = 730
    end
    inherited btnSalir: TBitBtn
      Left = 785
      ExplicitLeft = 785
    end
  end
  inherited pnlMain: TPanel
    Width = 840
    Height = 450
    ExplicitWidth = 840
    ExplicitHeight = 450
    inherited pgcDetails: TPageControl
      Width = 840
      Height = 450
      ActivePage = tsDatosEnvio
      ExplicitWidth = 840
      ExplicitHeight = 450
      inherited tsDatosEnvio: TTabSheet
        Caption = 'Servidor y Cuenta SMTP'
        ExplicitWidth = 832
        ExplicitHeight = 421
        inherited dbgItems: TDBGrid
          Visible = False
        end
        inherited pnlSideToolbar: TPanel
          Visible = False
        end
        inherited pnlHeader: TPanel
          Width = 832
          Height = 421
          Align = alClient
          ExplicitWidth = 832
          ExplicitHeight = 421
          object lblEmpresa: TLabel
            Left = 20
            Top = 12
            Width = 47
            Height = 15
            Caption = 'Empresa:'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = 'Segoe UI'
            Font.Style = [fsBold]
            ParentFont = False
          end
          object lblNombrePerfil: TLabel
            Left = 340
            Top = 12
            Width = 99
            Height = 15
            Caption = 'Nombre del Perfil:'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = 'Segoe UI'
            Font.Style = [fsBold]
            ParentFont = False
          end
          object cbEmpresa: TComboBox
            Left = 20
            Top = 32
            Width = 300
            Height = 24
            Style = csDropDownList
            TabOrder = 0
          end
          object edtNombrePerfil: TEdit
            Left = 340
            Top = 32
            Width = 330
            Height = 24
            TabOrder = 1
          end
          object chkActivo: TCheckBox
            Left = 690
            Top = 34
            Width = 120
            Height = 20
            Caption = 'Perfil Activo'
            Checked = True
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = 'Segoe UI'
            Font.Style = [fsBold]
            ParentFont = False
            State = cbChecked
            TabOrder = 2
          end
          object grpSmtp: TGroupBox
            Left = 20
            Top = 70
            Width = 790
            Height = 335
            Caption = ' Par'#225'metros de Conexi'#243'n SMTP '
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = 'Segoe UI'
            Font.Style = [fsBold]
            ParentFont = False
            TabOrder = 3
            object lblProveedor: TLabel
              Left = 20
              Top = 28
              Width = 145
              Height = 15
              Caption = 'Proveedor Preconfigurado:'
              Font.Style = []
            end
            object lblSmtpHost: TLabel
              Left = 20
              Top = 85
              Width = 105
              Height = 15
              Caption = 'Servidor SMTP (Host):'
              Font.Style = []
            end
            object lblSmtpPuerto: TLabel
              Left = 350
              Top = 85
              Width = 38
              Height = 15
              Caption = 'Puerto:'
              Font.Style = []
            end
            object lblSmtpUsuario: TLabel
              Left = 20
              Top = 145
              Width = 145
              Height = 15
              Caption = 'Correo / Usuario Remitente:'
              Font.Style = []
            end
            object lblSmtpPassword: TLabel
              Left = 350
              Top = 145
              Width = 141
              Height = 15
              Caption = 'Contrase'#241'a / App Password:'
              Font.Style = []
            end
            object lblSmtpNombre: TLabel
              Left = 20
              Top = 205
              Width = 135
              Height = 15
              Caption = 'Nombre Visible Remitente:'
              Font.Style = []
            end
            object lblProbadoInfo: TLabel
              Left = 250
              Top = 280
              Width = 250
              Height = 15
              Caption = 'Estado: Sin verificar'
              Font.Style = [fsItalic]
            end
            object cbProveedor: TComboBox
              Left = 20
              Top = 48
              Width = 300
              Height = 24
              Style = csDropDownList
              Font.Style = []
              ParentFont = False
              TabOrder = 0
              OnChange = cbProveedorChange
            end
            object edtSmtpHost: TEdit
              Left = 20
              Top = 105
              Width = 300
              Height = 24
              Font.Style = []
              ParentFont = False
              TabOrder = 1
            end
            object edtSmtpPuerto: TEdit
              Left = 350
              Top = 105
              Width = 80
              Height = 24
              Font.Style = []
              ParentFont = False
              TabOrder = 2
              Text = '587'
            end
            object chkSmtpSSL: TCheckBox
              Left = 460
              Top = 107
              Width = 220
              Height = 20
              Caption = 'Usar Conexi'#243'n Segura (SSL/TLS)'
              Checked = True
              Font.Style = []
              ParentFont = False
              State = cbChecked
              TabOrder = 3
            end
            object edtSmtpUsuario: TEdit
              Left = 20
              Top = 165
              Width = 300
              Height = 24
              Font.Style = []
              ParentFont = False
              TabOrder = 4
            end
            object edtSmtpPassword: TEdit
              Left = 350
              Top = 165
              Width = 300
              Height = 24
              Font.Style = []
              ParentFont = False
              PasswordChar = '*'
              TabOrder = 5
            end
            object edtSmtpNombre: TEdit
              Left = 20
              Top = 225
              Width = 300
              Height = 24
              Font.Style = []
              ParentFont = False
              TabOrder = 6
            end
            object btnProbarSmtp: TBitBtn
              Left = 20
              Top = 270
              Width = 210
              Height = 38
              Caption = '  Probar Conexi'#243'n SMTP'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clNavy
              Font.Height = -12
              Font.Name = 'Segoe UI'
              Font.Style = [fsBold]
              ImageIndex = 149
              Images = dmgMain.imgListRibbon
              ParentFont = False
              TabOrder = 7
              OnClick = btnProbarSmtpClick
            end
          end
        end
      end
      object tsPlantillas: TTabSheet
        Caption = 'Plantillas de Mensaje'
        object pnlTplContent: TPanel
          Left = 0
          Top = 0
          Width = 832
          Height = 421
          Align = alClient
          BevelOuter = bvNone
          TabOrder = 0
          object lblTplAsunto: TLabel
            Left = 20
            Top = 15
            Width = 127
            Height = 15
            Caption = 'Asunto Predeterminado:'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = 'Segoe UI'
            Font.Style = [fsBold]
            ParentFont = False
          end
          object lblTplCuerpo: TLabel
            Left = 20
            Top = 75
            Width = 126
            Height = 15
            Caption = 'Cuerpo Predeterminado:'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = 'Segoe UI'
            Font.Style = [fsBold]
            ParentFont = False
          end
          object lblTagsAyuda: TLabel
            Left = 20
            Top = 380
            Width = 540
            Height = 15
            Caption = 'Etiquetas disponibles: {empresa}, {documento}, {fecha}, {nombre}, {total}, {enlace}'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clGray
            Font.Height = -12
            Font.Name = 'Segoe UI'
            Font.Style = [fsItalic]
            ParentFont = False
          end
          object edtTplAsunto: TEdit
            Left = 20
            Top = 35
            Width = 790
            Height = 24
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = 'Segoe UI'
            Font.Style = []
            ParentFont = False
            TabOrder = 0
          end
          object memTplCuerpo: TMemo
            Left = 20
            Top = 95
            Width = 790
            Height = 270
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = 'Segoe UI'
            Font.Style = []
            ParentFont = False
            ScrollBars = ssVertical
            TabOrder = 1
          end
          object btnConvertirTplHtml: TBitBtn
            Tag = 999
            Left = 600
            Top = 65
            Width = 210
            Height = 26
            Caption = ' Convertir a Formato HTML'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Segoe UI'
            Font.Style = [fsBold]
            ImageIndex = 143
            Images = dmgMain.imgListRibbon
            ParentFont = False
            TabOrder = 2
            OnClick = btnConvertirTplHtmlClick
          end
        end
      end
      object tsFirma: TTabSheet
        Caption = 'Firma de Correo (HTML)'
        object pnlFirmaContent: TPanel
          Left = 0
          Top = 0
          Width = 832
          Height = 421
          Align = alClient
          BevelOuter = bvNone
          TabOrder = 0
          object pnlFirmaTools: TPanel
            Left = 0
            Top = 0
            Width = 832
            Height = 45
            Align = alTop
            BevelOuter = bvNone
            TabOrder = 0
            object btnInsertarImagen: TBitBtn
              Left = 20
              Top = 6
              Width = 190
              Height = 32
              Caption = ' Insertar Imagen (Base64)'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -12
              Font.Name = 'Segoe UI'
              Font.Style = [fsBold]
              ImageIndex = 142
              Images = dmgMain.imgListRibbon
              ParentFont = False
              TabOrder = 0
              OnClick = btnInsertarImagenClick
            end
            object btnVistaPreviaFirma: TBitBtn
              Left = 220
              Top = 6
              Width = 200
              Height = 32
              Caption = ' Vista Previa en Navegador'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -12
              Font.Name = 'Segoe UI'
              Font.Style = [fsBold]
              ImageIndex = 149
              Images = dmgMain.imgListRibbon
              ParentFont = False
              TabOrder = 1
              OnClick = btnVistaPreviaFirmaClick
            end
            object btnConvertirFirmaHtml: TBitBtn
              Tag = 999
              Left = 430
              Top = 6
              Width = 210
              Height = 32
              Caption = ' Convertir a Formato HTML'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -12
              Font.Name = 'Segoe UI'
              Font.Style = [fsBold]
              ImageIndex = 143
              Images = dmgMain.imgListRibbon
              ParentFont = False
              TabOrder = 2
              OnClick = btnConvertirFirmaHtmlClick
            end
          end
          object grpFirmaHtml: TGroupBox
            Left = 20
            Top = 50
            Width = 790
            Height = 355
            Caption = ' C'#243'digo HTML de la Firma '
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = 'Segoe UI'
            Font.Style = [fsBold]
            ParentFont = False
            TabOrder = 1
            object memFirmaHtml: TMemo
              Left = 15
              Top = 25
              Width = 760
              Height = 315
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -12
              Font.Name = 'Consolas'
              Font.Style = []
              ParentFont = False
              ScrollBars = ssVertical
              TabOrder = 0
            end
          end
        end
      end
      object tsCanalesMoviles: TTabSheet
        Caption = 'WhatsApp / Telegram'
        object pnlMovilContent: TPanel
          Left = 0
          Top = 0
          Width = 832
          Height = 421
          Align = alClient
          BevelOuter = bvNone
          TabOrder = 0
          object grpWhatsApp: TGroupBox
            Left = 20
            Top = 15
            Width = 790
            Height = 220
            Caption = ' Configuraci'#243'n de WhatsApp '
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = 'Segoe UI'
            Font.Style = [fsBold]
            ParentFont = False
            TabOrder = 0
            object lblWaModo: TLabel
              Left = 20
              Top = 28
              Width = 87
              Height = 15
              Caption = 'Modo de Env'#237'o:'
              Font.Style = []
            end
            object lblWaTelefono: TLabel
              Left = 320
              Top = 28
              Width = 145
              Height = 15
              Caption = 'Tel'#233'fono Remitente (+34...):'
              Font.Style = []
            end
            object lblWaApiKey: TLabel
              Left = 520
              Top = 28
              Width = 146
              Height = 15
              Caption = 'API Key (CallMeBot / API):'
              Font.Style = []
            end
            object lblTplWa: TLabel
              Left = 20
              Top = 85
              Width = 168
              Height = 15
              Caption = 'Plantilla de Mensaje WhatsApp:'
              Font.Style = []
            end
            object cbWaModo: TComboBox
              Left = 20
              Top = 48
              Width = 280
              Height = 24
              Style = csDropDownList
              Font.Style = []
              ItemIndex = 0
              ParentFont = False
              TabOrder = 0
              Text = 'WhatsApp Web / Desktop (Directo)'
              Items.Strings = (
                'WhatsApp Web / Desktop (Directo)'
                'CallMeBot API (Env'#237'o Autom'#225'tico)')
            end
            object edtWaTelefono: TEdit
              Left = 320
              Top = 48
              Width = 180
              Height = 24
              Font.Style = []
              ParentFont = False
              TabOrder = 1
            end
            object edtWaApiKey: TEdit
              Left = 520
              Top = 48
              Width = 240
              Height = 24
              Font.Style = []
              ParentFont = False
              TabOrder = 2
            end
            object memTplWa: TMemo
              Left = 20
              Top = 105
              Width = 740
              Height = 95
              Font.Style = []
              ParentFont = False
              ScrollBars = ssVertical
              TabOrder = 3
            end
          end
          object grpTelegram: TGroupBox
            Left = 20
            Top = 245
            Width = 790
            Height = 160
            Caption = ' Canal de Notificaciones Telegram '
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = 'Segoe UI'
            Font.Style = [fsBold]
            ParentFont = False
            TabOrder = 1
            object lblTelegramInfo: TLabel
              Left = 20
              Top = 30
              Width = 740
              Height = 45
              AutoSize = False
              Caption = 
                'Integraci'#243'n oficial con Telegram Bot API (100% gratuita y sin l'#237'mites). ' +
                'Permite el env'#237'o instant'#225'neo de PDFs de facturas, albaranes y presupuestos ' +
                'directamente a grupos o clientes mediante Bot Token y Chat ID.'
              Font.Color = clGray
              Font.Style = [fsItalic]
            end
            object lblTgToken: TLabel
              Left = 20
              Top = 85
              Width = 91
              Height = 15
              Caption = 'Bot Token (API):'
              Font.Style = []
            end
            object lblTgChatId: TLabel
              Left = 450
              Top = 85
              Width = 109
              Height = 15
              Caption = 'Chat ID de Destino:'
              Font.Style = []
            end
            object edtTgToken: TEdit
              Left = 20
              Top = 105
              Width = 410
              Height = 24
              Font.Style = []
              ParentFont = False
              TabOrder = 0
            end
            object edtTgChatId: TEdit
              Left = 450
              Top = 105
              Width = 310
              Height = 24
              Font.Style = []
              ParentFont = False
              TabOrder = 1
            end
          end
        end
      end
    end
  end
  inherited pnlFooter: TPanel
    Top = 515
    Width = 840
    Visible = False
    ExplicitTop = 515
    ExplicitWidth = 840
  end
  object odImagenFirma: TOpenDialog
    Filter = 'Im'#225'genes (*.png;*.jpg;*.jpeg;*.gif;*.bmp;*.svg)|*.png;*.jpg;*.jpeg;*.gif;*.bmp;*.svg|Todos los archivos (*.*)|*.*'
    Title = 'Seleccionar imagen para la firma de correo'
    Left = 740
    Top = 120
  end
end
