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

#include "Authorization_F.h"
//---------------------------------------------------------------------------
#ifdef LOCK_TEX
//---------------------------------------------------------------------------
#include "Define.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "RzEdit"
#pragma link "RzButton"
#pragma resource "*.dfm"
TAuthorizationForm *AuthorizationForm;
//---------------------------------------------------------------------------
__fastcall TAuthorizationForm::TAuthorizationForm(TComponent* Owner)
  : TForm(Owner)
{
  TexLock = NULL;
  AnsiString strLanguage = NULL;

 	TRegIniFile *RegIniFile = new TRegIniFile(RegFilename);
  RegIniFile->RootKey = HKEY_LOCAL_MACHINE;
  RegIniFile->OpenKey(RegFilename + "\\",true);
  if (RegIniFile) {
  	strLanguage = RegIniFile->ReadString("Common", "Language", "English");
    delete RegIniFile;
  }

  if (strLanguage.IsEmpty()){
    richeditNotice->Lines->LoadFromFile(ExtractFileDir(Application->ExeName) +"\\Notice_ENG.rtf");
  }
  else {
    if (strLanguage.AnsiCompare("English") == 0){
      richeditNotice->Lines->LoadFromFile(ExtractFileDir(Application->ExeName) +"\\Notice_ENG.rtf");
    }
    else if (strLanguage.AnsiCompare("Korean") == 0){
      richeditNotice->Lines->LoadFromFile(ExtractFileDir(Application->ExeName) +"\\Notice_KOR.rtf");
    }
    else if (strLanguage.AnsiCompare("Chinese") == 0){
      richeditNotice->Lines->LoadFromFile(ExtractFileDir(Application->ExeName) +"\\Notice_CHN.rtf");
    }
    else if (strLanguage.AnsiCompare("Indonesian") == 0){
      richeditNotice->Lines->LoadFromFile(ExtractFileDir(Application->ExeName) +"\\Notice_INA.rtf");
    }
    else if (strLanguage.AnsiCompare("Japanese") == 0){
      richeditNotice->Lines->LoadFromFile(ExtractFileDir(Application->ExeName) +"\\Notice_JPN.rtf");
    }
    else if (strLanguage.AnsiCompare("Taiwanese") == 0){
      richeditNotice->Lines->LoadFromFile(ExtractFileDir(Application->ExeName) +"\\Notice_TPE.rtf");
    }
    else if (strLanguage.AnsiCompare("Thai") == 0){
      richeditNotice->Lines->LoadFromFile(ExtractFileDir(Application->ExeName) +"\\Notice_THA.rtf");
    }
  }
}
//---------------------------------------------------------------------------
void __fastcall TAuthorizationForm::FormCreate(TObject *Sender)
{
  TexLock = new TTexLock(Application, ExtractFilePath(Application->ExeName) + ExtractFileName(Application->ExeName), DBL_TEXTRICOT);
  tmKillReverseEngineeringTools->Enabled = true;
}
//---------------------------------------------------------------------------
void __fastcall TAuthorizationForm::FormDestroy(TObject *Sender)
{
  if (TexLock) { delete TexLock; TexLock = NULL; }

  tmKillReverseEngineeringTools->Enabled = false;
}
//---------------------------------------------------------------------------
void __fastcall TAuthorizationForm::bitbtnOKClick(TObject *Sender)
{
  String strKey;
	strKey = edAuthorizationKey->Text.UpperCase();

	// °ø¹éÁ¦°Å
	for (int i = 0; i < strKey.Length(); i++) {
		if (strKey.c_str()[i] == ' ') {
			strKey.Delete(i+1, 1);
			i--;
		}
	}

	if (TexLock->Check(true, strKey)) {
		Close();
		ModalResult = mrOk;
	}
}
//---------------------------------------------------------------------------
void __fastcall TAuthorizationForm::bitbtnCancelClick(TObject *Sender)
{
  Close();
  ModalResult = mrCancel;
}
//---------------------------------------------------------------------------
void __fastcall TAuthorizationForm::tmKillReverseEngineeringToolsTimer(
      TObject *Sender)
{
  // Reverse Engineering Tool üũ
  TexLock->CheckReverseEngineeringTools();
}
//---------------------------------------------------------------------------
bool __fastcall TAuthorizationForm::Check(bool bMessage)
{
  bool bReturn = true;

  if (!TexLock->Check(bMessage)) {
    bReturn = false;
  }

  edCombinationKey->Text = TexLock->GetCombinationKey();
  edCombinationKey->SelectAll();
  
  return bReturn;
}
//---------------------------------------------------------------------------
void __fastcall TAuthorizationForm::edAuthorizationKeyKeyPress(
      TObject *Sender, char &Key)
{
  if (islower(Key)) {
    Key = toupper(Key); // ´ë¹®ÀÚ·Î º¯È¯
  }
}
//---------------------------------------------------------------------------
void __fastcall TAuthorizationForm::edAuthorizationKeyKeyUp(
      TObject *Sender, WORD &Key, TShiftState Shift)
{
  int nCursorPos, nPreLength;
  
  if (Key == 17) {  // KeyUp¿¡¼­ Ctrl + V Å°ÀÇ Á¶ÇÕ°ª
    nCursorPos = edAuthorizationKey->SelStart;  // À§Ä¡ ±â¾ï
    nPreLength = edAuthorizationKey->Text.Length(); // ÀÌÀü ¹®ÀÚ¿­ ±æÀÌ ±â¾ï
    edAuthorizationKey->Text = edAuthorizationKey->Text.UpperCase();  // ´ë¹®ÀÚ·Î º¯È¯
    edAuthorizationKey->SelStart = nCursorPos + (edAuthorizationKey->Text.Length() - nPreLength); // Ä¿¼­À§Ä¡¸¦ Á¶Á¤ÇÑ´Ù
  }
}
//---------------------------------------------------------------------------
void __fastcall TAuthorizationForm::smiCloseClick(TObject *Sender)
{
  Close();
}
//---------------------------------------------------------------------------
void __fastcall TAuthorizationForm::smiEnglishClick(TObject *Sender)
{
  richeditNotice->Lines->LoadFromFile(ExtractFileDir(Application->ExeName) +"\\Notice_ENG.rtf");
}
//---------------------------------------------------------------------------

