object MainForm: TMainForm
  Left = 273
  Top = 120
  Caption = 'DICOM Demo'
  ClientHeight = 559
  ClientWidth = 782
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Splitter1: TSplitter
    Left = 183
    Top = 125
    Height = 393
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 782
    Height = 125
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 0
    object btnAnimate: TSpeedButton
      Left = 11
      Top = 91
      Width = 109
      Height = 25
      AllowAllUp = True
      GroupIndex = 1
      Caption = 'Animate'
      Enabled = False
      OnClick = btnAnimateClick
    end
    object btnOpen: TButton
      Left = 11
      Top = 8
      Width = 109
      Height = 25
      Caption = 'Open...'
      TabOrder = 0
      OnClick = btnOpenClick
    end
    object GroupBox1: TGroupBox
      Left = 160
      Top = 9
      Width = 501
      Height = 108
      Caption = ' DICOM info '
      TabOrder = 1
      object lblImageTypeD: TLabel
        Left = 13
        Top = 17
        Width = 61
        Height = 13
        Caption = 'Image Type:'
      end
      object lblImageTypeV: TLabel
        Left = 107
        Top = 17
        Width = 10
        Height = 13
        Caption = '--'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object lblAcquisitionDateV: TLabel
        Left = 107
        Top = 35
        Width = 10
        Height = 13
        Caption = '--'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object lblAcquisitionDateD: TLabel
        Left = 13
        Top = 35
        Width = 81
        Height = 13
        Caption = 'Acquisition Date:'
      end
      object lblAcquisitionTimeD: TLabel
        Left = 13
        Top = 53
        Width = 80
        Height = 13
        Caption = 'Acquisition Time:'
      end
      object lblAcquisitionTimeV: TLabel
        Left = 107
        Top = 53
        Width = 10
        Height = 13
        Caption = '--'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object lblAnatomicRegionD: TLabel
        Left = 13
        Top = 70
        Width = 84
        Height = 13
        Caption = 'Anatomic Region:'
      end
      object lblAnatomicRegionV: TLabel
        Left = 107
        Top = 70
        Width = 10
        Height = 13
        Caption = '--'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object lblPatientsNameV: TLabel
        Left = 107
        Top = 87
        Width = 10
        Height = 13
        Caption = '--'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object lblPatientsNameD: TLabel
        Left = 13
        Top = 87
        Width = 75
        Height = 13
        Caption = 'Patient'#39's Name:'
      end
    end
    object btnSave: TButton
      Left = 11
      Top = 35
      Width = 109
      Height = 25
      Caption = 'Save...'
      Enabled = False
      TabOrder = 2
      OnClick = btnSaveClick
    end
    object btnMoreTags: TButton
      Left = 698
      Top = 91
      Width = 75
      Height = 25
      Caption = 'More Info...'
      Enabled = False
      TabOrder = 3
      OnClick = btnMoreTagsClick
    end
    object btnSaveAsDicom: TButton
      Left = 11
      Top = 63
      Width = 109
      Height = 25
      Caption = 'Save as DICOM...'
      Enabled = False
      TabOrder = 4
      OnClick = btnSaveAsDicomClick
    end
  end
  object ImageEnMView1: TImageEnMView
    Left = 0
    Top = 125
    Width = 183
    Height = 393
    Background = clBtnFace
    ParentCtl3D = False
    StoreType = ietNormal
    ThumbWidth = 150
    ThumbHeight = 150
    HorizBorder = 4
    VertBorder = 4
    TextMargin = 0
    OnImageSelect = ImageEnMView1ImageSelect
    GridWidth = -1
    SelectionWidth = 3
    SelectionColor = clRed
    Style = iemsACD
    ThumbnailsBackground = clBtnFace
    ThumbnailsBackgroundSelected = clBtnFace
    MultiSelectionOptions = []
    ThumbnailsBorderWidth = 0
    ThumbnailsBorderColor = clBlack
    OnProgress = ImageEnMView1Progress
    OnFinishWork = ImageEnMView1FinishWork
    OnPlayFrame = ImageEnMView1PlayFrame
    Align = alLeft
    TabOrder = 1
    ExplicitTop = 122
    ExplicitHeight = 396
  end
  object ImageEnView1: TImageEnView
    Left = 186
    Top = 125
    Width = 596
    Height = 393
    Background = clBtnFace
    ParentCtl3D = False
    LegacyBitmap = False
    ZoomFilter = rfTriangle
    EnableInteractionHints = True
    Align = alClient
    TabOrder = 2
    ExplicitTop = 122
    ExplicitHeight = 396
  end
  object Panel2: TPanel
    Left = 0
    Top = 518
    Width = 782
    Height = 41
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 3
    object Label1: TLabel
      Left = 15
      Top = 11
      Width = 30
      Height = 13
      Caption = 'Zoom:'
    end
    object trkZoom: TTrackBar
      Left = 45
      Top = 6
      Width = 150
      Height = 30
      Max = 2000
      Min = 1
      Frequency = 100
      Position = 1
      TabOrder = 0
      OnChange = trkZoomChange
    end
    object chkQualityFilter: TCheckBox
      Left = 219
      Top = 12
      Width = 97
      Height = 17
      Caption = 'Quality Filter'
      Checked = True
      State = cbChecked
      TabOrder = 1
      OnClick = chkQualityFilterClick
    end
    object ProgressBar1: TProgressBar
      Left = 328
      Top = 8
      Width = 444
      Height = 25
      TabOrder = 2
    end
  end
  object OpenImageEnDialog1: TOpenImageEnDialog
    Filter = 
      'File grafici comuni (*.tif;*.gif;*.jpg;*.pcx;*.bmp;*.ico;*.cur;*' +
      '.png;*.dcm;*.wmf;*.emf;*.tga;*.pxm;*.wbmp;*.jp2;*.j2k;*.dcx;*.cr' +
      'w;*.psd;*.iev;*.lyr;*.all;*.avi;*.mpg;*.wmv)|*.tif;*.gif;*.jpg;*' +
      '.pcx;*.bmp;*.ico;*.cur;*.png;*.dcm;*.wmf;*.emf;*.tga;*.pxm;*.wbm' +
      'p;*.jp2;*.j2k;*.dcx;*.crw;*.psd;*.iev;*.lyr;*.all;*.avi;*.mpg;*.' +
      'wmv|Tutti (*.*)|*.*|TIFF Bitmap (*.tif;*.tiff;*.fax;*.g3n;*.g3f;' +
      '*.xif)|*.tif;*.tiff;*.fax;*.g3n;*.g3f;*.xif|CompuServe Bitmap (*' +
      '.gif)|*.gif|JPEG Bitmap (*.jpg;*.jpeg;*.jpe;*.jif)|*.jpg;*.jpeg;' +
      '*.jpe;*.jif|PaintBrush (*.pcx)|*.pcx|Windows Bitmap (*.bmp;*.dib' +
      ';*.rle)|*.bmp;*.dib;*.rle|Windows Icon (*.ico)|*.ico|Windows Cur' +
      'sor (*.cur)|*.cur|Portable Network Graphics (*.png)|*.png|DICOM ' +
      'Bitmap (*.dcm;*.dic;*.dicom)|*.dcm;*.dic;*.dicom|Windows Metafil' +
      'e (*.wmf)|*.wmf|Enhanced Windows Metafile (*.emf)|*.emf|Targa Bi' +
      'tmap (*.tga;*.targa;*.vda;*.icb;*.vst;*.pix)|*.tga;*.targa;*.vda' +
      ';*.icb;*.vst;*.pix|Portable Pixmap, GrayMap, BitMap (*.pxm;*.ppm' +
      ';*.pgm;*.pbm)|*.pxm;*.ppm;*.pgm;*.pbm|Wireless Bitmap (*.wbmp)|*' +
      '.wbmp|JPEG2000 (*.jp2)|*.jp2|JPEG2000 Code Stream (*.j2k;*.jpc;*' +
      '.j2c)|*.j2k;*.jpc;*.j2c|Multipage PCX (*.dcx)|*.dcx|Camera RAW (' +
      '*.crw;*.cr2;*.nef;*.raw;*.pef;*.raf;*.x3f;*.bay;*.orf;*.srf;*.mr' +
      'w;*.dcr;*.sr2)|*.crw;*.cr2;*.nef;*.raw;*.pef;*.raf;*.x3f;*.bay;*' +
      '.orf;*.srf;*.mrw;*.dcr;*.sr2|Photoshop PSD (*.psd)|*.psd|Vectori' +
      'al objects (*.iev)|*.iev|Layers (*.lyr)|*.lyr|Layers and objects' +
      ' (*.all)|*.all|Video for Windows (*.avi)|*.avi|Mpeg (*.mpeg;*.mp' +
      'g)|*.mpeg;*.mpg|Windows Media Video (*.wmv)|*.wmv'
    OnPreviewFile = OpenImageEnDialog1PreviewFile
    Left = 634
    Top = 220
  end
  object SaveImageEnDialog1: TSaveImageEnDialog
    Filter = 
      'JPEG Bitmap (JPG)|*.jpg|CompuServe Bitmap (GIF)|*.gif|TIFF Bitma' +
      'p (TIF)|*.tif|PaintBrush (PCX)|*.pcx|Portable Network Graphics (' +
      'PNG)|*.png|Windows Bitmap (BMP)|*.bmp|OS/2 Bitmap (BMP)|*.bmp|Ta' +
      'rga Bitmap (TGA)|*.tga|Portable PixMap (PXM)|*.pxm|Portable PixM' +
      'ap (PPM)|*.ppm|Portable GreyMap (PGM)|*.pgm|Portable Bitmap (PBM' +
      ')|*.pbm|JPEG2000 (JP2)|*.jp2|JPEG2000 Code Stream (J2K)|*.j2k|Mu' +
      'ltipage PCX (DCX)|*.dcx'
    OnPreviewFile = OpenImageEnDialog1PreviewFile
    ExOptions = [sdShowPreview, sdShowAdvanced]
    Left = 632
    Top = 280
  end
end