/*[]=====================================================================[]*/
/*[]     LeadTools C++ Class Library - Version 1.0                       []*/
/*[]                                                                     []*/
/*[]                                                                     []*/
/*[]     Copyright (c) 1991-2000 LEAD Technologies, Inc.                 []*/
/*[]     All Rights Reserved.                                            []*/
/*[]=====================================================================[]*/


//include files
#include "AnnBmp.h"
#include <vcl.h>
#pragma hdrstop

#include "HpLnkDlg.h"
//---------------------------------------------------------------------
#pragma resource "*.dfm"
THyperLinkDlg *HyperLinkDlg;
//---------------------------------------------------------------------
__fastcall THyperLinkDlg::THyperLinkDlg(TComponent* AOwner)
	: TForm(AOwner)
{
}
//---------------------------------------------------------------------
void __fastcall THyperLinkDlg::Radio_NoneClick(TObject *Sender)
{
   OKBtn->Enabled=TRUE;
   Edit_RunProg->Enabled=FALSE;
   Edit_WebPage->Enabled=FALSE;
   Button_Browse->Enabled=FALSE;
   nItemChecked=ANNLINK_NONE;
}
//---------------------------------------------------------------------------
void __fastcall THyperLinkDlg::Radio_LTANNEVENTClick(TObject *Sender)
{
   OKBtn->Enabled=TRUE;
   Edit_RunProg->Enabled=FALSE;
   Edit_WebPage->Enabled=FALSE;
   Button_Browse->Enabled=FALSE;
   nItemChecked=ANNLINK_LTANNEVENT;
}
//---------------------------------------------------------------------------
void __fastcall THyperLinkDlg::Radio_UsrMsgClick(TObject *Sender)
{
   OKBtn->Enabled=TRUE;
   Edit_RunProg->Enabled=FALSE;
   Edit_WebPage->Enabled=FALSE;
   Button_Browse->Enabled=FALSE;
   nItemChecked=ANNLINK_USERMSG;
}
//---------------------------------------------------------------------------
void __fastcall THyperLinkDlg::Radio_RunProgClick(TObject *Sender)
{
   OKBtn->Enabled=(Edit_RunProg->GetTextLen()>0);
   Edit_RunProg->Enabled=TRUE;
   Edit_WebPage->Enabled=FALSE;
   Button_Browse->Enabled=TRUE;
   nItemChecked=ANNLINK_RUN;
}
//---------------------------------------------------------------------------
void __fastcall THyperLinkDlg::Radio_WebPageClick(TObject *Sender)
{
   OKBtn->Enabled=(Edit_WebPage->GetTextLen()>0);
   Edit_RunProg->Enabled=FALSE;
   Edit_WebPage->Enabled=TRUE;
   Button_Browse->Enabled=FALSE;
   nItemChecked=ANNLINK_RUN;
}
//---------------------------------------------------------------------------
void __fastcall THyperLinkDlg::Edit_RunProgChange(TObject *Sender)
{
   OKBtn->Enabled=(Edit_RunProg->GetTextLen()>0);
   nItemChecked=ANNLINK_WEBPAGE;
}
//---------------------------------------------------------------------------
void __fastcall THyperLinkDlg::Edit_WebPageChange(TObject *Sender)
{
   OKBtn->Enabled=(Edit_WebPage->GetTextLen()>0);
}
//---------------------------------------------------------------------------
void __fastcall THyperLinkDlg::Button_BrowseClick(TObject *Sender)
{
   OpenDlg->FileName=Edit_RunProg->Text;

   if(OpenDlg->Execute())
      Edit_RunProg->Text=OpenDlg->FileName;
}
//---------------------------------------------------------------------------