void __fastcall TAuthorizationForm::smiKoreanClick(TObject *Sender)
{
  richeditNotice->Lines->LoadFromFile(ExtractFileDir(Application->ExeName) +"\\Notice_KOR.rtf");
}
//---------------------------------------------------------------------------

void __fastcall TAuthorizationForm::smiChineseClick(TObject *Sender)
{
  richeditNotice->Lines->LoadFromFile(ExtractFileDir(Application->ExeName) +"\\Notice_CHN.rtf");
}
//---------------------------------------------------------------------------

void __fastcall TAuthorizationForm::smiIndonesianClick(TObject *Sender)
{
  richeditNotice->Lines->LoadFromFile(ExtractFileDir(Application->ExeName) +"\\Notice_INA.rtf");
}
//---------------------------------------------------------------------------

void __fastcall TAuthorizationForm::smiJapaneseClick(TObject *Sender)
{
  richeditNotice->Lines->LoadFromFile(ExtractFileDir(Application->ExeName) +"\\Notice_JPN.rtf");
}
//---------------------------------------------------------------------------

void __fastcall TAuthorizationForm::smiTaiwaneseClick(TObject *Sender)
{
  richeditNotice->Lines->LoadFromFile(ExtractFileDir(Application->ExeName) +"\\Notice_TPE.rtf");
}
//---------------------------------------------------------------------------

void __fastcall TAuthorizationForm::smiThaiClick(TObject *Sender)
{
  richeditNotice->Lines->LoadFromFile(ExtractFileDir(Application->ExeName) +"\\Notice_THA.rtf");
}
//---------------------------------------------------------------------------
#endif