object DescriptFrame: TDescriptFrame
  Left = 0
  Top = 0
  Width = 651
  Height = 405
  Color = clBtnFace
  ParentColor = False
  TabOrder = 0
  Visible = False
  OnResize = FrameResize
  object Splitter1: TSplitter
    Left = 245
    Top = 25
    Width = 8
    Height = 380
    Beveled = True
    OnMoved = Splitter1Moved
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 651
    Height = 25
    Align = alTop
    Alignment = taRightJustify
    BevelOuter = bvNone
    Caption = 'Description        '
    Color = clSkyBlue
    Font.Charset = ARABIC_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentBackground = False
    ParentFont = False
    TabOrder = 0
    OnDragOver = Panel1DragOver
    object Image1: TImage
      Tag = 3
      Left = 626
      Top = 4
      Width = 25
      Height = 20
      Cursor = crHandPoint
      Align = alRight
      Center = True
      Picture.Data = {
        07544269746D617036030000424D360300000000000036000000280000001000
        000010000000010018000000000000030000C40E0000C40E0000000000000000
        0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFC4CC
        CABBAB9D998371826653826653998371BBAB9DC4CCCAFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFB1B0A9947C6ABCAC9DDED3C9F5F0E8F5F0E8DED3C9
        BCAC9D947C6AB1B0A9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFB1B0A9AF9C8DE9E1
        D8FFFBF5F7F2E9785B47EEE8DEFFFBF5FFFBF4E9E1D8AF9C8DB1B0A9FFFFFFFF
        FFFFFFFFFFC4CCCA947C6BE9E1D8FFFCF5FFFCF5BCACA0785B47BCAB9EFFFCF5
        FFFCF6FFFCF5E9E1D8947C6AC4CCCAFFFFFFFFFFFFBBAB9EBCAC9FFFFCF7FFFC
        F7FFFCF7EEE8E0BCAC9FDDD4CAFFFCF6FFFDF6FFFCF6FFFCF7BCAC9FBBAB9EFF
        FFFFFFFFFF998372DED4CCFFFCF7FFFCF7FFFDF7DDD4CB785B47BCACA0FFFDF7
        FFFDF7FFFCF7FFFDF7DED4CC998372FFFFFFFFFFFF826653F5F2ECFFFDF8FFFD
        F8FFFDF8F7F3EE806552806552E6DFD7FFFDF9FFFDF8FFFDF8F5F2EC826654FF
        FFFFFFFFFF826754F5F2ECFFFDF9FFFDF9FFFDFAFFFDFAE6DFD7806552806552
        D5CAC1FFFDFAFFFDFAF5F2ED826654FFFFFFFFFFFF998373DED6CFFFFDFAFFFE
        FBEEE9E4EEE9E4FFFEFAF7F3F0896F5D896F5EFFFEFBFFFEFBDED5CF998373FF
        FFFFFFFFFFBBACA1BCADA2FFFEFCE6DFDA785B479A8474FFFEFCFFFDFC896F5E
        806552FFFEFCFFFEFCBCADA1BBACA1FFFFFFFFFFFFC4CCCA947C6CE9E3DFFFFE
        FDAB988B785B47896F5E896F5E785B47CCC1B8FFFEFDE9E3DF947C6CC4CCCAFF
        FFFFFFFFFFFFFFFFC8BCB3AF9D91E9E3E0FFFEFDDDD6D0BCADA3BCADA3EEEAE7
        FFFEFEE9E3E0AF9D91C8BCB4FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFC8BDB4947C
        6CBCADA3DED6D1F5F3F2F5F2F1DED6D1BCADA3947C6DC8BCB5FFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFC4CCCABBADA3998474826754826754998474
        BBADA3C4CCCAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFF}
      Transparent = True
      OnClick = HelpImageClick
    end
    object Shape1: TShape
      Left = 0
      Top = 24
      Width = 651
      Height = 1
      Align = alBottom
      Brush.Color = clBlack
    end
    object Shape2: TShape
      Left = 0
      Top = 0
      Width = 651
      Height = 4
      Align = alTop
      Brush.Color = clBlack
    end
    object STNameLabel: TLabel
      Left = 256
      Top = 6
      Width = 80
      Height = 15
      Caption = 'STNameLabel'
      Font.Charset = ARABIC_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object STComboBox: TComboBox
      Left = 2
      Top = 5
      Width = 245
      Height = 18
      Style = csDropDownList
      Font.Charset = ARABIC_CHARSET
      Font.Color = clWindowText
      Font.Height = -8
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ItemHeight = 10
      ParentFont = False
      ParentShowHint = False
      PopupMenu = STPopupMenu
      ShowHint = True
      TabOrder = 0
      OnExit = STComboBoxExit
      OnKeyPress = STComboBoxKeyPress
      OnSelect = STComboBoxSelect
    end
  end
  object BlocsTreeView: TTreeView
    Left = 0
    Top = 25
    Width = 245
    Height = 380
    Align = alLeft
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    HideSelection = False
    HotTrack = True
    Images = ImageList1
    Indent = 19
    ParentFont = False
    PopupMenu = BlocsPopupMenu
    ReadOnly = True
    RightClickSelect = True
    TabOrder = 1
    OnChange = BlocsTreeViewChange
    OnDragDrop = BlocsTreeViewDragDrop
    OnDragOver = BlocsTreeViewDragOver
    OnStartDrag = BlocsTreeViewStartDrag
  end
  object FunctionScrollBox: TScrollBox
    Left = 253
    Top = 25
    Width = 398
    Height = 380
    HorzScrollBar.Style = ssFlat
    VertScrollBar.Margin = 10
    VertScrollBar.Style = ssFlat
    Align = alClient
    BorderStyle = bsNone
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    PopupMenu = FonctionPopupMenu
    TabOrder = 2
    OnDragDrop = FunctionScrollBoxDragDrop
    OnDragOver = FunctionScrollBoxDragOver
    OnMouseMove = FunctionScrollBoxMouseMove
    OnMouseUp = FunctionScrollBoxMouseUp
  end
  object STBlocsFonctionsList: TActionList
    Images = ImageList1
    Left = 264
    Top = 216
    object NewSTAction: TAction
      Category = 'ST'
      Caption = 'Nouvelle S'#233'quence Type'
      OnExecute = NewSTActionExecute
    end
    object RenSTAction: TAction
      Category = 'ST'
      Caption = 'Renommer cette S'#233'quence Type'
      OnExecute = RenSTActionExecute
    end
    object SuppSTAction: TAction
      Category = 'ST'
      Caption = 'Supprimer cette S'#233'quence Type'
      OnExecute = SuppSTActionExecute
    end
    object CopySTAction: TAction
      Category = 'ST'
      Caption = 'Copier cette S'#233'quence Type'
      OnExecute = CopySTActionExecute
    end
    object PasteSTAction: TAction
      Category = 'ST'
      Caption = 'Remplacer cette S'#233'quence Type par la S'#233'quence Type copi'#233'e'
      OnExecute = PasteSTActionExecute
    end
    object DefBlocAction: TAction
      Category = 'Blocs'
      Caption = 'D'#233'finir ce Bloc'
      ImageIndex = 2
      OnExecute = DefBlocActionExecute
    end
    object SuppBlocAction: TAction
      Category = 'Blocs'
      Caption = 'Supprimer ce Bloc'
      ImageIndex = 6
      OnExecute = SuppBlocActionExecute
    end
    object InsertBlocBeforeAction: TAction
      Category = 'Blocs'
      Caption = 'Inserer un Bloc avant'
      ImageIndex = 0
      OnExecute = InsertBlocBeforeActionExecute
    end
    object InsertBlocAfterAction: TAction
      Category = 'Blocs'
      Caption = 'Ins'#233'rer un Bloc apr'#232's'
      ImageIndex = 0
      OnExecute = InsertBlocAfterActionExecute
    end
    object AddBlocAction: TAction
      Category = 'Blocs'
      Caption = 'Inclure un Bloc'
      ImageIndex = 0
      OnExecute = AddBlocActionExecute
    end
    object CopyBlocAction: TAction
      Category = 'Blocs'
      Caption = 'Copier ce Bloc'
      ImageIndex = 7
      OnExecute = CopyBlocActionExecute
    end
    object PasteBlocAction: TAction
      Category = 'Blocs'
      Caption = 'Coller le Bloc'
      ImageIndex = 5
      OnExecute = PasteBlocActionExecute
    end
    object SupprimerFonctionAction: TAction
      Category = 'ActStimTrait'
      Caption = 'Supprimer'
      ImageIndex = 6
      OnExecute = SupprimerFonctionActionExecute
    end
    object AddActionAction: TAction
      Category = 'ActStimTrait'
      Caption = 'Ajouter une Action'
      ImageIndex = 3
      OnExecute = AddActionActionExecute
    end
    object AddTraitementAction: TAction
      Category = 'ActStimTrait'
      Caption = 'Ajouter un Traitement'
      ImageIndex = 4
      OnExecute = AddTraitementActionExecute
    end
    object AddStimulusAction: TAction
      Category = 'ActStimTrait'
      Caption = 'Ajouter un Stimulus'
      ImageIndex = 1
      OnExecute = AddStimulusActionExecute
    end
    object AffecterGeneriqueAction: TAction
      Category = 'ActStimTrait'
      OnExecute = AffecterGeneriqueActionExecute
    end
    object DragDropDeplacerFonctionAction: TAction
      Category = 'Blocs'
      Caption = 'D'#233'placer la fonction dans ce Bloc'
      OnExecute = DragDropDeplacerFonctionActionExecute
    end
    object DragDropCopierFonctionAction: TAction
      Category = 'Blocs'
      Caption = 'Copier la fonction dans ce Bloc'
      OnExecute = DragDropCopierFonctionActionExecute
    end
    object EditerFoncionAction: TAction
      Category = 'ActStimTrait'
      Caption = 'Editer ...'
      ImageIndex = 10
      OnExecute = EditerFoncionActionExecute
    end
    object UpdateMainMenuAction: TAction
      Caption = 'UpdateMainMenuAction'
      OnExecute = UpdateMainMenuExecute
    end
    object GlobalVueSTAction: TAction
      Category = 'ST'
      Caption = 'Vue globale de cette S'#233'quence Type...'
      OnExecute = GlobalVueSTActionExecute
    end
  end
  object BlocsPopupMenu: TPopupMenu
    Images = ImageList1
    OnPopup = BlocsPopupMenuPopup
    Left = 8
    Top = 96
    object DfinirceBloc1: TMenuItem
      Action = DefBlocAction
    end
    object N6: TMenuItem
      Caption = '-'
    end
    object InsertBlocBeforeMenuItem: TMenuItem
      Action = InsertBlocBeforeAction
    end
    object InsertBlocAfterMenuItem: TMenuItem
      Action = InsertBlocAfterAction
    end
    object InclureBlocMenuItem: TMenuItem
      Action = AddBlocAction
    end
    object N2: TMenuItem
      Caption = '-'
    end
    object AddActionMenuItem: TMenuItem
      Action = AddActionAction
    end
    object AddTraitementMenuItem: TMenuItem
      Action = AddTraitementAction
    end
    object AddStimulusMenuItem: TMenuItem
      Action = AddStimulusAction
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object CopyBlocMenuItem: TMenuItem
      Action = CopyBlocAction
    end
    object PastBlocMenuItem: TMenuItem
      Action = PasteBlocAction
    end
    object N3: TMenuItem
      Caption = '-'
    end
    object SuppBlocMenuItem: TMenuItem
      Action = SuppBlocAction
    end
  end
  object STPopupMenu: TPopupMenu
    OnPopup = STPopupMenuPopup
    Left = 72
    Top = 8
    object NouvelleSquencetype2: TMenuItem
      Action = NewSTAction
    end
    object Renommercettesquencetype2: TMenuItem
      Action = RenSTAction
    end
    object N4: TMenuItem
      Caption = '-'
    end
    object Copiercettesquencetype2: TMenuItem
      Action = CopySTAction
    end
    object Collerlasquencetype2: TMenuItem
      Action = PasteSTAction
    end
    object N5: TMenuItem
      Caption = '-'
    end
    object Supprimercettesquencetype2: TMenuItem
      Action = SuppSTAction
    end
    object N8: TMenuItem
      Caption = '-'
    end
    object VueglobaledecetteSquenceType1: TMenuItem
      Action = GlobalVueSTAction
    end
  end
  object DeleteFunctionTimer: TTimer
    Enabled = False
    Interval = 100
    OnTimer = DeleteFunctionTimerTimer
    Left = 256
    Top = 40
  end
  object ESPopupMenu: TPopupMenu
    AutoHotkeys = maManual
    Left = 256
    Top = 88
  end
  object ActionPopupMenu: TPopupMenu
    Left = 288
    Top = 88
  end
  object TraitementPopupMenu: TPopupMenu
    Left = 320
    Top = 88
  end
  object StimulusPopupMenu: TPopupMenu
    Left = 352
    Top = 88
  end
  object FichierEchangeXML: TXMLDocument
    Active = True
    NodeIndentStr = #9
    Options = [doNodeAutoIndent]
    Left = 304
    Top = 40
    DOMVendorDesc = 'MSXML'
  end
  object DragDropPopupMenu: TPopupMenu
    Left = 8
    Top = 136
    object Dplacerlafonction1: TMenuItem
      Action = DragDropDeplacerFonctionAction
    end
    object Copierlafonction1: TMenuItem
      Action = DragDropCopierFonctionAction
    end
  end
  object ImageList1: TImageList
    Left = 104
    Top = 176
    Bitmap = {
      [encoded data, 34112 characters]
      000000000000}
  end
  object FonctionPopupMenu: TPopupMenu
    AutoPopup = False
    Images = ImageList1
    OnPopup = FonctionPopupMenuPopup
    Left = 272
    Top = 160
    object EditerFonction: TMenuItem
      Action = EditerFoncionAction
    end
    object InsertAfter: TMenuItem
      Caption = '-'
    end
    object Affecter: TMenuItem
      Caption = 'Affecter'
      ImageIndex = 5
    end
    object N7: TMenuItem
      Caption = '-'
    end
    object AjouterAction: TMenuItem
      Action = AddActionAction
    end
    object AjouterTraitement: TMenuItem
      Action = AddTraitementAction
    end
    object AjouterStimulus: TMenuItem
      Action = AddStimulusAction
    end
    object InsertBefore: TMenuItem
      Caption = '-'
    end
    object SupprimerFonction: TMenuItem
      Action = SupprimerFonctionAction
    end
  end
end
