unit1.dfm

dicom viewer 医学影像浏览器

object Form1: TForm1
  Left = 237
  Top = 134
  Width = 778
  Height = 480
  Caption = 'DICOM'#22270#20687#26597#30475
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    0000010001002020100000000000E80200001600000028000000200000004000
    0000010004000000000080020000000000000000000000000000000000000000
    000000008000008000000080800080000000800080008080000080808000C0C0
    C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    0000000000000000000000000000000000000000007777770000000000000000
    0000000000000007000000000000000000000000000000070000000000000000
    0000000000777007000000000000000000077070007770070000700000000000
    0077000700787000000007000000000007708000077877000070007000000000
    07088807777777770777000700000000008F88877FFFFF077887700700000000
    00088888F88888FF08870070000000000000880888877778F070007000000007
    77088888880007778F770077777000700008F088007777077F07000000700700
    008F08880800077778F7700000700708888F0880F08F807078F7777700700708
    F88F0780F070F07078F7887700700708888F0780F077807088F7777700700700
    008F0788FF00080888F77000007000000008F0780FFFF0088F77007000000000
    0008F07788000888887700700000000000008F07788888880870007000000000
    00088FF0077788088887000700000000008F888FF00000F87887700700000000
    0708F8088FFFFF88078700700000000007708000088888000070070000000000
    0077007000888007000070000000000000077700008F80070007000000000000
    0000000000888007000000000000000000000000000000070000000000000000
    000000000777777700000000000000000000000000000000000000000000FFFF
    FFFFFFFC0FFFFFFC0FFFFFF80FFFFFF80FFFFE180E7FFC00043FF800001FF800
    000FF800000FFC00001FFE00001FE0000001C000000180000001800000018000
    00018000000180000001FC00001FFC00001FFE00001FFC00000FF800000FF800
    001FF800003FFC180C7FFE380EFFFFF80FFFFFF80FFFFFF80FFFFFFFFFFF}
  OldCreateOrder = False
  OnCreate = FormCreate
  OnResize = FormResize
  PixelsPerInch = 96
  TextHeight = 13
  object ezDICOMX1: TezDICOMX
    Left = 0
    Top = 24
    Width = 557
    Height = 305
    ParentColor = False
    ParentFont = False
    TabOrder = 0
    OnDCMmouseMoveIntensity = ezDICOMX1DCMmouseMoveIntensity
    ControlData = {
      545046300954657A4449434F4D5808657A4449434F4D58044C65667402000354
      6F700218055769647468032D02064865696768740331010D416374697665436F
      6E74726F6C0708546F6F6C44726F700743617074696F6E0608657A4449434F4D
      5805436F6C6F720709636C42746E466163650C466F6E742E4368617273657407
      0F44454641554C545F434841525345540A466F6E742E436F6C6F72070C636C57
      696E646F77546578740B466F6E742E48656967687402F509466F6E742E4E616D
      65060D4D532053616E732053657269660A466F6E742E5374796C650B000E4F6C
      644372656174654F72646572080D506978656C73506572496E636802600A5465
      7874486569676874020D0000}
  end
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 770
    Height = 29
    Caption = 'ToolBar1'
    Ctl3D = False
    Flat = True
    Images = ImageList1
    TabOrder = 1
    object ToolButton1: TToolButton
      Left = 0
      Top = 0
      Hint = #25171#24320'DICOM'#25991#20214
      Caption = 'ToolButton1'
      ImageIndex = 0
      ParentShowHint = False
      ShowHint = True
      OnClick = ToolButton1Click
    end
    object ToolButton2: TToolButton
      Left = 23
      Top = 0
      Width = 8
      Caption = 'ToolButton2'
      ImageIndex = 1
      Style = tbsSeparator
    end
    object ToolButton3: TToolButton
      Left = 31
      Top = 0
      Hint = #19978#19968#23618#22270#20687
      Caption = 'ToolButton3'
      ImageIndex = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = ToolButton3Click
    end
    object ToolButton4: TToolButton
      Left = 54
      Top = 0
      Hint = #19979#19968#23618#22270#20687
      Caption = 'ToolButton4'
      ImageIndex = 3
      ParentShowHint = False
      ShowHint = True
      OnClick = ToolButton4Click
    end
    object ToolButton5: TToolButton
      Left = 77
      Top = 0
      Width = 8
      Caption = 'ToolButton5'
      ImageIndex = 4
      Style = tbsSeparator
    end
    object ToolButton21: TToolButton
      Left = 85
      Top = 0
      Hint = #22797#21046#21040#21098#36148#26495
      Caption = 'ToolButton21'
      ImageIndex = 9
      ParentShowHint = False
      ShowHint = True
      OnClick = ToolButton21Click
    end
    object ToolButton6: TToolButton
      Left = 108
      Top = 0
      Hint = #22270#20687#21478#23384#20026
      Caption = 'ToolButton6'
      ImageIndex = 1
      ParentShowHint = False
      ShowHint = True
      OnClick = ToolButton6Click
    end
    object ToolButton11: TToolButton
      Left = 131
      Top = 0
      Width = 8
      Caption = 'ToolButton11'
      ImageIndex = 2
      Style = tbsSeparator
    end
    object ToolButton7: TToolButton
      Left = 139
      Top = 0
      Hint = #22270#20687'/'#25991#26412#20999#25442
      Caption = 'ToolButton7'
      ImageIndex = 6
      ParentShowHint = False
      ShowHint = True
      OnClick = ToolButton7Click
    end
    object ToolButton19: TToolButton
      Left = 162
      Top = 0
      Hint = #24179#28369#36793#32536
      Caption = 'ToolButton19'
      ImageIndex = 7
      ParentShowHint = False
      ShowHint = True
      OnClick = ToolButton19Click
    end
    object ToolButton20: TToolButton
      Left = 185
      Top = 0
      Hint = #27979#37327#24037#20855
      Caption = 'ToolButton20'
      ImageIndex = 8
      ParentShowHint = False
      ShowHint = True
      OnClick = ToolButton20Click
    end
    object ToolButton13: TToolButton
      Left = 208
      Top = 0
      Width = 8
      Caption = 'ToolButton13'
      ImageIndex = 4
      Style = tbsSeparator
    end
    object ComboBox1: TComboBox
      Left = 216
      Top = 0
      Width = 73
      Height = 24
      Hint = #22810#24133#35270#22270#36873#39033
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = 'Arial'
      Font.Style = []
      ItemHeight = 16
      ItemIndex = 0
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 5
      Text = '1x1'
      OnSelect = ComboBox1Select
      Items.Strings = (
        '1x1'
        '2x2'
        '2x3'
        '3x3'
        '3x4'
        '4x4'
        '4x5'
        '5x5'
        '5x6')
    end
    object ToolButton12: TToolButton
      Left = 289
      Top = 0
      Width = 8
      Caption = 'ToolButton12'
      ImageIndex = 3
      Style = tbsSeparator
    end
    object ComboBox2: TComboBox
      Left = 297
      Top = 0
      Width = 76
      Height = 24
      Hint = #22270#20687#32553#25918
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = 'Arial'
      Font.Style = []
      ItemHeight = 16
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      Text = '100%'
      OnSelect = ComboBox2Select
      Items.Strings = (