unit1.~dfm

Fontes e exemplos CALLER ID DELPHI

object FormTexto: TFormTexto
  Left = 336
  Top = 225
  Width = 521
  Height = 467
  AutoSize = True
  Caption = 'Gera Arquivo Texto'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Edit2: TEdit
    Left = 3
    Top = 65
    Width = 139
    Height = 21
    TabOrder = 2
    Visible = False
  end
  object btShow: TButton
    Left = 0
    Top = 0
    Width = 75
    Height = 25
    Caption = 'Show'
    TabOrder = 0
    OnClick = btShowClick
  end
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 513
    Height = 433
    TabOrder = 1
    object Label2: TLabel
      Left = 10
      Top = 76
      Width = 68
      Height = 13
      Caption = 'Digite a senha'
    end
    object Label1: TLabel
      Left = 232
      Top = 76
      Width = 109
      Height = 13
      Caption = 'Seu numero de registro'
      Visible = False
    end
    object Panel1: TPanel
      Left = 8
      Top = 13
      Width = 497
      Height = 47
      BevelInner = bvLowered
      TabOrder = 0
      object btDesativar: TButton
        Left = 242
        Top = 17
        Width = 82
        Height = 21
        Caption = 'Desativar'
        Enabled = False
        TabOrder = 0
        OnClick = btDesativarClick
      end
      object micDTMFBox1: TmicDTMFBox
        Left = 8
        Top = 17
        Width = 145
        Height = 21
        Color = clNavy
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clAqua
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ItemHeight = 13
        ParentFont = False
        TabOrder = 1
        TabStop = False
        Text = '0 (00) 0000-0000'
        a2DDDLocal = '00'
        a3RootPlugIn = 'N'#227'o informado'
        a4PlugInRegistry = 'DEMO31D'
        a5ClearAllDigits = '#'
        a6ModoOperac = micBinaDTMF
        a7ScreenRestore = False
        a8Sensibility = 8
        a9NotDetectTipo = False
        a3FormatPhone = micDTMFBox1a3FormatPhone
        a8MicAPIConect = micDTMFBox1a8MicAPIConect
      end
      object btAtive: TButton
        Left = 157
        Top = 17
        Width = 80
        Height = 21
        Caption = 'Ativar'
        TabOrder = 2
        OnClick = btAtiveClick
      end
      object btConfig: TButton
        Left = 344
        Top = 17
        Width = 142
        Height = 21
        Caption = 'Configurar detector DTMF'
        Enabled = False
        TabOrder = 3
        OnClick = btConfigClick
      end
    end
    object GroupBox1: TGroupBox
      Left = 9
      Top = 127
      Width = 497
      Height = 294
      Caption = ' Configura'#231#245'es gerais '
      TabOrder = 1
      Visible = False
      object Label5: TLabel
        Left = 12
        Top = 30
        Width = 53
        Height = 13
        Caption = 'DDD Local'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clMaroon
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label6: TLabel
        Left = 22
        Top = 144
        Width = 136
        Height = 13
        Caption = 'Arquivo .LOG das chamadas'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object GroupBox2: TGroupBox
        Left = 10
        Top = 52
        Width = 479
        Height = 85
        Caption = ' Arquivo texto '
        TabOrder = 0
        object Label3: TLabel
          Left = 13
          Top = 39
          Width = 143
          Height = 13
          Caption = 'Nome do arquivo a ser gerado'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clNavy
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object EditArq: TEdit
          Left = 11
          Top = 53
          Width = 371
          Height = 21
          TabOrder = 0
        end
        object Button6: TButton
          Left = 391
          Top = 53
          Width = 75
          Height = 21
          Caption = 'Gerar em...'
          TabOrder = 1
          OnClick = Button6Click
        end
        object CheckBox1: TCheckBox
          Left = 13
          Top = 19
          Width = 300
          Height = 17
          Caption = 'Gerar, tamb'#233'm, arquivo .LOG das chamadas recebidas'
          TabOrder = 2
        end
      end
      object btHide: TButton
        Left = 402
        Top = 260
        Width = 75
        Height = 21
        Caption = 'Ok'
        TabOrder = 1
        OnClick = btHideClick
      end
      object btSav: TButton
        Left = 401
        Top = 217
        Width = 75
        Height = 21
        Caption = 'Salvar'
        TabOrder = 2
        OnClick = btSavClick
      end
      object MemoBINA: TMemo
        Left = 30
        Top = 228
        Width = 332
        Height = 41
        ReadOnly = True
        TabOrder = 3
        Visible = False
      end
      object btClear: TButton
        Left = 401
        Top = 165
        Width = 75
        Height = 21
        Caption = 'Limpar'
        TabOrder = 4
        OnClick = btClearClick
      end
      object EditDDD: TEdit
        Left = 73
        Top = 26
        Width = 30
        Height = 21
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        MaxLength = 2
        ParentFont = False
        TabOrder = 5
        Text = '00'
      end
      object MemoLOG: TMemo
        Left = 22
        Top = 160
        Width = 371
        Height = 121
        Lines.Strings = (
          '')
        ScrollBars = ssVertical
        TabOrder = 6
      end
    end
    object Edit3: TEdit
      Left = 10
      Top = 91
      Width = 115
      Height = 21
      PasswordChar = '*'
      TabOrder = 2
      OnChange = Edit3Change
    end
    object Button5: TButton
      Left = 133
      Top = 91
      Width = 75
      Height = 21
      Caption = 'Trocar senha'
      Enabled = False
      TabOrder = 3
      OnClick = Button5Click
    end
    object Edit1: TEdit
      Left = 232
      Top = 91
      Width = 273
      Height = 21
      TabOrder = 4
      Text = 'DEMO31D'
      Visible = False
    end
  end
  object CJVCriptografa1: TCJVCriptografa
    Key = 26
    Left = 289
    Top = 128
  end
  object SaveDialog1: TSaveDialog
    Left = 315
    Top = 120
  end
  object Timer1: TTimer
    Enabled = False
    Interval = 100
    OnTimer = Timer1Timer
    Left = 394
    Top = 129
  end
  object TimerSalvaTexto: TTimer
    Enabled = False
    Interval = 500
    OnTimer = TimerSalvaTextoTimer
    Left = 328
    Top = 128
  end
end