You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
927 lines
20 KiB
927 lines
20 KiB
object frmBoleto: TfrmBoleto
|
|
Left = 0
|
|
Top = 0
|
|
BorderIcons = [biSystemMenu, biMinimize]
|
|
BorderStyle = bsSingle
|
|
Caption = 'Boleto'
|
|
ClientHeight = 671
|
|
ClientWidth = 802
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
OldCreateOrder = False
|
|
Position = poDesktopCenter
|
|
OnCreate = FormCreate
|
|
OnKeyDown = FormKeyDown
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
object GroupBox1: TGroupBox
|
|
Left = 8
|
|
Top = 8
|
|
Width = 785
|
|
Height = 153
|
|
Caption = 'Conta / T'#237'tulo'
|
|
TabOrder = 0
|
|
object dbgrd_titulos: TDBGrid
|
|
Left = 167
|
|
Top = 28
|
|
Width = 608
|
|
Height = 113
|
|
DataSource = dtsTitulos
|
|
ReadOnly = True
|
|
TabOrder = 0
|
|
TitleFont.Charset = DEFAULT_CHARSET
|
|
TitleFont.Color = clWindowText
|
|
TitleFont.Height = -11
|
|
TitleFont.Name = 'Tahoma'
|
|
TitleFont.Style = []
|
|
Columns = <
|
|
item
|
|
Expanded = False
|
|
FieldName = 'TX_PRODUTO'
|
|
Title.Caption = 'T'#237'tulo'
|
|
Width = 280
|
|
Visible = True
|
|
end
|
|
item
|
|
Expanded = False
|
|
FieldName = 'VL_TITULO'
|
|
Title.Caption = 'Valor'
|
|
Visible = True
|
|
end
|
|
item
|
|
Expanded = False
|
|
FieldName = 'DT_VENCIMENTO'
|
|
Title.Caption = 'Vencimento'
|
|
Visible = True
|
|
end
|
|
item
|
|
Expanded = False
|
|
FieldName = 'DT_ENTRADA'
|
|
Title.Caption = 'Entrada'
|
|
Visible = True
|
|
end>
|
|
end
|
|
object dblucbx_contas: TDBLookupComboBox
|
|
Left = 12
|
|
Top = 28
|
|
Width = 145
|
|
Height = 21
|
|
KeyField = 'ID_CONTA'
|
|
ListField = 'TX_DESCRICAO'
|
|
ListSource = dtsContas
|
|
TabOrder = 1
|
|
end
|
|
end
|
|
object GroupBox2: TGroupBox
|
|
Left = 8
|
|
Top = 167
|
|
Width = 785
|
|
Height = 63
|
|
Caption = 'Informa'#231#245'es Sobre a Cobran'#231'a'
|
|
TabOrder = 1
|
|
object Label1: TLabel
|
|
Left = 8
|
|
Top = 16
|
|
Width = 179
|
|
Height = 13
|
|
Caption = 'Mensagem para Local de Pagamento:'
|
|
end
|
|
object Label2: TLabel
|
|
Left = 383
|
|
Top = 16
|
|
Width = 71
|
|
Height = 13
|
|
Caption = 'Esp'#233'cie Docto:'
|
|
end
|
|
object Label3: TLabel
|
|
Left = 463
|
|
Top = 16
|
|
Width = 75
|
|
Height = 13
|
|
Caption = 'Esp'#233'cie Moeda:'
|
|
end
|
|
object Label4: TLabel
|
|
Left = 544
|
|
Top = 16
|
|
Width = 34
|
|
Height = 13
|
|
Caption = 'Aceite:'
|
|
end
|
|
object Label5: TLabel
|
|
Left = 624
|
|
Top = 16
|
|
Width = 43
|
|
Height = 13
|
|
Caption = 'Carteira:'
|
|
end
|
|
object Label6: TLabel
|
|
Left = 672
|
|
Top = 16
|
|
Width = 73
|
|
Height = 13
|
|
Caption = 'Nosso N'#250'mero:'
|
|
end
|
|
object edtLocalPag: TEdit
|
|
Left = 8
|
|
Top = 32
|
|
Width = 369
|
|
Height = 21
|
|
TabOrder = 0
|
|
end
|
|
object edtEspecieDoc: TEdit
|
|
Left = 383
|
|
Top = 32
|
|
Width = 73
|
|
Height = 21
|
|
TabOrder = 1
|
|
end
|
|
object edtEspecieMod: TEdit
|
|
Left = 463
|
|
Top = 32
|
|
Width = 76
|
|
Height = 21
|
|
TabOrder = 2
|
|
end
|
|
object cbxAceite: TComboBox
|
|
Left = 544
|
|
Top = 32
|
|
Width = 73
|
|
Height = 21
|
|
ItemIndex = 0
|
|
TabOrder = 3
|
|
Text = 'N'#227'o'
|
|
Items.Strings = (
|
|
'N'#227'o'
|
|
'Sim')
|
|
end
|
|
object edtCarteira: TEdit
|
|
Left = 624
|
|
Top = 32
|
|
Width = 41
|
|
Height = 21
|
|
TabOrder = 4
|
|
end
|
|
object edtNossoNro: TEdit
|
|
Left = 672
|
|
Top = 32
|
|
Width = 103
|
|
Height = 21
|
|
TabOrder = 5
|
|
end
|
|
end
|
|
object GroupBox3: TGroupBox
|
|
Left = 8
|
|
Top = 240
|
|
Width = 609
|
|
Height = 105
|
|
Caption = 'Acr'#233'scimos\Descontos'
|
|
TabOrder = 2
|
|
object Label7: TLabel
|
|
Left = 8
|
|
Top = 16
|
|
Width = 72
|
|
Height = 13
|
|
Caption = '% Mora\Juros:'
|
|
end
|
|
object Label8: TLabel
|
|
Left = 162
|
|
Top = 16
|
|
Width = 76
|
|
Height = 13
|
|
Caption = 'Valor Desconto:'
|
|
end
|
|
object Label9: TLabel
|
|
Left = 316
|
|
Top = 16
|
|
Width = 86
|
|
Height = 13
|
|
Caption = 'Valor Abatimento:'
|
|
end
|
|
object Label10: TLabel
|
|
Left = 466
|
|
Top = 16
|
|
Width = 44
|
|
Height = 13
|
|
Caption = '% Multa:'
|
|
end
|
|
object Label11: TLabel
|
|
Left = 8
|
|
Top = 56
|
|
Width = 84
|
|
Height = 13
|
|
Caption = 'Data Mora\Juros:'
|
|
end
|
|
object Label12: TLabel
|
|
Left = 162
|
|
Top = 56
|
|
Width = 75
|
|
Height = 13
|
|
Caption = 'Data Desconto:'
|
|
end
|
|
object Label13: TLabel
|
|
Left = 316
|
|
Top = 56
|
|
Width = 85
|
|
Height = 13
|
|
Caption = 'Data Abatimento:'
|
|
end
|
|
object Label14: TLabel
|
|
Left = 466
|
|
Top = 56
|
|
Width = 71
|
|
Height = 13
|
|
Caption = 'Data Protesto:'
|
|
end
|
|
object edtValorDesconto: TEdit
|
|
Left = 162
|
|
Top = 32
|
|
Width = 135
|
|
Height = 21
|
|
TabOrder = 0
|
|
end
|
|
object edtValorAbatimento: TEdit
|
|
Left = 316
|
|
Top = 32
|
|
Width = 135
|
|
Height = 21
|
|
Enabled = False
|
|
TabOrder = 1
|
|
end
|
|
object dbdtp_juros: TrDBDateTimePicker
|
|
Left = 8
|
|
Top = 72
|
|
Width = 135
|
|
Height = 21
|
|
Date = 43265.429382349540000000
|
|
Time = 43265.429382349540000000
|
|
TabOrder = 3
|
|
DataField = 'DT_VENCIMENTO'
|
|
DataSource = dtsTitulos
|
|
ReadOnly = True
|
|
DBEditLabel.Visible = False
|
|
FormatEmpty = '__.__.__'
|
|
end
|
|
object dbdtp_desc: TrDBDateTimePicker
|
|
Left = 162
|
|
Top = 72
|
|
Width = 135
|
|
Height = 21
|
|
Date = 43265.429382349540000000
|
|
Time = 43265.429382349540000000
|
|
TabOrder = 5
|
|
DataField = 'DT_VENCIMENTO'
|
|
DataSource = dtsTitulos
|
|
ReadOnly = True
|
|
DBEditLabel.Visible = False
|
|
FormatEmpty = '__.__.__'
|
|
end
|
|
object dbedt_mora: TDBEdit
|
|
Left = 8
|
|
Top = 32
|
|
Width = 135
|
|
Height = 21
|
|
DataField = 'PR_JUROS'
|
|
DataSource = dtmSystem.dtsCHGEmpresa
|
|
ReadOnly = True
|
|
TabOrder = 6
|
|
end
|
|
object dbedt_multa: TDBEdit
|
|
Left = 464
|
|
Top = 32
|
|
Width = 135
|
|
Height = 21
|
|
DataField = 'PR_MULTA'
|
|
DataSource = dtmSystem.dtsCHGEmpresa
|
|
ReadOnly = True
|
|
TabOrder = 7
|
|
end
|
|
object dtp_abatimento: TDateTimePicker
|
|
Left = 316
|
|
Top = 72
|
|
Width = 135
|
|
Height = 21
|
|
Date = 43168.429167685190000000
|
|
Time = 43168.429167685190000000
|
|
TabOrder = 8
|
|
end
|
|
object dtp_protesto: TDateTimePicker
|
|
Left = 466
|
|
Top = 72
|
|
Width = 133
|
|
Height = 21
|
|
Date = 43168.429167685190000000
|
|
Time = 43168.429167685190000000
|
|
Enabled = False
|
|
TabOrder = 9
|
|
end
|
|
object cbx_abatimento: TCheckBox
|
|
Left = 408
|
|
Top = 15
|
|
Width = 22
|
|
Height = 17
|
|
TabOrder = 10
|
|
OnClick = cbx_abatimentoClick
|
|
end
|
|
object cbx_protesto: TCheckBox
|
|
Left = 543
|
|
Top = 55
|
|
Width = 19
|
|
Height = 17
|
|
TabOrder = 11
|
|
OnClick = cbx_protestoClick
|
|
end
|
|
end
|
|
object GroupBox4: TGroupBox
|
|
Left = 8
|
|
Top = 351
|
|
Width = 609
|
|
Height = 114
|
|
Caption = 'Mensagens \ Instru'#231#245'es'
|
|
TabOrder = 3
|
|
object Label15: TLabel
|
|
Left = 320
|
|
Top = 16
|
|
Width = 59
|
|
Height = 13
|
|
Caption = 'Instru'#231#227'o 1:'
|
|
end
|
|
object Label16: TLabel
|
|
Left = 464
|
|
Top = 16
|
|
Width = 59
|
|
Height = 13
|
|
Caption = 'Instru'#231#227'o 2:'
|
|
end
|
|
object memMensagem: TMemo
|
|
Left = 8
|
|
Top = 16
|
|
Width = 305
|
|
Height = 89
|
|
Lines.Strings = (
|
|
'')
|
|
TabOrder = 0
|
|
end
|
|
object edtInstrucoes1: TEdit
|
|
Left = 320
|
|
Top = 32
|
|
Width = 137
|
|
Height = 21
|
|
TabOrder = 1
|
|
end
|
|
object edtInstrucoes2: TEdit
|
|
Left = 464
|
|
Top = 32
|
|
Width = 137
|
|
Height = 21
|
|
TabOrder = 2
|
|
end
|
|
object Panel2: TPanel
|
|
Left = 320
|
|
Top = 64
|
|
Width = 281
|
|
Height = 41
|
|
Caption = '* Informar o C'#243'digo da Instru'#231#227'o'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlue
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
TabOrder = 3
|
|
end
|
|
end
|
|
object GroupBox5: TGroupBox
|
|
Left = 624
|
|
Top = 240
|
|
Width = 169
|
|
Height = 225
|
|
Caption = 'Informa'#231#245'es Sobre a Duplicata '
|
|
TabOrder = 4
|
|
object Label17: TLabel
|
|
Left = 8
|
|
Top = 16
|
|
Width = 41
|
|
Height = 13
|
|
Caption = 'N'#250'mero:'
|
|
end
|
|
object Label18: TLabel
|
|
Left = 8
|
|
Top = 64
|
|
Width = 28
|
|
Height = 13
|
|
Caption = 'Valor:'
|
|
end
|
|
object Label19: TLabel
|
|
Left = 8
|
|
Top = 120
|
|
Width = 68
|
|
Height = 13
|
|
Caption = 'Data Emiss'#227'o:'
|
|
end
|
|
object Label20: TLabel
|
|
Left = 8
|
|
Top = 176
|
|
Width = 59
|
|
Height = 13
|
|
Caption = 'Vencimento:'
|
|
end
|
|
object edtNumeroDoc: TEdit
|
|
Left = 8
|
|
Top = 32
|
|
Width = 153
|
|
Height = 21
|
|
ReadOnly = True
|
|
TabOrder = 0
|
|
Text = '0000000001'
|
|
end
|
|
object dbedt_vltitulo: TDBEdit
|
|
Left = 8
|
|
Top = 80
|
|
Width = 151
|
|
Height = 21
|
|
DataField = 'VL_TITULO'
|
|
DataSource = dtsTitulos
|
|
ReadOnly = True
|
|
TabOrder = 1
|
|
end
|
|
object dtp_emissao: TDateTimePicker
|
|
Left = 8
|
|
Top = 136
|
|
Width = 151
|
|
Height = 21
|
|
Date = 43168.429167685190000000
|
|
Time = 43168.429167685190000000
|
|
TabOrder = 2
|
|
end
|
|
end
|
|
object GroupBox6: TGroupBox
|
|
Left = 8
|
|
Top = 471
|
|
Width = 786
|
|
Height = 143
|
|
Caption = 'Informa'#231#245'es do Sacado'
|
|
TabOrder = 5
|
|
object Label29: TLabel
|
|
Left = 8
|
|
Top = 61
|
|
Width = 19
|
|
Height = 13
|
|
Caption = 'CEP'
|
|
end
|
|
object lbl_logradouro: TLabel
|
|
Left = 8
|
|
Top = 16
|
|
Width = 49
|
|
Height = 13
|
|
Caption = 'Endere'#231'o:'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
end
|
|
object lbl_num: TLabel
|
|
Left = 444
|
|
Top = 16
|
|
Width = 40
|
|
Height = 13
|
|
Caption = 'N'#250'mero:'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
end
|
|
object lbl_comp: TLabel
|
|
Left = 528
|
|
Top = 16
|
|
Width = 67
|
|
Height = 13
|
|
Caption = 'Complemento:'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
end
|
|
object lbl_bairro: TLabel
|
|
Left = 621
|
|
Top = 16
|
|
Width = 30
|
|
Height = 13
|
|
Caption = 'Bairro:'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
end
|
|
object lbl_uf: TLabel
|
|
Left = 96
|
|
Top = 61
|
|
Width = 17
|
|
Height = 13
|
|
Caption = 'UF:'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
end
|
|
object lbl_cidade: TLabel
|
|
Left = 206
|
|
Top = 61
|
|
Width = 36
|
|
Height = 13
|
|
Caption = 'Cidade:'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
end
|
|
object dbedt_logradouro: TDBEdit
|
|
Left = 8
|
|
Top = 35
|
|
Width = 430
|
|
Height = 21
|
|
DataField = 'TX_LOGRADOURO'
|
|
DataSource = dtsEnderecos
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
ReadOnly = True
|
|
TabOrder = 0
|
|
end
|
|
object dbedt_num: TDBEdit
|
|
Left = 444
|
|
Top = 35
|
|
Width = 63
|
|
Height = 21
|
|
DataField = 'NR_NUMERO'
|
|
DataSource = dtsEnderecos
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
ReadOnly = True
|
|
TabOrder = 1
|
|
end
|
|
object dbedt_comp: TDBEdit
|
|
Left = 528
|
|
Top = 35
|
|
Width = 81
|
|
Height = 21
|
|
DataField = 'TX_COMPLEMENTO'
|
|
DataSource = dtsEnderecos
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
ReadOnly = True
|
|
TabOrder = 2
|
|
end
|
|
object dbedt_bairro: TDBEdit
|
|
Left = 621
|
|
Top = 35
|
|
Width = 161
|
|
Height = 21
|
|
DataField = 'TX_BAIRRO'
|
|
DataSource = dtsEnderecos
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
ReadOnly = True
|
|
TabOrder = 3
|
|
end
|
|
object dblucmbox_uf: TDBLookupComboBox
|
|
Left = 96
|
|
Top = 80
|
|
Width = 92
|
|
Height = 21
|
|
DataField = 'ID_ESTADO'
|
|
DataSource = dtsEnderecos
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
KeyField = 'ID_ESTADO'
|
|
ListField = 'TX_NOME'
|
|
ListSource = dtsUF
|
|
ParentFont = False
|
|
ReadOnly = True
|
|
TabOrder = 4
|
|
end
|
|
object dblucmbox_cidade: TDBLookupComboBox
|
|
Left = 206
|
|
Top = 80
|
|
Width = 134
|
|
Height = 21
|
|
DataField = 'ID_CIDADE'
|
|
DataSource = dtsEnderecos
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
KeyField = 'ID_CIDADE'
|
|
ListField = 'TX_NOME'
|
|
ListSource = dtsCidades
|
|
ParentFont = False
|
|
ReadOnly = True
|
|
TabOrder = 5
|
|
end
|
|
object dbgrd_enderecos: TDBGrid
|
|
Left = 353
|
|
Top = 62
|
|
Width = 429
|
|
Height = 78
|
|
TabStop = False
|
|
DataSource = dtsEnderecos
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit, dgTitleClick, dgTitleHotTrack]
|
|
ParentFont = False
|
|
ReadOnly = True
|
|
TabOrder = 6
|
|
TitleFont.Charset = DEFAULT_CHARSET
|
|
TitleFont.Color = clWindowText
|
|
TitleFont.Height = -11
|
|
TitleFont.Name = 'MS Sans Serif'
|
|
TitleFont.Style = []
|
|
Columns = <
|
|
item
|
|
Expanded = False
|
|
FieldName = 'TX_LOGRADOURO'
|
|
Title.Caption = 'Endere'#231'o'
|
|
Width = 185
|
|
Visible = True
|
|
end
|
|
item
|
|
Expanded = False
|
|
FieldName = 'NR_NUMERO'
|
|
Title.Caption = 'N'#250'mero'
|
|
Width = 60
|
|
Visible = True
|
|
end
|
|
item
|
|
Expanded = False
|
|
FieldName = 'TX_COMPLEMENTO'
|
|
Title.Caption = 'Complemento'
|
|
Width = 125
|
|
Visible = True
|
|
end
|
|
item
|
|
Expanded = False
|
|
FieldName = 'TP_ATIVO'
|
|
Title.Caption = 'Ativo'
|
|
Width = 32
|
|
Visible = True
|
|
end
|
|
item
|
|
Expanded = False
|
|
FieldName = 'TX_BAIRRO'
|
|
Title.Caption = 'Bairro'
|
|
Width = 93
|
|
Visible = True
|
|
end
|
|
item
|
|
Expanded = False
|
|
FieldName = 'TX_ESTADO'
|
|
Title.Caption = 'Estado'
|
|
Width = 101
|
|
Visible = True
|
|
end
|
|
item
|
|
Expanded = False
|
|
FieldName = 'TX_CIDADE'
|
|
Title.Caption = 'Cidade'
|
|
Visible = True
|
|
end
|
|
item
|
|
Expanded = False
|
|
FieldName = 'TX_CEP'
|
|
Title.Caption = 'CEP'
|
|
Width = 82
|
|
Visible = True
|
|
end
|
|
item
|
|
Expanded = False
|
|
FieldName = 'TP_REFERENCIA'
|
|
Title.Caption = 'Refer'#234'ncia'
|
|
Width = 69
|
|
Visible = True
|
|
end
|
|
item
|
|
Expanded = False
|
|
FieldName = 'TP_ENDERECO'
|
|
Title.Caption = 'Tipo de Endere'#231'o'
|
|
Width = 104
|
|
Visible = True
|
|
end
|
|
item
|
|
Expanded = False
|
|
FieldName = 'ID_HIGIENIZADORA'
|
|
Title.Caption = 'Higienizadora'
|
|
Width = 76
|
|
Visible = True
|
|
end>
|
|
end
|
|
object dbedt_cep: TDBEdit
|
|
Left = 8
|
|
Top = 80
|
|
Width = 69
|
|
Height = 21
|
|
DataField = 'TX_CEP'
|
|
DataSource = dtsEnderecos
|
|
TabOrder = 7
|
|
end
|
|
end
|
|
object Panel1: TPanel
|
|
Left = 0
|
|
Top = 621
|
|
Width = 802
|
|
Height = 50
|
|
Align = alBottom
|
|
TabOrder = 6
|
|
object Button2: TButton
|
|
Left = 237
|
|
Top = 16
|
|
Width = 75
|
|
Height = 25
|
|
Caption = 'Gerar PDF'
|
|
TabOrder = 0
|
|
OnClick = Button2Click
|
|
end
|
|
object Button3: TButton
|
|
Left = 318
|
|
Top = 16
|
|
Width = 131
|
|
Height = 25
|
|
Caption = 'Zerar Lista de Boletos'
|
|
Enabled = False
|
|
TabOrder = 1
|
|
end
|
|
object Button4: TButton
|
|
Left = 455
|
|
Top = 16
|
|
Width = 97
|
|
Height = 25
|
|
Caption = 'Incluir Boleto'
|
|
TabOrder = 2
|
|
OnClick = Button4Click
|
|
end
|
|
object Button5: TButton
|
|
Left = 558
|
|
Top = 16
|
|
Width = 129
|
|
Height = 25
|
|
Caption = 'Incluir V'#225'rios Boletos'
|
|
Enabled = False
|
|
TabOrder = 3
|
|
end
|
|
object Button6: TButton
|
|
Left = 693
|
|
Top = 16
|
|
Width = 97
|
|
Height = 25
|
|
Caption = 'Gerar Remessa'
|
|
TabOrder = 4
|
|
OnClick = Button6Click
|
|
end
|
|
object btnenviaremail: TButton
|
|
Left = 156
|
|
Top = 16
|
|
Width = 75
|
|
Height = 25
|
|
Caption = 'Enviar Email'
|
|
Enabled = False
|
|
TabOrder = 5
|
|
OnClick = btnenviaremailClick
|
|
end
|
|
object rg_email: TRadioGroup
|
|
Left = 8
|
|
Top = 8
|
|
Width = 142
|
|
Height = 33
|
|
Caption = 'Email:'
|
|
Columns = 2
|
|
Enabled = False
|
|
Items.Strings = (
|
|
'Empresa'
|
|
'Usu'#225'rio')
|
|
TabOrder = 6
|
|
OnClick = rg_emailClick
|
|
end
|
|
end
|
|
object dtp_vencimento: TDateTimePicker
|
|
Left = 632
|
|
Top = 432
|
|
Width = 151
|
|
Height = 21
|
|
Date = 43168.429167685190000000
|
|
Time = 43168.429167685190000000
|
|
TabOrder = 7
|
|
end
|
|
object ACBrBoleto: TACBrBoleto
|
|
MAIL = ACBrMail
|
|
Banco.TamanhoMaximoNossoNum = 10
|
|
Banco.TipoCobranca = cobNenhum
|
|
Banco.LayoutVersaoArquivo = 0
|
|
Banco.LayoutVersaoLote = 0
|
|
Banco.CasasDecimaisMoraJuros = 2
|
|
Cedente.TipoInscricao = pJuridica
|
|
NumeroArquivo = 0
|
|
ACBrBoletoFC = ACBrBoletoFCFortes
|
|
Configuracoes.Arquivos.LogRegistro = False
|
|
Configuracoes.WebService.SSLHttpLib = httpOpenSSL
|
|
Configuracoes.WebService.StoreName = 'My'
|
|
Configuracoes.WebService.Ambiente = taHomologacao
|
|
Configuracoes.WebService.Operacao = tpInclui
|
|
Configuracoes.WebService.VersaoDF = '1.2'
|
|
Left = 592
|
|
Top = 72
|
|
end
|
|
object ACBrBoletoFCFortes: TACBrBoletoFCFortes
|
|
MostrarPreview = False
|
|
MostrarSetup = False
|
|
SoftwareHouse = 'Projeto ACBr - http://acbr.sf.net'
|
|
DirLogo = 'C:\ACBr\Fontes\ACBrBoleto\Logos\Colorido'
|
|
Left = 688
|
|
Top = 72
|
|
end
|
|
object dtsContas: TDataSource
|
|
OnDataChange = dtsContasDataChange
|
|
Left = 616
|
|
Top = 16
|
|
end
|
|
object dtsTitulos: TDataSource
|
|
DataSet = dtmSystem.tblTitulos
|
|
OnDataChange = dtsTitulosDataChange
|
|
Left = 672
|
|
Top = 16
|
|
end
|
|
object dtsCHGEmpresa: TDataSource
|
|
DataSet = dtmSystem.tblCHGEmpresa
|
|
Left = 744
|
|
Top = 16
|
|
end
|
|
object dtsDevedor: TDataSource
|
|
DataSet = dtmSystem.tblDevedores
|
|
Left = 552
|
|
Top = 16
|
|
end
|
|
object dtsEnderecos: TDataSource
|
|
DataSet = dtmSystem.tblEnderecos
|
|
OnDataChange = dtsEnderecosDataChange
|
|
Left = 488
|
|
Top = 16
|
|
end
|
|
object dtsUF: TDataSource
|
|
DataSet = dtmSystem.tblEstados
|
|
OnDataChange = dtsUFDataChange
|
|
Left = 469
|
|
Top = 68
|
|
end
|
|
object dtsCidades: TDataSource
|
|
DataSet = dtmSystem.tblCidades
|
|
OnDataChange = dtsCidadesDataChange
|
|
Left = 526
|
|
Top = 66
|
|
end
|
|
object ACBrMail: TACBrMail
|
|
Host = '127.0.0.1'
|
|
Port = '25'
|
|
SetSSL = False
|
|
SetTLS = False
|
|
Attempts = 3
|
|
DefaultCharset = UTF_8
|
|
IDECharset = CP1252
|
|
Left = 592
|
|
Top = 128
|
|
end
|
|
end
|