inherited frmFechamento: TfrmFechamento Caption = 'Fechamento' ClientHeight = 219 ClientWidth = 187 ExplicitWidth = 193 ExplicitHeight = 247 PixelsPerInch = 96 TextHeight = 13 inherited stbStatus: TStatusBar Top = 200 Width = 187 ExplicitTop = 200 ExplicitWidth = 187 end object pnl_fundo: TPanel Left = 0 Top = 0 Width = 187 Height = 200 Align = alClient BevelInner = bvLowered Color = clBtnHighlight ParentBackground = False TabOrder = 1 object lbl_ligacao: TLabel Left = 8 Top = 8 Width = 138 Height = 13 Caption = 'Foi atendida alguma liga'#231#227'o?' end object lbl_situacao: TLabel Left = 8 Top = 54 Width = 143 Height = 13 Caption = 'Qual a situa'#231#227'o da cobran'#231'a?' end object lbl_acordo: TLabel Left = 8 Top = 100 Width = 75 Height = 13 Caption = 'Tipo do acordo:' end object cb_ligacao: TComboBox Left = 8 Top = 27 Width = 171 Height = 21 Style = csDropDownList TabOrder = 0 OnChange = cb_ligacaoChange Items.Strings = ( 'Sim' 'N'#227'o') end object cb_situacao: TComboBox Left = 8 Top = 73 Width = 171 Height = 21 Style = csDropDownList Enabled = False TabOrder = 1 OnChange = cb_situacaoChange Items.Strings = ( 'Fechou acordo' 'N'#227'o aceitou acordo' 'Acordo a ser considerado' 'Recado') end object cb_acordo: TComboBox Left = 8 Top = 119 Width = 171 Height = 21 Style = csDropDownList Enabled = False TabOrder = 2 Items.Strings = ( 'Quita'#231#227'o' 'Financiamento') end object btncontinuar: TButton Left = 8 Top = 168 Width = 75 Height = 25 Caption = 'Continuar' Enabled = False ModalResult = 1 TabOrder = 3 OnClick = btncontinuarClick end object btncancel: TButton Left = 104 Top = 168 Width = 75 Height = 25 Caption = 'Cancelar' ModalResult = 2 TabOrder = 4 end end end