object form_palette: Tform_palette
  Left = 903
  Height = 464
  Top = 258
  Width = 168
  Align = alRight
  BorderIcons = []
  BorderStyle = bsNone
  Caption = 'Actions'
  ClientHeight = 464
  ClientWidth = 168
  DesignTimePPI = 120
  DragMode = dmAutomatic
  FormStyle = fsStayOnTop
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnShow = FormShow
  LCLVersion = '1.8.0.6'
  object boutondeplacement: TSpeedButton
    AnchorSideLeft.Control = Owner
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    Left = 0
    Height = 38
    Hint = 'Déplacer un élément existant: translation, rotation, changement focale ou rayon de courbure...'
    Top = 2
    Width = 168
    Anchors = [akTop, akLeft, akRight]
    Caption = 'Déplacer'
    Font.Color = clGreen
    Font.Style = [fsBold]
    Glyph.Data = {
[encoded data, 9159 characters]
      0000000000000000000000000000000000000000000000000000
    }
    OnClick = boutondeplacementClick
    ShowHint = True
    ParentFont = False
    ParentShowHint = False
  end
  object boutondupliquer: TSpeedButton
    AnchorSideLeft.Control = Owner
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    Left = 0
    Height = 38
    Hint = 'Dupliquer un élément existant'
    Top = 40
    Width = 168
    Anchors = [akTop, akLeft, akRight]
    Caption = 'Dupliquer'
    Font.Color = clNavy
    Font.Style = [fsBold]
    Glyph.Data = {
[encoded data, 9159 characters]
      A0009C9C9C009191910000000000000000000000000000000000
    }
    OnClick = boutondupliquerClick
    ShowHint = True
    ParentFont = False
    ParentShowHint = False
  end
  object boutonprop: TSpeedButton
    AnchorSideLeft.Control = Owner
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    Left = 0
    Height = 38
    Hint = 'Propriétés d''un élément existant'
    Top = 78
    Width = 168
    Anchors = [akTop, akLeft, akRight]
    Caption = 'Propriétés'
    Font.Color = clBlue
    Font.Style = [fsBold]
    Glyph.Data = {
[encoded data, 9159 characters]
      0000000000000000000000000000000000000000000000000000
    }
    OnClick = boutonpropClick
    ShowHint = True
    ParentFont = False
    ParentShowHint = False
  end
  object boutonsuppression: TSpeedButton
    AnchorSideLeft.Control = Owner
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    Left = 0
    Height = 38
    Hint = 'Supprimer un élément existant'
    Top = 116
    Width = 168
    Anchors = [akTop, akLeft, akRight]
    Caption = 'Supprimer'
    Font.Color = clMaroon
    Font.Style = [fsBold]
    Glyph.Data = {
[encoded data, 9159 characters]
      0000000000000000000000000000000000000000000000000000
    }
    OnClick = boutonsuppressionClick
    ShowHint = True
    ParentFont = False
    ParentShowHint = False
  end
  object boutongroupe: TSpeedButton
    AnchorSideLeft.Control = Owner
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    Left = 0
    Height = 38
    Hint = 'Grouper des éléments existants pour les translater ensemble'
    Top = 154
    Width = 168
    Anchors = [akTop, akLeft, akRight]
    Caption = 'Grouper'
    Font.Color = clPurple
    Font.Style = [fsBold]
    Glyph.Data = {
[encoded data, 9159 characters]
      0000000000000000000000000000000000000000000000000000
    }
    OnClick = boutongroupeClick
    ShowHint = True
    ParentFont = False
    ParentShowHint = False
  end
  object SpeedButton3: TSpeedButton
    AnchorSideLeft.Control = Owner
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    Left = 0
    Height = 38
    Hint = 'Imprimer la simulation'
    Top = 270
    Width = 168
    Anchors = [akTop, akLeft, akRight]
    Caption = 'Imprimer'
    Font.Color = cl3DDkShadow
    Font.Style = [fsBold]
    Glyph.Data = {
[encoded data, 9159 characters]
      0000000000000000000000000000000000000000000000000000
    }
    OnClick = SpeedButton3Click
    ShowHint = True
    ParentFont = False
    ParentShowHint = False
  end
  object SpeedButton4: TSpeedButton
    AnchorSideLeft.Control = Owner
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    Left = 0
    Height = 38
    Hint = 'Exporter la simulation au format image PNG'
    Top = 308
    Width = 168
    Anchors = [akTop, akLeft, akRight]
    Caption = 'Export PNG'
    Font.Color = clTeal
    Font.Style = [fsBold]
    Glyph.Data = {
[encoded data, 9159 characters]
      D819DFDFE02CE0E1E346DFDDD960E4DDD36CF6EEDF1BF1E9DC00
    }
    OnClick = SpeedButton4Click
    ShowHint = True
    ParentFont = False
    ParentShowHint = False
  end
  object SpeedButton5: TSpeedButton
    AnchorSideLeft.Control = Owner
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    Left = 0
    Height = 38
    Hint = 'Export de la simulation au format image JPG'
    Top = 346
    Width = 168
    Anchors = [akTop, akLeft, akRight]
    Caption = 'Export JPG'
    Font.Style = [fsBold]
    Glyph.Data = {
[encoded data, 9159 characters]
      0000000000000000000000000000000000000000000000000000
    }
    OnClick = SpeedButton5Click
    ShowHint = True
    ParentFont = False
    ParentShowHint = False
  end
  object SpeedButton6: TSpeedButton
    AnchorSideLeft.Control = Owner
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    Left = 0
    Height = 38
    Hint = 'Copier simulation dans le presse-papier'
    Top = 422
    Width = 168
    Anchors = [akTop, akLeft, akRight]
    Caption = 'Copier'
    Font.Color = clOlive
    Font.Style = [fsBold]
    Glyph.Data = {
[encoded data, 9159 characters]
      0000000000000000000000000000000000000000000000000000
    }
    OnClick = SpeedButton6Click
    ShowHint = True
    ParentFont = False
    ParentShowHint = False
  end
  object SpeedButton1: TSpeedButton
    AnchorSideLeft.Control = Owner
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    Left = 0
    Height = 40
    Hint = 'Pour déplacer cette palette, glissez-déposez à partir de cette zone...'
    Top = 232
    Width = 168
    Anchors = [akTop, akLeft, akRight]
    Color = clAqua
    Flat = True
    Glyph.Data = {
[encoded data, 9159 characters]
      0000000000000000000000000000000000000000000000000000
    }
    OnMouseDown = SpeedButton1MouseDown
    OnMouseMove = SpeedButton1MouseMove
    OnMouseUp = SpeedButton1MouseUp
    ShowHint = True
    ParentShowHint = False
  end
  object SpeedButton2: TSpeedButton
    AnchorSideLeft.Control = Owner
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    Left = 0
    Height = 38
    Hint = 'Export de la simulation au format Postscript'
    Top = 384
    Width = 168
    Anchors = [akTop, akLeft, akRight]
    Caption = 'Export PS'
    Font.Color = clBlue
    Font.Style = [fsBold]
    OnClick = SpeedButton2Click
    ParentFont = False
  end
  object SpeedButton7: TSpeedButton
    AnchorSideLeft.Control = Owner
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    Left = 0
    Height = 38
    Top = 192
    Width = 168
    Anchors = [akTop, akLeft, akRight]
    Caption = 'Grouper tout'
    Font.Color = clRed
    Font.Style = [fsBold]
    Glyph.Data = {
[encoded data, 9159 characters]
      0000000000000000000000000000000000000000000000000000
    }
    OnClick = SpeedButton7Click
    ParentFont = False
  end
end
