//---------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop

#include "About.h"
#include "LEADMain.hpp"
//---------------------------------------------------------------------
#pragma resource "*.dfm"
TAboutDlg *AboutDlg;
//---------------------------------------------------------------------
__fastcall TAboutDlg::TAboutDlg(TComponent* AOwner)
	: TForm(AOwner)
{
}
//---------------------------------------------------------------------
void __fastcall TAboutDlg::OKBtnClick(TObject *Sender)
{
   ModalResult = mrOk;
}
//---------------------------------------------------------------------------

void __fastcall TAboutDlg::FormCreate(TObject *Sender)
{
   TLEADImage *TempBitmap = new TLEADImage(this);
   TempBitmap->Parent = this;
   TempBitmap->Visible = false;

   Label7->Caption = "LEAD Product: " + TempBitmap->VersionProduct;
   Label8->Caption = "Professional Edition Version: " + IntToStr(TempBitmap->VersionMajor) + "." + IntToStr(TempBitmap->VersionMinor);
   Label9->Caption = "Date: " + TempBitmap->VersionDate;
   Label10->Caption = "Time: " + TempBitmap->VersionTime;

   TempBitmap->Free();
}
//---------------------------------------------------------------------------