inherited frmGrupoBoletoEmpresas: TfrmGrupoBoletoEmpresas Caption = 'Grupo de Empresas para Boleto' ClientHeight = 518 ClientWidth = 817 ExplicitWidth = 825 ExplicitHeight = 549 PixelsPerInch = 96 TextHeight = 13 inherited GroupBox2: TGroupBox Top = 194 Width = 803 Height = 302 Anchors = [akLeft, akBottom] ExplicitTop = 200 ExplicitWidth = 803 ExplicitHeight = 302 inherited pcClientes: TPageControl Width = 788 Height = 288 ExplicitWidth = 788 ExplicitHeight = 288 inherited tabCadastro: TTabSheet ExplicitLeft = 4 ExplicitTop = 24 ExplicitWidth = 780 ExplicitHeight = 260 object Label15: TLabel Left = 0 Top = 66 Width = 44 Height = 13 Caption = 'Empresa:' end object Label16: TLabel Left = 411 Top = 66 Width = 32 Height = 13 Caption = 'Grupo:' end object DBNavigator1: TDBNavigator Left = 0 Top = 11 Width = 660 Height = 49 DataSource = dtsDB2 TabOrder = 0 end object dbgrdGrupoEmpresa: TDBGrid Left = 0 Top = 107 Width = 780 Height = 153 Align = alBottom Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit] TabOrder = 1 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -11 TitleFont.Name = 'MS Sans Serif' TitleFont.Style = [] Columns = < item Expanded = False FieldName = 'TX_EMPRESA' Title.Caption = 'Empresa' Width = 300 Visible = True end item Expanded = False FieldName = 'TX_GRUPO' Title.Caption = 'Grupo' Width = 300 Visible = True end> end object DBLookupComboBox1: TDBLookupComboBox Left = 0 Top = 83 Width = 369 Height = 21 DataField = 'ID_EMPRESA' KeyField = 'ID_EMPRESA' ListField = 'TX_FANTASIA' ListSource = dtmSystem.dtsCHGEmpresa TabOrder = 2 end object DBLookupComboBox2: TDBLookupComboBox Left = 411 Top = 83 Width = 369 Height = 21 DataField = 'ID_GRUPO_BOLETO' KeyField = 'ID_GRUPO' ListField = 'TX_NOME' TabOrder = 3 end end end end inherited stbStatus: TStatusBar Top = 499 Width = 817 ExplicitTop = 508 ExplicitWidth = 817 end inherited grpDescricao: TGroupBox Width = 803 Height = 133 Anchors = [akLeft, akTop, akBottom] ExplicitWidth = 803 ExplicitHeight = 139 object Label1: TLabel [1] Left = 12 Top = 51 Width = 46 Height = 13 Caption = 'Descri'#231#227'o' end inherited DBEdit1: TDBEdit Width = 245 DataField = 'TX_NOME' ExplicitWidth = 245 end object DBMemo1: TDBMemo Left = 12 Top = 70 Width = 245 Height = 55 DataField = 'TX_DESCRICAO' DataSource = dtsDB ScrollBars = ssVertical TabOrder = 1 end object PageControl1: TPageControl Left = 263 Top = 3 Width = 537 Height = 130 ActivePage = TabSheet3 Style = tsButtons TabOrder = 2 object TabSheet1: TTabSheet Caption = 'Desconto 1' ExplicitLeft = 0 ExplicitTop = 0 ExplicitWidth = 0 ExplicitHeight = 0 object Label2: TLabel Left = 320 Top = 19 Width = 28 Height = 13 Caption = 'Taxa:' end object Label3: TLabel Left = 320 Top = 46 Width = 28 Height = 13 Caption = 'Valor:' end object DBRadioGroup1: TDBRadioGroup Left = -4 Top = -15 Width = 300 Height = 118 DataField = 'TP_DESC1' DataSource = dtsDB Items.Strings = ( 'N'#227'o tem desconto.' 'Valor fixo at'#233' data informada.' 'Percentual at'#233' data informada.') TabOrder = 0 Values.Strings = ( '0' '1' '2') end object DBEdit2: TDBEdit Left = 376 Top = 16 Width = 121 Height = 21 DataField = 'PR_DESC1' DataSource = dtsDB TabOrder = 1 end object DBEdit3: TDBEdit Left = 376 Top = 43 Width = 121 Height = 21 DataField = 'NR_DESC1' DataSource = dtsDB TabOrder = 2 end end object TabSheet2: TTabSheet Caption = 'Desconto 2' ImageIndex = 1 ExplicitLeft = 0 ExplicitTop = 0 ExplicitWidth = 0 ExplicitHeight = 0 object Label6: TLabel Left = 320 Top = 46 Width = 28 Height = 13 Caption = 'Valor:' end object Label7: TLabel Left = 320 Top = 19 Width = 28 Height = 13 Caption = 'Taxa:' end object DBRadioGroup2: TDBRadioGroup Left = -4 Top = -15 Width = 300 Height = 118 DataField = 'TP_DESC2' DataSource = dtsDB Items.Strings = ( 'N'#227'o tem desconto.' 'Valor fixo at'#233' data informada.' 'Percentual at'#233' data informada.') TabOrder = 1 Values.Strings = ( '0' '1' '2') end object DBEdit4: TDBEdit Left = 376 Top = 43 Width = 121 Height = 21 DataField = 'NR_DESC2' DataSource = dtsDB TabOrder = 0 end object DBEdit5: TDBEdit Left = 376 Top = 16 Width = 121 Height = 21 DataField = 'PR_DESC2' DataSource = dtsDB TabOrder = 2 end end object TabSheet3: TTabSheet Caption = 'Desconto 3' ImageIndex = 2 ExplicitLeft = 0 ExplicitTop = 0 ExplicitWidth = 0 ExplicitHeight = 0 object Label9: TLabel Left = 320 Top = 46 Width = 28 Height = 13 Caption = 'Valor:' end object Label10: TLabel Left = 320 Top = 19 Width = 28 Height = 13 Caption = 'Taxa:' end object DBRadioGroup3: TDBRadioGroup Left = -4 Top = -15 Width = 300 Height = 118 DataField = 'TP_DESC3' DataSource = dtsDB Items.Strings = ( 'N'#227'o tem desconto.' 'Valor fixo at'#233' data informada.' 'Percentual at'#233' data informada.') TabOrder = 1 Values.Strings = ( '0' '1' '2') end object DBEdit6: TDBEdit Left = 376 Top = 16 Width = 121 Height = 21 DataField = 'PR_DESC3' DataSource = dtsDB TabOrder = 0 end object DBEdit7: TDBEdit Left = 376 Top = 43 Width = 121 Height = 21 DataField = 'NR_DESC3' DataSource = dtsDB TabOrder = 2 end end object TabSheet4: TTabSheet Caption = 'Multa' ImageIndex = 3 ExplicitLeft = 0 ExplicitTop = 0 ExplicitWidth = 0 ExplicitHeight = 0 object Label11: TLabel Left = 320 Top = 19 Width = 28 Height = 13 Caption = 'Taxa:' end object Label12: TLabel Left = 320 Top = 46 Width = 28 Height = 13 Caption = 'Valor:' end object DBRadioGroup4: TDBRadioGroup Left = -4 Top = -15 Width = 300 Height = 118 DataField = 'TP_MULTA' DataSource = dtsDB Items.Strings = ( 'N'#227'o tem multa' 'Valor Fixo' 'Percentual') TabOrder = 0 Values.Strings = ( '0' '1' '2') end object DBEdit8: TDBEdit Left = 376 Top = 43 Width = 121 Height = 21 DataField = 'NR_MULTA' DataSource = dtsDB TabOrder = 1 end object DBEdit9: TDBEdit Left = 376 Top = 16 Width = 121 Height = 21 DataField = 'PR_MULTA' DataSource = dtsDB TabOrder = 2 end end object TabSheet5: TTabSheet Caption = 'Mora' ImageIndex = 4 ExplicitLeft = 0 ExplicitTop = 0 ExplicitWidth = 0 ExplicitHeight = 0 object Label13: TLabel Left = 320 Top = 19 Width = 28 Height = 13 Caption = 'Taxa:' end object Label14: TLabel Left = 320 Top = 46 Width = 28 Height = 13 Caption = 'Valor:' end object DBRadioGroup5: TDBRadioGroup Left = -4 Top = -15 Width = 300 Height = 118 DataField = 'TP_MORA' DataSource = dtsDB Items.Strings = ( 'Valor ao dia' 'Taxa mensal' 'N'#227'o h'#225' mora') TabOrder = 0 Values.Strings = ( '0' '1' '2') end object DBEdit10: TDBEdit Left = 376 Top = 16 Width = 121 Height = 21 DataField = 'PR_MORA' DataSource = dtsDB TabOrder = 1 end object DBEdit11: TDBEdit Left = 376 Top = 43 Width = 121 Height = 21 DataField = 'NR_MORA' DataSource = dtsDB TabOrder = 2 end end end end inherited navPrincipal: TDBNavigator DataSource = dtsDB end object dtsDB2: TDataSource OnStateChange = dtsDB2StateChange Left = 592 Top = 8 end end