inherited frmImpTCC: TfrmImpTCC Caption = 'Importa'#231#227'o TCC' ClientHeight = 482 ClientWidth = 893 Menu = mnu_main ExplicitWidth = 899 ExplicitHeight = 530 PixelsPerInch = 96 TextHeight = 13 object lbl_estado: TLabel [0] Left = 8 Top = 388 Width = 120 Height = 13 Caption = 'Estado: Esperando a'#231#227'o.' end object Label1: TLabel [1] Left = 222 Top = 388 Width = 106 Height = 13 Caption = 'Quantidade de linhas: ' end object Label2: TLabel [2] Left = 384 Top = 388 Width = 61 Height = 13 Caption = 'Lendo linha: ' end object lbl_arquivo: TLabel [3] Left = 384 Top = 437 Width = 42 Height = 13 Caption = 'Arquivo: ' end inherited stbStatus: TStatusBar Top = 463 Width = 893 ExplicitTop = 463 ExplicitWidth = 893 end object sgrd_import: TStringGrid Left = 8 Top = 8 Width = 705 Height = 369 ColCount = 1 FixedCols = 0 RowCount = 1 FixedRows = 0 Options = [goVertLine, goHorzLine] TabOrder = 1 end object pb_import: TProgressBar Left = 8 Top = 409 Width = 877 Height = 17 TabOrder = 2 end object btn_baixatitulos: TButton Left = 8 Top = 432 Width = 89 Height = 25 Caption = 'Mensalidades' Enabled = False TabOrder = 3 OnClick = btn_baixatitulosClick end object dblucb_tcc: TDBLookupComboBox Left = 632 Top = 382 Width = 253 Height = 21 KeyField = 'ID_EMPRESA' ListField = 'TX_NOME' ListSource = dtmSystem.dtsCHGEmpresa TabOrder = 4 end object btn_geraracordo: TButton Left = 103 Top = 432 Width = 72 Height = 25 Caption = 'Acordos' Enabled = False TabOrder = 5 OnClick = btn_geraracordoClick end object clb_cobradores: TCheckListBox Left = 719 Top = 8 Width = 166 Height = 368 TabStop = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ItemHeight = 13 ParentFont = False ParentShowHint = False ScrollWidth = 10 ShowHint = True TabOrder = 6 end object btn_rel: TButton Left = 181 Top = 432 Width = 75 Height = 25 Caption = 'Relat'#243'rio' TabOrder = 7 OnClick = btn_relClick end object mnu_main: TMainMenu Left = 776 Top = 8 object Arquivo1: TMenuItem Caption = 'Arquivo' object mnu_abrir: TMenuItem Caption = 'Abrir' OnClick = mnu_abrirClick end end end object od_abrir: TOpenDialog Left = 848 Top = 8 end end