//---------------------------------------------------------------------------
#ifndef VR_FormH
#define VR_FormH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ComCtrls.hpp>
#include <ExtCtrls.hpp>
#include "MainForm.h"
//---------------------------------------------------------------------------
class TVR_Frm : public TForm
{
__published:	// IDE-managed Components
    TBevel *Bevel1;
    TButton *Button_First;
    TButton *Button_Next;
    TButton *Button_Prev;
    TButton *Button_Last;
    TLabel *Label_Code;
    TLabel *Label_Name;
    TLabel *Label_Length;
    TLabel *Label_Restrict;
    TLabel *Label_UnitSize;
    TEdit *Edit_Code;
    TEdit *Edit_Name;
    TEdit *Edit_Length;
    TEdit *Edit_Restrict;
    TEdit *Edit_UnitSize;
    TListView *ListView1;
    TBevel *Bevel2;
    TButton *Button_DefaultVR;
    TButton *Button_ResetVR;
    TButton *Button_Insert;
    TButton *Button_Delete;
    TButton *Button_SetName;
    TEdit *Edit_NewVRName;
    TLabel *Label1;
    TBevel *Bevel3;void __fastcall Button_DefaultVRClick(TObject *Sender);
    void __fastcall Button_ResetVRClick(TObject *Sender);
    void __fastcall Button_InsertClick(TObject *Sender);
    void __fastcall Button_DeleteClick(TObject *Sender);
    void __fastcall Button_SetNameClick(TObject *Sender);
    void __fastcall Button_FirstClick(TObject *Sender);
    void __fastcall Button_LastClick(TObject *Sender);
    void __fastcall Button_NextClick(TObject *Sender);
    void __fastcall Button_PrevClick(TObject *Sender);
    void __fastcall ListView1Change(TObject *Sender, TListItem *Item, TItemChange Change);
   void __fastcall FormCreate(TObject *Sender);
private:	// User declarations
    TLEADDicom *LEADDicom1;
    void __fastcall UpdateList(void);
    void __fastcall FillList(void);
    void __fastcall DisplayItem(void);
    void __fastcall UpdateButtons(void);
public:		// User declarations
    __fastcall TVR_Frm(TComponent* Owner);
    Word __fastcall GetVRCode(AnsiString sCode);
};
//---------------------------------------------------------------------------
extern PACKAGE TVR_Frm *VR_Frm;
//---------------------------------------------------------------------------
#endif