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

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

#include "RangeDlg.h"
//---------------------------------------------------------------------
#pragma resource "*.dfm"
TRangeDlg *RangeDlg;
//---------------------------------------------------------------------
__fastcall TRangeDlg::TRangeDlg(TComponent* AOwner)
	: TForm(AOwner)
{
}
//---------------------------------------------------------------------
void __fastcall TRangeDlg::ScrollBarRangeChange(TObject *Sender)
{
   EditRange->Text=ScrollBarRange->Position;
}
//---------------------------------------------------------------------------
void __fastcall TRangeDlg::EditRangeChange(TObject *Sender)
{
   int nPos=ScrollBarRange->Min;

   if(EditRange->GetTextLen())
      nPos=EditRange->Text.ToInt();
   else
      EditRange->Text=ScrollBarRange->Min;

   if(nPos<ScrollBarRange->Min)
      nPos=ScrollBarRange->Min;

   if(nPos>ScrollBarRange->Max)
      nPos=ScrollBarRange->Max;

   if(EditRange->Text.ToInt()!=nPos)
      EditRange->Text=nPos;

   ScrollBarRange->Position=nPos;
}
//---------------------------------------------------------------------------