//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "ErrorsDialog.h"
#include "MainForm.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TErrorsDlg *ErrorsDlg;
//---------------------------------------------------------------------------
__fastcall TErrorsDlg::TErrorsDlg(TComponent* Owner)
   : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TErrorsDlg::FormCreate(TObject *Sender)
{
   int i;

   _lstErrors->Clear();

   for (i= 0; i < MainFrm->ErrorsList.High; i ++)
   {
      _lstErrors->Items->Add(MainFrm->ErrorsList[i]);
   }
}
//---------------------------------------------------------------------------

void __fastcall TErrorsDlg::_btnClearClick(TObject *Sender)
{
   MainFrm->ClearErrorList();
   _lstErrors->Clear();
}
//---------------------------------------------------------------------------