object SDIAppForm: TSDIAppForm Left = 228 Top = 242 HelpContext = 1 VertScrollBar.Visible = False ActiveControl = PanelSpeed AutoScroll = False Caption = 'D�clic' ClientHeight = 471 ClientWidth = 632 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] Icon.Data = {} KeyPreview = True Menu = MenuPrincipal ShowHint = True OnClose = FormClose OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnDestroy = FormDestroy OnKeyDown = FormKeyDown OnKeyUp = FormKeyUp OnResize = FormResize OnShow = FormShow PixelsPerInch = 96 TextHeight = 16 object PanelSpeed: TPanel Left = 582 Top = 0 Width = 50 Height = 451 Cursor = 11 Align = alRight Alignment = taRightJustify BevelOuter = bvNone ParentShowHint = False ShowHint = True TabOrder = 0 object Bevel4: TBevel Left = 1 Top = 0 Width = 48 Height = 2 Shape = bsTopLine end object Bevel1: TBevel Left = 1 Top = 75 Width = 49 Height = 2 Shape = bsTopLine end object Bevel2: TBevel Left = 1 Top = 198 Width = 51 Height = 2 Shape = bsTopLine end object Bevel3: TBevel Left = 1 Top = 297 Width = 51 Height = 2 Shape = bsTopLine end object Bevel5: TBevel Left = 1 Top = 348 Width = 48 Height = 2 Shape = bsTopLine end object SpeedPoint: TSpeedButton Left = 1 Top = 3 Width = 24 Height = 24 Hint = 'point|cliquer un point ' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888888888888888888888 88F888888888888888888088888888888888888887F888888888888888888088 8888888888888888F7FFF8888888888888800000888888888888888777778888 8888888888888088888888888888888887F88888888888888888808888888888 8888888887888888888888888888888808888888888888888888088888888888 8888888887778888888888888888877788888888888888888B33788888888888 88888B3378888888888888888BB337888888888888888BB33788888888888888 88BB337888888888888888BB3378888888888888888BB337888888888888888B B3378888888888888888BB378888888888888888BB3788888888888888888B78 88888888888888888B78} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedCreationClick end object SpeedSegment: TSpeedButton Left = 25 Top = 3 Width = 24 Height = 24 Hint = 'segment|pointer une extr�mit� et draguer vers l'#39'autre' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888888888888888F88888 88888888888F8088888888888888880887FFFFFFFFFFFFFFFF7F800000000000 000000088777777777777777777F808888888888888888088788888888888888 8878888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888808888888888888888888088888888888 8888888887778888888888888888877788888888888888888B33788888888888 88888B3378888888888888888BB337888888888888888BB33788888888888888 88BB337888888888888888BB3378888888888888888BB337888888888888888B B3378888888888888888BB378888888888888888BB3788888888888888888B78 88888888888888888B78} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedCreationClick end object SpeedDroite2p: TSpeedButton Left = 1 Top = 27 Width = 24 Height = 24 Hint = 'droite 2 pts|Pointer le premier point et draguer vers le second.' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888888888888888888888 888888888888888888888F8888888888F8888888088888888880888888FF7FFF FFFFFFF7FFFF8000000000000000000887777777777777777778888808888888 8880888888887888888888878888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888808888888888888888888088888888888 8888888887778888888888888888877788888888888888888B33788888888888 88888B3378888888888888888BB337888888888888888BB33788888888888888 88BB337888888888888888BB3378888888888888888BB337888888888888888B B3378888888888888888BB378888888888888888BB3788888888888888888B78 88888888888888888B78} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedCreationClick end object SpeedDroite: TSpeedButton Left = 25 Top = 27 Width = 24 Height = 24 Hint = 'droite|Pointer un pointer et draguer vers un second point.' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888888888888888FFFFFF FFFFFFFFFFFF8000000000000000000887777777777777777778888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888808888888888888888888088888888888 8888888887778888888888888888877788888888888888888B33788888888888 88888B3378888888888888888BB337888888888888888BB33788888888888888 88BB337888888888888888BB3378888888888888888BB337888888888888888B B3378888888888888888BB378888888888888888BB3788888888888888888B78 88888888888888888B78} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedCreationClick end object SpeedCercle2p: TSpeedButton Left = 1 Top = 51 Width = 24 Height = 24 Hint = 'cercle 2 pts|Pointer le centre et draguer vers le point rayon.' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888888888888888888888888888888888888888888888888888888888888 88888888888000008888888888888888FFFFF888888888888007888700888888 888888FF77777FF8F8888888078888888707088888888F7788888787F8888880 788888888870788888887788888888777F88880788888888880708888887F888 888888F78F888808888888888888088888878888888888887F88807888888888 88887088887F8888888F888878F880788888808888887088887F8888887FF888 87F880788888000888887088887F88888777888887F880788888808888887088 887F88888878888887F8807888888888088808888878F8888888808887F88808 88888888877708888887F8888888887770888807888888888B33788888878F88 888888B337888880788888888BB33788888878F8888888BB3378888807888888 87BB33788888878FF8888F7BB337888880078887008BB337888888778FFFF778 BB338888888000008888BB3788888888777778888BB388888888888888888B78 888888888888888888B7} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedCreationClick end object SpeedCercle: TSpeedButton Left = 25 Top = 51 Width = 24 Height = 24 Hint = 'cercle|Pointer le centre et draguer pour fixer le rayon.' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888800000888888888888888FFFFF8888888888888007888700888888 88888FF77777FF888888888807888888870888888888F778888878F888888880 7888888888708888888778888888878F888888078888888888870888887F8888 88888878F888880888888888888708888878888888888887F888807888888888 8888708887F88888888888878F888078888888888888708887F8888888888888 7F888078888888888888708887F88888888888887F8880788888888888887088 87F88888888888887F8880788888888808887088878F8888888808887F888808 8888888887770888887F88888888877708888807888888888B3378888878F888 88888B3378888880788888888BB3378888878F8888888BB33788888807888888 87BB3378888878FF8888F7BB3378888880078887008BB33788888778FFFF778B B3378888888000008888BB378888888777778888BB3788888888888888888B78 88888888888888888B78} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedCreationClick end object SpeedTriangle: TSpeedButton Left = 1 Top = 78 Width = 24 Height = 24 Hint = 'triangle|Saisir tout � tour les trois sommets.' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888888888888888888888888888888888888888888888888888888888888 88888888888888888888888888888F88888888888F8888880877777777780888 88887FFFFFFFFFFF7FF888800000000000000088888777777777777777888888 0088888888800888888877F888888887788888887088888888078888888887F8 8888887F8888888870888888880788888888878F888888788888888887088888 807888888888887F888887888888888887088888778888888888887F88887F88 8888888887088888078888888888887F88887888888888888708888078888888 88888878F887888888888888887088078888888888888887F87F888888888888 887088078888888888888887F878888888888888887080788888888888888887 87888888888888888887008888888888888888887FF888888888888888800088 8888888888888887778888888888888888880888888888888888888878888888 8888888888888888888888888888888888888888888888888888888888888888 88888888888888888888} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedConstructionClick end object SpeedPointSur: TSpeedButton Left = 25 Top = 78 Width = 24 Height = 24 Hint = 'point sur ...|Cliquer l'#39'objet h�te.' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888888888888888888888 88888888888888888888888FFF8F8FFF88888888880708080708888888888877 7878777F8888888888788888887888888888887F888F887F8888888888088808 8808888888888878887F88788888888888888808888888888888888F8F7FFF8F 8888888888080000080888888888887877777878888888888888880888888888 8888888F887F888F8888888888088808880888888888887F8878887F88888888 88788888887888888888887FFF8F8F7F88888888880708080708888888888877 7878777888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888888888888888888888 88888888888888888888} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedConstructionClick end object SpeedCentre: TSpeedButton Left = 1 Top = 102 Width = 24 Height = 24 Hint = 'centre cercle|Cliquer le cercle.' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 888888888888888888888888888888888888888888888888888888888FFF8888 888888888888000888888888888888F877788FF8888888888008888800888888 88888778888877F88888888887888888878888888888F78888888788F8888880 88888888888088888887F88888888887FF888807888888888887088888778888 8888888778888888888888888888888888F8888888F888888F88807888888088 8888708887F8888887F888887F888078888880888888708887888888F7FFF888 78888888888000008888888888F8888777778888888880788888808888887088 87F8888887F888887F888078888880888888708887888888878888887F888888 8888888888888888888FF888888888888888880788888888888708888877F888 8888888F788888808888888888808888888788F8888888878888888887888888 87888888888887FF88888FF8888888888008888800888888888887788FFF7788 8888888888880008888888888888888877788888888888888888888888888888 88888888888888888888} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedConstructionClick end object SpeedMilieu: TSpeedButton Left = 25 Top = 102 Width = 24 Height = 24 Hint = 'milieu|Cliquer le segment.' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888888888888888888888 88F8888888888888888880888888888888F8888887FF888888F8808888887078 8888808887FFFFFF777FFFFFF7F8870707070000707070888777777777777777 77F8808888887078888880888788888877788888878888888888808888888888 8888888887888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888888888888888888888 88888888888888888888} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedConstructionClick end object SpeedIntersection: TSpeedButton Left = 1 Top = 126 Width = 24 Height = 24 Hint = 'intersection|Cliquer les 2 objets (droite,cercle,segment).' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888888888888888888888 88888888888888888888888888888888888888888888888F8888888F88888888 88078888870888888888887F8888887F8888888888078888870888888888887F 8888887F8888888888078888870888888888887F8888887F8888888888078888 870888888888887F8888887F8888888888078888870888888888887F8888887F 8888888888078888870888888888887F8888887F888888888807888887088888 8888887F8888887F88888888880788888708888888888878F888887888888888 8870788870788888888888878F88878888888888888707770788888888888888 78FF788888888888888870007888888888888888877788888888888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888888888888888888888 88888888888888888888} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedConstructionClick end object SpeedMediatrice: TSpeedButton Left = 25 Top = 126 Width = 24 Height = 24 Hint = 'm�diatrice|Cliquer le segment.' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 888888888888888888F888888888888888888088888888888888888887F88888 8888888888888088888888888888888887F88888888888888888808888888888 8888888887F888888888888888888088888888888888888887F8888888888888 88888088888888888888888887F8888888888888888880888888888888888888 87F8888888888888888880888888888888F8888887F8888888F8808888888088 8888808887FFFFFFF7FFFFFFF7F8870707070007070070888777777777777777 77F8808888888088088880888788888887F87F88878888888888808878888888 8888888887FF7F88888888888888800708888888888888888777788888888888 88888088888888888888888887F8888888888888888880888888888888888888 87F888888888888888888088888888888888888887F888888888888888888088 888888888888888887F888888888888888888088888888888888888887888888 8888888888888888888888888888888888888888888888888888888888888888 88888888888888888888} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedConstructionClick end object SpeedParallele: TSpeedButton Left = 1 Top = 150 Width = 24 Height = 24 Hint = 'parall�le|Cliquer le point puis la droite (ou le segment).' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 88888888888888888F888888888888888888088888888888888F888878F88888 8888880888888088888888888878F88887F88888888888808888808888888888 8887F888878F888888888880888888088888888888878F888878F88888888888 0888888088888888888878F88887F888888888888088888088888888888887F8 88878F888888888880888888088888888888878F888878F88888888888088888 8088888888888878F88887F888888888888088888088888888888887F888878F 888888888880888888088888888888878F88887F888888888888088888088888 8888888878F88878F888888888888088888088888888888887F888878F888888 888880888888088888888888878F88887F888888888888088888088888888888 8878F88878F888888888888088888088888888888887F8888788888888888880 888888888888888888878F888888888888888888088888888888888888887888 8888888888888888888888888888888888888888888888888888888888888888 88888888888888888888} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedConstructionClick end object SpeedPerpendiculaire: TSpeedButton Left = 25 Top = 150 Width = 24 Height = 24 Hint = 'perpendiculaire|Cliquer le point puis la droite (ou le segment).' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888FFFFFFFFFFF8888888 8000000000008888888887777777777788888888888888088888888888888888 887F888888888888888888088888888888888888887F88888888888888888808 8888888888888888887F888888888888888888088888888888888888887F8888 88888888888888088888888888888888887F8888888888888888880888888888 88888888887F888888888888888888088888888888888888887F888888888888 888888088888888888888888887F888888888888888888088888888888888888 887F888888888888888888088888888888888888887888888888888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888888888888888888888 88888888888888888888} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedConstructionClick end object SpeedBissectrice: TSpeedButton Left = 1 Top = 174 Width = 24 Height = 24 Hint = 'bissectrice|Cliquer les points (sommet en 2�me) formant l'#39'angle.' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 888888888888888888F888888888888888888088888888888888888887F88888 8888888888888088888888888888888887F88888888888888888808888888888 8888888887FF888888888888888870788888888888888888777F888888888888 8888080888888888888888887778F88888888888888780878888888888888887 F7F7F8888888888888808080888888888888888787F78F888888888888788088 788888888888887F87F87F888888888888088088088888888888887887F878F8 888888888788808887888888888887F887F887F8888888888088808880888888 8888878F87F8878F88888888787880887878888888887F78F7FF787F88888888 08877077880888888888788777778878F888888788888088888788888887F888 87F88887F888888088888088888088888887888887F888878888888888888088 888888888888888887F888888888888888888088888888888888888887888888 8888888888888888888888888888888888888888888888888888888888888888 88888888888888888888} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedConstructionClick end object SpeedBarycentre: TSpeedButton Left = 25 Top = 174 Width = 24 Height = 24 Hint = 'barycentre|Cliquer les points de l'#39'ensemble.' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888888888888888888888888888888888888888888888888888888888888 FFF8888888888888888F7088888FFF888888888777F888F708888888888F7088 88777F888888888787F888F708888888888F708888787F888888888787F88877 7888888888877788887878888888F8878788888788888880888878888887F888 8887F8887F88888088888880888808888887FFFFFFF7FFFF7FF8887070707070 7070708888777777777777777788888888888880888888888888888888878888 8888888888888880888888888888888888878888888888888888888088888888 888888FFF8878888FFF88888800088000880008888888777F877788777888888 8880888088808888888888878F87888788888888888808888808888888888888 78FFFF78F8888888888080000080888888888887877777878F88888888088880 88880888888888788887F8887888888888888880888888888888888888878888 8888888888888888888888888888888888888888888888888888888888888888 88888888888888888888} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedConstructionClick end object SpeedSymetries: TSpeedButton Left = 1 Top = 201 Width = 24 Height = 24 Hint = 'sym�tries|Cliquer le point puis l'#39'axe ou le centre.' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF008F8888888888 888888888F8888888888F888888878F8888888808888888878F888888887FF88 8888878F8888880008888888878F8888887778888F888878F888888088880788 8878F88888878888F78888878F8888888880788888878F888888888F78888888 78F8888888078888888878F8888888F788888888878F8888807888888888878F 88888F7888F888888878F8880788808888888878F888F78887FF888888878F88 78880008888888878F88788877788888888878F888888088888F888878F88888 878888088888878F88888888887FF888878F88888888800088888878F8888888 877788F88878F88888888808808888878F888888887887F888878F8888888888 8088888878F888888888F7FFF88878F88888888000008888878F888888877777 8888878F88888888808888888878F888888887F88F888878F888888880880888 88878F88888887887FF888878F88888888800088888878F88888888777888888 78F88888888808888888878F8888888878888888878F88888888888888888878 88888888888888888878} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedTransformationClick end object SpeedProjection: TSpeedButton Left = 25 Top = 201 Width = 24 Height = 24 Hint = 'projection|Cliquer le point puis la droite des images.' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 888888888888888888888888888888888888888888888888888888888888F888 888888888888888088888888888888888887F888888888888888888088888888 88FFFFFFFFF7FFFFFFFF80000000000000000008877777777777777777788888 8888888088088888888888888887F87F88888888888888808808888888888888 8887FF7F88888888888888800008888888888888888777788888888888888888 88888888888888888888F888888888888888888088888888888888888887F888 888888888888888088888888888888888887F888888888888888888088888888 888888888887F888888888888888888088888888888888888887888888888888 8888888888888888888888888888F88888888888888888808888888888888888 8887F8888888888888888880888888888888888888F7FFF88888888888888000 008888888888888887777788888888888888888088888888888888888887F888 8888888888888880888888888888888888878888888888888888888888888888 88888888888888888888} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedTransformationClick end object Speedtranslation: TSpeedButton Left = 1 Top = 225 Width = 24 Height = 24 Hint = 'translation|Cliquer le point puis les extr�mit�s du vecteur.' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 88888888888888F888888888888888888088888888888888888887F888888888 8888888880888888888888888888F7FFF8888888888888800000888888888888 8887777788888888888888888088888888888888888887F8F888888888888888 808088888888888888F887878F88888888888088888808888888888887FF8888 78888888888880088888888888888888877FF888888F88888888880088888808 888888888877FF888878F88888888880088888808888888888877FF888878888 888888880088888888888888888877FF888888F8888888888008888880888888 8888877FF888878F8F888888880088888808088888888877FF8888787F888888 8880088888880888888888877FF8F88F7FFF8888888800808800000888888888 77F7F877777888888888800088880888888888888777F8887F88888888888000 88880888888888888777F8887888888888880000888888888888888877778888 8888888888888888888888888888888888888888888888888888888888888888 88888888888888888888} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedTransformationClick end object Speedrotation: TSpeedButton Left = 25 Top = 225 Width = 24 Height = 24 Hint = 'rotation|Cliquer le point puis le centre.' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888888888888888888888888888888888888888888888888888888888888 888888888888888888888888888888F888888888888888888088888888888888 888887FF88FF8888888888880008800788888888888877788778FF8888888888 808887700788888888888788888778F888888888888888887078888888888888 8888878F8888888888888888870788888888888888888878F888888888888888 887088888888888888888887F8888888888888888880788888888888888888F7 FFF888888888888880000088888888F888888777778888888088888888000888 888887F8888888777888888880888888888088888888F78FF888888788888880 08008888888888888887787788888888F88888888088888888808888888887F8 88888887F8888888808888888880888888888788888888F7FFF8888888888888 8000008888888888888887777788888888888888888088888888888888888887 F888888888888888888088888888888888888887888888888888888888888888 88888888888888888888} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedTransformationClick end object SpeedHomothetie: TSpeedButton Left = 1 Top = 249 Width = 24 Height = 24 Hint = 'homoth�tie|Cliquer le point puis le centre.' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888888888888888888888888888888888888888888888888F88888888888 8888888088888888888888888887F88888888888888888808888888888888888 88F78FF888F888888F88800800788088888808888778777887FF88887F888880 88880008788808888887F8887778788F7FFF8880878880888800000888878788 8788887777788888887888888888088888888878888888887F88888888788888 88880888888888788F888888788888888888088888888888888888887FF88888 8888888888800088888888888888888777888888888888888888088888888888 8888888878888888888888888888887888888888888888888878888888888888 8888888788888888888888888887888F88888888888888887808888888888888 8888787F8888888888888888880888888888888888888F7FFF88888888888888 000008888888888888887777788888888888888888088888888888888888887F 8888888888888888880888888888888888888878888888888888888888888888 88888888888888888888} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedTransformationClick end object SpeedSimilitude: TSpeedButton Left = 25 Top = 249 Width = 24 Height = 24 Hint = 'similitude|Cliquer le point puis le centre.' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 888888888888F888888888888888888088888888888888888887F88888888888 88888880888888888888888888F78FF888F888888F8880080088808888887888 8778778887FF88887F8888808888000888887888888788887778888F7FFF8880 8888808888777778888788888788887777788888888888888888788888888888 888888887F888888888888888888788888888888888888887888888888888888 8888888888888888888888888F88888888888888888708888888888888888888 7F88888888888888888708888888888888888888788888888888888888807888 8888888888888887F888888888888888887088888888F888888F888788888880 88888808870788888887F888887F887888888880888880087078888888F7FFF8 877FF78888888000008800000788888887777788777778888888888088888007 888888888887F888877F88888888888088888808888888888887888888788888 8888888888888888888888888888888888888888888888888888888888888888 88888888888888888888} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedTransformationClick end object SpeedModifie: TSpeedButton Left = 1 Top = 273 Width = 24 Height = 24 Hint = 'modifier ...|Cliquer le point image.' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888078078078888888888888FF8FF8FF8888888888807807807888888 8888887787787788888888888888888888888888888888888888888888888888 888888888888888888888F8888888F8888888888088888880888888888887F88 888878F888F88088088888888088808880887FFFFFFFF7FF87FF000800000000 00080008000877777777777877788088088888888088808880887F888F888788 878888880888078808888888888878887F887888888888888888078888888888 888888887F888888888888888888078888888888888888887F88888888888888 8888077888888888888888887FF8888888888888888800088888888888888888 77788888888888888888078888888888888888887F8888888888888888880788 88888888888888887F8888888888888888880777788888888888888878FFF888 8888888888888000088888888888888887777888888888888888888888888888 88888888888888888888} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedTransformationClick end object SpeedPoubelle: TSpeedButton Left = 1 Top = 300 Width = 24 Height = 24 Hint = 'Supprimer|Cliquer l'#39'objet � supprimer.' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000000 3333333777777777F3333330F777777033333337F3F3F3F7F3333330F0808070 33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070 33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070 333333F7F7F7F7F7F3F33030F080707030333737F7F7F7F7F7333300F0808070 03333377F7F7F7F773333330F080707033333337F7F7F7F7F333333070707070 33333337F7F7F7F7FF3333000000000003333377777777777F33330F88877777 0333337FFFFFFFFF7F3333000000000003333377777777777333333330777033 3333333337FFF7F3333333333000003333333333377777333333} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedPoubelleClick end object SpeedStop: TSpeedButton Left = 25 Top = 300 Width = 24 Height = 24 Hint = 'interrompre|interrompt la construction en cours.' AllowAllUp = True Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'System' Font.Style = [] Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888888888888888888888888888888888888888888888888887777788888888 88888888FFFFF888888888888777777777888888888888F77777FFF888888888 7788707877788888888887777FF877FF888888877778000887778888888877FF 878F877FF888888787777078887788888887777F777F8877F888887788777888 888778888887F77787888887FF88887788877088888778888877F8777FF88887 7F88887788887078888778888877F88787FF88877F8888778888000788877888 8877F888877FF8877F88887788880007788778888877F888777FFF877F888887 78880007778788888877FF8877787FF778888887778800087777888888878FF8 777877F7F88888887778707887788888888778FF777F77778888888887777777 778888888888778FF7FFF7788888888888877777888888888888877788877788 8888888888888888888888888888888777778888888888888888888888888888 88888888888888888888} Layout = blGlyphBottom NumGlyphs = 2 ParentFont = False OnClick = SpeedCreationClick end object Speedfonction: TSpeedButton Left = 25 Top = 273 Width = 24 Height = 24 Hint = 'fonction|Cliquer les 3 points du rep�re.' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888808888888 8888888888887F888888888888888888088888888888888888887F8888888888 88888888088888888888888888887F8888888FF8888888880888888800888888 88887F888888778F88888888088888808808888888887F8888878878F8888888 08888808888088888FFF7FFFFF7FFFF7FFF70000000000000000000077777777 777777777777888808888088888808888F887F88878888887F87088808880888 8888088878F87F887F88888878F88088088808888888808887F87F8878888888 87F880880880888888888088878F7F87F888888887F888080880888888888088 887F7F878888888887F888080808888888888088887F7F7F88888888878F8808 080888888888880888787F7888888888887F8880008888888888880888877788 8888888888788888088888888888888088887F88888888888887888808888888 8888888888887F888888888888888888088888888888888888887F8888888888 88888888088888888888888888887F8888888888888888880888888888888888 88887F88888888888888} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedTransformationClick end object SpeedTrame: TSpeedButton Left = 1 Top = 324 Width = 24 Height = 24 Hint = 'trame|Bascule la trame' AllowAllUp = True GroupIndex = 2 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'System' Font.Style = [] Glyph.Data = { 96030000424D9603000000000000760000002800000050000000140000000100 0400000000002003000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888887777777777777777788777777777777777778888777777777777777778 8777777777777777778888788878887888788878878887888788878887888878 8878887888788878878887888788878887888878887888788878887887888788 8788878887888878887888788878887887888788878887888788887888788878 8878887887888788878887888788887888788878887888788788878887888788 8788887777777777777777788777777777777777778888777777777777777778 8777777777777777778888788878887888788878878887888788878887888878 8878887888788878878887888788878887888878887888788878887887888788 8788878887888878887888788878887887888788878887888788887888788878 8878887887888788878887888788887888788878887888788788878887888788 8788887888788878887888788788878887888788878888788878887888788878 8788878887888788878888777777777777777778877777777777777777888877 7777777777777778877777777777777777888878887888788878887887888788 8788878887888878887888788878887887888788878887888788887888788878 8878887887888788878887888788887888788878887888788788878887888788 8788887888788878887888788788878887888788878888788878887888788878 8788878887888788878888788878887888788878878887888788878887888878 8878887888788878878887888788878887888877777777777777777887777777 7777777777888877777777777777777887777777777777777788887888788878 8878887887888788878887888788887888788878887888788788878887888788 8788887888788878887888788788878887888788878888788878887888788878 8788878887888788878888788878887888788878878887888788878887888878 8878887888788878878887888788878887888877777777777777777887777777 7777777777888877777777777777777887777777777777777788} NumGlyphs = 4 ParentFont = False OnClick = SpeedTrameClick end object SpeedAimant: TSpeedButton Left = 25 Top = 324 Width = 24 Height = 24 Hint = 'aimant|Bascule la trame aimant�e' AllowAllUp = True GroupIndex = 5 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'System' Font.Style = [] Glyph.Data = { 96030000424D9603000000000000760000002800000050000000140000000100 0400000000002003000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888888888888888888888888888888888888888888888888888888888888 8888887777777777777777788777777777777777778888777777777777777778 8777777777777777778888788878887888788878878887888788878887888878 8878887888788878878887888788878887888878887888788878887887888788 8788878887888878887888788878887887888788878887888788887888888888 8888887887888888888888888788887888888888888888788788888888888888 8788887778991888CC48777887778991888CC4877788887778991888CC487778 87778991888CC4877788887888991888CC48887887888991888CC48887888878 88991888CC48887887888991888CC4888788887888991888CC48887887888991 888CC4888788887888991888CC48887887888991888CC4888788887888F87888 F878887887888F87888F87888788887888F87888F878887887888F87888F8788 8788887888F87888F878887887888F87888F87888788887888F87888F8788878 87888F87888F87888788887778F87888F878777887778F87888F878777888877 78F87888F878777887778F87888F87877788887888F87888F878887887888F87 888F87888788887888F87888F878887887888F87888F87888788887888F87888 F878887887888F87888F87888788887888F87888F878887887888F87888F8788 8788887888F8877F8878887887888F8877F887888788887888F8877F88788878 87888F8877F8878887888878888F888887888878878888F88888788887888878 888F888887888878878888F888887888878888777788FFFFF88777788777788F FFFF8877778888777788FFFFF88777788777788FFFFF88777788887888788888 8878887887888788878887888788887888788878887888788788878887888788 8788887888788878887888788788878887888788878888788878887888788878 8788878887888788878888788878887888788878878887888788878887888878 8878887888788878878887888788878887888877777777777777777887777777 7777777777888877777777777777777887777777777777777788} NumGlyphs = 4 ParentFont = False OnClick = SpeedAimantClick end object Bevel6: TBevel Left = 1 Top = 348 Width = 49 Height = 2 Shape = bsTopLine end object SpeedMesure: TSpeedButton Left = 1 Top = 351 Width = 24 Height = 24 Hint = 'mesurer|cliquer le segment ou l'#39'angle � mesurer' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777777777777777777777777777777777777777777777777777777777777777 7777777777777777777777777777777F77777777777777777737777777777777 777F7787F77777777777770773B37777777777777787F8787F77777777777770 3BBB37777777777777788F7787F7777777777777038BB377777777777777888F 787F777777777777703BBB37777777777777788F7787F7777777777777038BB3 77777777777777888F787F777777777777703BBB37777777777777788F7787F7 777777777777038BB377777777777777888F787F777777777777703BBB377777 777777F7788F7787F7777777707777038BB377777777F8F7F7888F7877777770 707077703B3777777778F878F7788F877777777077707777037777777778F778 F77788F77777770077007777707777777788F788F777787F7777777077707777 7707777777787778777777877777777777777777777777777777777777777777 7777777777777777777777777777777777777777777777777777777777777777 77777777777777777777} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedConstructionClick end object SpeedAngle: TSpeedButton Left = 1 Top = 375 Width = 24 Height = 24 Hint = 'Angle|marquer angle : cliquer les 3 points (sommet en 2i�me)' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777777777777777777777777777777777777777777777777777777777777777 77777777777777777777777777777F777777777F777777770777777777077777 77778FFFFFFFFF8FFFF777700000000000000077777888888888888888777777 0077777077077777777788F77778F7877777777770777770777777777777787F 777877777777777777077707777777777777778F778777777777777777077077 7777777777777787F87777777777777777700777777777777777777887777777 777777777770777777777777777777787F777777777777777777077777777777 777777778F7777777777777777770777777777777777777787F7777777777777 77777077777777777777777778FF777777777777777700077777777777777777 888F777777777777777770077777777777777777788F77777777777777777707 77777777777777777787F7777777777777777770777777777777777777787777 7777777777777777777777777777777777777777777777777777777777777777 77777777777777777777} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedConstructionClick end object Bevel7: TBevel Left = 1 Top = 399 Width = 49 Height = 2 Shape = bsTopLine end object SpeedDirections: TSpeedButton Left = 25 Top = 351 Width = 24 Height = 24 Hint = 'Directions|Indique si les droites, segments sont parall�les, per' + 'pendiculaires ou s�cants.' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 77777777777777777777777777777777777777777777777777777F77F7777777 777777077077777777777777777787F87F777777777777707707777777777777 7777787F87F7777777777777077077777777777777777787F87F777777777777 7077077777777777777777787F87F7777777777777077077777777777777FFFF 8FF87F7777F7700000BB3707777077777778888888FF87777877777077BB7777 77077777777778F78877F777877777707777707770777777777778F777787FF8 F77777707777370000777777777778F777F788887FF7777077BB737707007777 77777877887F7787887F7777777BB73077770777777777777887F8F777877777 3377BB0377777777777777FF778888F77777777BB3777BB3777777777777788F 777888F77777777BB3377BB3777777777777788FF778887777777777BB333BB7 7777777777777788FFF8877777777777BBBBBB77777777777777778888887777 777777777BBBB777777777777777777888877777777777777777777777777777 77777777777777777777} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedTransformationClick end object SpeedRapporteur: TSpeedButton Left = 25 Top = 375 Width = 24 Height = 24 Hint = 'rapporteur|cliquer le point puis l'#39'axe de r�f�rence' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 77777777777F7777777777777777770777777777777777777787F77777777777 77777770777777777777777777787F7777777777777777770777777777777777 777787F777777777777777777077777777777777777FF8FFFFFFFFFFF7777733 33333333333377777788888888888888F777773BBBBBBBBBBBB377777F8F77FF FFFFFFF8FFFF703BB33303333BB300077887F8888888877888877773B3777077 3B3777777778F87FF87F878777777773BB337703BB37777777787F887F837F87 777777773BBB33BBB3777777777787FF887FF87777777777733BBBB307777777 77777887FFF387F7777777777773333770777777777777788887787F77777777 77777777770777777777777777777787F7777777777777777770777777777777 777777787F7777777777777777770777777777777777777787F7777777777777 777770777777777777777777787F777777777777777777077777777777777777 7787777777777777777777777777777777777777777777777777777777777777 77777777777777777777} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedTransformationClick end object SpeedMacros: TSpeedButton Left = 1 Top = 403 Width = 24 Height = 24 Hint = 'Macros|Acc�s aux macros' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777777777777777777777777777777777777777777777777777777777777777 777777008770000000700077777FF777FFFFFFF7FF77770B0770CC009070E077 77887F78888888F88877770B077000000070E077778F8F78FF88F8F8F877770B 8870CC009070E077778F87F8888888F8F8777788B070CC009070E0777787F8F8 F788F8F8F8777770B070CC009070E0777778F8F8F788F8F8F8777770B880CC00 9070E0777778F878F788F8F8F87777788B00CC009070E07777787F88F788F8F8 F87777770B30CC009070007777778F88F788F8F8F87777770B3000009070E077 77778F78FF88F8F8887777778000CC0090700077777787F88888F8F8F8777777 777000009077777777777888FF88F8F888777777777777700077777777777778 8888F8F777777777777777709077777777777777777888F77777777777777770 00777777777777777778F8F77777777777777777777777777777777777788877 7777777777777777777777777777777777777777777777777777777777777777 77777777777777777777} Layout = blGlyphBottom NumGlyphs = 2 OnClick = MacroItemClick end object SpeedEnroule: TSpeedButton Left = 25 Top = 403 Width = 24 Height = 24 Hint = 'Enroule|Enroule un segment le long d'#39'un cercle depuis un point.' AllowAllUp = True GroupIndex = 3 Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 77777777777F777777777777777777077777777777777777778FFFF777777777 7777770000777777777777777788887FFFFFFFF777F777077700000000777077 778777888888887FF8F777777777777777000077777777777777778888F77777 7777777777777077777777777777777778777777777777777777777777777777 777F77777777777777777707777777777777777F778777777777777777077777 77777777777777877777777F7777777777777777770777777777777777777787 77777777777777777777777777777F7777777777F77777770777777777707777 7777877777777778FF777777777777777700077777777FFF7777778887777777 00077777777777777777888777777777F7777770877777777770777777788777 77777778F77777777777777777707777777777F7777777787777777770777777 777777777777787F777777F7777777777707777770777777777777877FF77877 7777777777770077077777777777777788778777777777777777777777777777 77777777777777777777} Layout = blGlyphBottom NumGlyphs = 2 OnClick = SpeedConstructionClick end object Bevel8: TBevel Left = 1 Top = 427 Width = 49 Height = 2 Shape = bsTopLine end end object PanelGroupVisu: TPanel Left = 0 Top = 0 Width = 582 Height = 451 Align = alClient BevelOuter = bvNone BorderStyle = bsSingle Color = clWindow TabOrder = 1 object ImageRegleCurH1: TImage Left = 106 Top = 119 Width = 7 Height = 8 AutoSize = True Enabled = False Picture.Data = {} Visible = False end object ImageRegleCurH2: TImage Left = 119 Top = 117 Width = 7 Height = 8 AutoSize = True Enabled = False Picture.Data = {} Visible = False end object ImageRegleCurTH: TImage Left = 89 Top = 120 Width = 7 Height = 8 Enabled = False Visible = False end object ImageRegleCurV1: TImage Left = 106 Top = 139 Width = 8 Height = 7 AutoSize = True Enabled = False Picture.Data = {} Visible = False end object ImageRegleCurV2: TImage Left = 119 Top = 135 Width = 8 Height = 7 AutoSize = True Enabled = False Picture.Data = {} Visible = False end object ImageRegleCurTV: TImage Left = 0 Top = 11 Width = 579 Height = 7 Center = True Enabled = False Visible = False end object PanelRegleV: TPanel Left = 0 Top = 10 Width = 11 Height = 437 HelpContext = 703 Align = alLeft BevelOuter = bvNone TabOrder = 0 OnResize = PanelRegleVResize object ImageRegleV0: TImage Left = 0 Top = 0 Width = 11 Height = 437 Cursor = crArrow Align = alLeft AutoSize = True Enabled = False Picture.Data = {} end object ImageRegleV2: TImage Left = 11 Top = 0 Width = 11 Height = 437 Align = alLeft AutoSize = True Enabled = False Picture.Data = {} Visible = False end object ImageRegleV1: TImage Left = 22 Top = 0 Width = 11 Height = 437 Align = alLeft AutoSize = True Enabled = False Picture.Data = {} Visible = False end object KeopsButtonToDown: TSpeedButton Tag = 255 Left = 1 Top = 389 Width = 10 Height = 10 Caption = '6' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'Marlett' Font.Style = [fsBold] Layout = blGlyphBottom ParentFont = False OnClick = KeopsButtonToRightClick end end object PanelVisu: TPanel Left = 11 Top = 10 Width = 567 Height = 437 Align = alClient BevelOuter = bvNone Color = clWindow TabOrder = 1 OnResize = PanelVisuResize object VisuPaintBox: TPaintBox Left = 0 Top = 0 Width = 567 Height = 437 Align = alClient Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentColor = False ParentFont = False ParentShowHint = False ShowHint = True OnDblClick = VisuPaintBoxDblClick OnMouseDown = VisuPaintBoxMouseDown OnMouseMove = VisuPaintBoxMouseMove OnMouseUp = VisuPaintBoxMouseUp OnPaint = VisuPaintBoxPaint end end object PanelRegleH: TPanel Left = 0 Top = 0 Width = 578 Height = 10 HelpContext = 703 Align = alTop BevelOuter = bvNone TabOrder = 2 OnMouseUp = PanelRegleHMouseUp OnResize = PanelRegleHResize object ImageRegleH0: TImage Left = 0 Top = 11 Width = 578 Height = 11 Cursor = crArrow Align = alTop AutoSize = True Enabled = False Picture.Data = {} end object ImageRegleH2: TImage Left = 0 Top = 0 Width = 578 Height = 11 Align = alTop AutoSize = True Enabled = False Picture.Data = {} Visible = False end object ImageRegleH1: TImage Left = 0 Top = 22 Width = 578 Height = 11 Align = alTop AutoSize = True Enabled = False Picture.Data = {} Visible = False end object KeopsButtonToRight: TSpeedButton Tag = 255 Left = 567 Top = 0 Width = 10 Height = 10 Caption = '4' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'Marlett' Font.Style = [fsBold] ParentFont = False OnClick = KeopsButtonToRightClick end end end object PanelInfoBarre: TPanel Left = 0 Top = 451 Width = 632 Height = 20 Align = alBottom BevelOuter = bvNone Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'ms sans serif' Font.Style = [] ParentFont = False TabOrder = 2 object PanelProgressFichier: TPanel Left = 0 Top = 0 Width = 632 Height = 20 Cursor = crHourGlass Align = alClient Alignment = taLeftJustify TabOrder = 0 Visible = False object PanelGauge: TPanel Left = 1 Top = 1 Width = 136 Height = 18 Align = alLeft BevelOuter = bvNone Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'ms sans serif' Font.Style = [] ParentFont = False TabOrder = 0 object JaugeFichier: TGauge Left = 2 Top = 2 Width = 130 Height = 12 Color = clBtnFace ShowText = False ForeColor = clBtnShadow ParentColor = False Progress = 20 end end object PanelNomFichier: TPanel Left = 137 Top = 1 Width = 494 Height = 18 Align = alClient Alignment = taLeftJustify BevelOuter = bvNone Caption = 'PanelNomFichier' TabOrder = 1 end end object PanelHistoricBar: TPanel Left = 0 Top = 0 Width = 632 Height = 20 Cursor = 18 Align = alClient BevelInner = bvLowered BevelOuter = bvNone Caption = 'PanelHistoricBar' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'ms sans serif' Font.Style = [] ParentFont = False TabOrder = 1 Visible = False object PanelSpeedHistoric: TPanel Left = 525 Top = 1 Width = 106 Height = 18 Align = alRight BevelOuter = bvNone TabOrder = 0 object SpeedHistoricBegin: TSpeedButton Left = 0 Top = 0 Width = 22 Height = 19 Cursor = 11 Glyph.Data = { 06010000424D06010000000000007600000028000000140000000C0000000100 0400000000009000000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 888888F88888888888888888F8888FF88888807888808887F888F7F888888078 88008887F88F77F88888807880008887F8F787F88888807800008887F87887F8 8888807000008887F7F887F80000807800008887F87F87F81200807880008887 F887F7F80000807888008887F88877F800208078888088878888878800008888 88888888888888880000} Layout = blGlyphBottom NumGlyphs = 2 Spacing = 0 OnClick = SpeedHistoricBeginClick end object SpeedHistoricBack: TSpeedButton Left = 21 Top = 0 Width = 22 Height = 19 Cursor = 11 Glyph.Data = { 06010000424D06010000000000007600000028000000140000000C0000000100 0400000000009000000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888F8888888888888888888888FF888888888888808888888F7F88888888888 800888888F77F8888888888800088888F787F88888888880000888887887F888 8888880000088887F887F88888888880000888887F87F8888888888800088888 87F7F88888888888800888888877F88888888888880888888887888888888888 88888888888888888888} NumGlyphs = 2 Spacing = 0 OnClick = SpeedHistoricBackClick end object SpeedHistoricForward: TSpeedButton Left = 42 Top = 0 Width = 22 Height = 19 Cursor = 11 Glyph.Data = { 06010000424D06010000000000007600000028000000140000000C0000000100 0400000000009000000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 88888888AAAA88888888888888F888888AAA88808888888887F88888008A8880 08888888877F8888000288800088888887F7F88802AA88800008888887F87F88 AAAA88800000888887F8F788000088800008888887FF78889030888000888888 87F7888800008880088888888778888800008880888888888788888800008888 88888888888888880000} Layout = blGlyphTop NumGlyphs = 2 Spacing = 0 OnClick = SpeedHistoricForwardClick end object SpeedHistoricEnd: TSpeedButton Left = 63 Top = 0 Width = 22 Height = 19 Cursor = 11 Glyph.Data = { 06010000424D06010000000000007600000028000000140000000C0000000100 0400000000009000000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888800008888888888888F8888F8CCCC8808888078887F8887F833338800 8880788877F887F800008800088078887F7F87F8CCCC8800008078887F87F7F8 33338800000078887F8F77F800008800008078887FF787F8CCCC880008807888 7F7887F83333880088807888778887F8000088088880788878888788CCCC8888 88888888888888883333} Layout = blGlyphTop NumGlyphs = 2 Spacing = 0 OnClick = SpeedHistoricEndClick end object SpeedHistoricStop: TSpeedButton Left = 84 Top = 0 Width = 22 Height = 19 Cursor = 11 Glyph.Data = { D6000000424DD60000000000000076000000280000000A0000000C0000000100 0400000000006000000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8880888888888888888088888888888888808800000788888880880000078888 8880880000078888888088000007888888808800000788888880880000078810 0000880000078804044488888888880040058888888888000000} Layout = blGlyphTop Spacing = 0 OnClick = SpeedHistoricStopClick end end object PanelHistoricComment: TPanel Left = 1 Top = 1 Width = 524 Height = 18 Align = alClient Alignment = taLeftJustify Caption = 'PanelHistoricComment' TabOrder = 1 end end object PanelStatusBar: TPanel Left = 0 Top = 0 Width = 632 Height = 20 Cursor = 18 HelpContext = 801 Align = alClient Alignment = taLeftJustify BevelInner = bvLowered BevelOuter = bvNone Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = False TabOrder = 2 object PanelInfoButt: TPanel Left = 1 Top = 1 Width = 18 Height = 18 Align = alLeft BevelOuter = bvNone TabOrder = 0 object SpeedInfo: TSpeedButton Left = 0 Top = 0 Width = 19 Height = 19 Cursor = 11 AllowAllUp = True Glyph.Data = { E6000000424DE60000000000000076000000280000000E0000000E0000000100 0400000000007000000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 880088887000078888008880CCCCCC088811880CCCB3CCC0880087CCCCCCCCCC 788880CCCCB3CCCC080080CCCCB3CCCC080080CCCCCB3CCC080080CC3CCCB3CC 080087CCB3CCB3CC7800880CCBBB3CC088008880CCCCCC088800888870000788 88008888888888888800} OnClick = SpeedInfoClick end end object PanelInfoInfo: TPanel Left = 19 Top = 1 Width = 612 Height = 18 Align = alClient BevelOuter = bvNone Caption = 'PanelInfoInfo' TabOrder = 1 object HeaderInfo: THeader Left = 0 Top = 0 Width = 612 Height = 18 Cursor = 18 HelpContext = 703 Align = alClient BorderStyle = bsNone Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False ParentShowHint = False Sections.Sections = ( #0'317'#0'Description des objets � port�e du pointeur.' #0'178'#0'Aide sur les actions (menus/ic�nes).') ShowHint = True TabOrder = 0 end end end end object MenuPrincipal: TMainMenu Left = 89 Top = 78 object FileMenu: TMenuItem Caption = '&Fichier' HelpContext = 100 Hint = 'gestion des entr�es/sorties' object NouveauItem: TMenuItem Caption = '&Nouveau' HelpContext = 101 Hint = 'Nouveau document' OnClick = EffacertoutItemClick end object OpenItem: TMenuItem Caption = '&Ouvrir...' HelpContext = 102 Hint = 'Ouvrir un document ' ShortCut = 16463 OnClick = OpenItemClick end object N2: TMenuItem Caption = '-' end object SaveItem: TMenuItem Caption = '&Enregistrer' HelpContext = 103 Hint = 'Enregistrer le document en cours' ShortCut = 16467 OnClick = SaveItemClick end object SaveAsItem: TMenuItem Caption = 'Enregistrer &sous ... ' HelpContext = 104 Hint = 'enregistre sous un autre nom' ShortCut = 16449 OnClick = SaveAsItemClick end object DetruireItem: TMenuItem Caption = '&G�rer fichiers ...' HelpContext = 105 Hint = 'visualisation et nettoyage du disque' OnClick = DetruireItemClick end object N3: TMenuItem Caption = '-' end object PressePapierItem: TMenuItem Caption = '&Presse-Papier ...' HelpContext = 106 Hint = 'Copie l'#39'image dans le presse-papier' ShortCut = 16451 Visible = False OnClick = PressePapierItemClick end object ExporterItem: TMenuItem Caption = 'E&xporter ...' HelpContext = 107 Hint = 'exporte dans le presse-papier, dans une image, sur l'#39'imprimante,' + ' sur Word.' ShortCut = 16453 OnClick = PressePapierItemClick end object N4: TMenuItem Caption = '-' end object ExitItem: TMenuItem Caption = '&Quitter' HelpContext = 109 Hint = 'Quitter l'#39'application' ShortCut = 32856 OnClick = ExitItemClick end object FichierBarreItem: TMenuItem Caption = '-' end object Fichier1Item: TMenuItem Caption = '&1 Fichier1' OnClick = FichiersItemClick end object Fichier2Item: TMenuItem Caption = '&2 Fichier2' OnClick = FichiersItemClick end object Fichier3Item: TMenuItem Caption = '&3 Fichier3' OnClick = FichiersItemClick end object Fichier4Item: TMenuItem Caption = '&4 Fichier4' OnClick = FichiersItemClick end end object EditionMenu: TMenuItem Caption = '&Edition' HelpContext = 200 Hint = 'gestion de la figure' object InterrompreItem: TMenuItem Caption = '&Interrompre' HelpContext = 201 Hint = 'Interrompt la construction en cours.' ShortCut = 16474 OnClick = SpeedCreationClick end object RepeterItem: TMenuItem Caption = '&R�p�ter' ShortCut = 87 OnClick = RepeterItemClick end object N6: TMenuItem Caption = '-' end object ZoomMenuItem: TMenuItem Caption = '&Zoom' HelpContext = 202 Hint = 'Choisir une valeur de zoom' object Zoom50Item: TMenuItem Caption = '&50%' HelpContext = 202 Hint = 'Taille r�elle diviss�e par 2' OnClick = ZoomItemClick end object Zoom100Item: TMenuItem Caption = '&100%' Checked = True HelpContext = 202 Hint = 'Taille r�elle' OnClick = ZoomItemClick end object Zoom200Item: TMenuItem Caption = '&200%' HelpContext = 202 Hint = 'Taille r�elle multipli�e par 2' OnClick = ZoomItemClick end end object PrefereItem: TMenuItem Caption = '&Pr�f�rences' HelpContext = 203 Hint = 'R�glages des options' OnClick = PrefereItemClick end object FonteItem: TMenuItem Caption = '&Fonte' HelpContext = 204 Hint = 'Police pour les noms des objets' OnClick = FonteItemClick end object AmbiguItem: TMenuItem Caption = 'Am&biguit�' HelpContext = 205 Hint = 'Mode de gestion rapide des ambigu�t�s' OnClick = AmbiguItemClick end object N7: TMenuItem Caption = '-' end object AspectItem: TMenuItem Caption = '&Aspect' HelpContext = 206 Hint = '(Clic Droit)D�finit l'#39'aspect d'#39'un objet cliqu�' OnClick = SpeedAspectClick end object PoidsItem: TMenuItem Caption = '&Masse' HelpContext = 207 Hint = 'D�finit la masse d'#39'un point (barycentre)' OnClick = SpeedConstructionClick end object N30: TMenuItem Caption = '-' end object ToutvisibleItem: TMenuItem Caption = '&Tout visible' HelpContext = 208 Hint = 'Rend visible tous les objets invisibles' OnClick = ToutvisibleItemClick end object Nom2ptsItem: TMenuItem Caption = 'Noms &2 pts' HelpContext = 209 Hint = 'Donne le nom des 2 points aux droites/cercles passant par 2 poin' + 'ts.' OnClick = Nom2ptsItemClick end object LoupeItem: TMenuItem Caption = '&Loupe' HelpContext = 202 Hint = 'Agrandie (r�duit) la taille r�elle de la figure' OnClick = LoupeItemClick end object TourneItem: TMenuItem Caption = 'Tour&ne' Hint = 'Fait tourner toute la figure selon un angle.' OnClick = SpeedTransformationClick end object N8: TMenuItem Caption = '-' end object EffacertoutItem: TMenuItem Caption = '&Effacer tout' HelpContext = 210 Hint = 'D�truit toute la figure' OnClick = EffacertoutItemClick end object RafrachirItem: TMenuItem Caption = 'Rafra�ch&ir' OnClick = RafrachirItemClick end end object CreationsMenu: TMenuItem Caption = '&Cr�er' HelpContext = 300 Hint = 'gestion des objets des bases' OnClick = SpeedConstructionClick object PointItem: TMenuItem Caption = '&Point' HelpContext = 301 Hint = 'cliquer un point non-existant' ShortCut = 113 OnClick = SpeedCreationClick end object DroiteItem: TMenuItem Caption = '&Droite' HelpContext = 302 Hint = 'pointer et draguer pour d�finir la droite' OnClick = SpeedCreationClick end object CercleItem: TMenuItem Caption = '&Cercle' HelpContext = 303 Hint = 'pointer le centre et draguer pour d�finir le rayon' OnClick = SpeedCreationClick end object N10: TMenuItem Caption = '-' end object Segment2ptItem: TMenuItem Caption = '&Segment 2pts' HelpContext = 304 Hint = 'pointer et draguer vers la seconde extr�mit�' ShortCut = 114 OnClick = SpeedCreationClick end object Droite2ptItem: TMenuItem Caption = 'D&roite 2pts' HelpContext = 305 Hint = 'pointer et draguer vers un point' ShortCut = 115 OnClick = SpeedCreationClick end object Cercle2ptItem: TMenuItem Caption = 'C&ercle 2pts' HelpContext = 306 Hint = 'pointer le centre et draguer vers un point du cercle' OnClick = SpeedCreationClick end object N11: TMenuItem Caption = '-' end object BarycentreItem: TMenuItem Caption = '&Barycentre ...' HelpContext = 307 Hint = 'd�finir le nombre de point � cliquer' OnClick = SpeedConstructionClick end object N12: TMenuItem Caption = '-' end object FonctionItem: TMenuItem Caption = '&Fonction' HelpContext = 308 Hint = 'Cliquer les 3 points (O,I,J) du rep�re puis d�finir la fonction' ShortCut = 16454 OnClick = SpeedTransformationClick end object PointCoordItem: TMenuItem Caption = 'P&oint (x,y)' HelpContext = 309 Hint = 'Cliquer les 3 points (O,I,J) du rep�re puis d�finir le point' OnClick = SpeedTransformationClick end end object ConstructionsMenu: TMenuItem Caption = 'C&onstruire' HelpContext = 400 Hint = 'gestion de constructions courantes' object PointsurItem: TMenuItem Caption = '&Point sur' HelpContext = 401 Hint = 'Cliquer l'#39'objet h�te' ShortCut = 16497 OnClick = SpeedConstructionClick end object IntersectionItem: TMenuItem Caption = '&Intersection' HelpContext = 402 Hint = 'Cliquer les 2 objets (droites,cercles,segments)' OnClick = SpeedConstructionClick end object N13: TMenuItem Caption = '-' OnClick = SpeedConstructionClick end object MilieuItem: TMenuItem Caption = 'Milie&u' HelpContext = 403 Hint = 'cliquer le segment ou ses extr�mit�s' OnClick = SpeedConstructionClick end object CentrecercleItem: TMenuItem Caption = '&Centre cercle' HelpContext = 404 Hint = 'Cliquer un cercle (pur)' OnClick = SpeedConstructionClick end object N14: TMenuItem Caption = '-' OnClick = SpeedConstructionClick end object MediatriceItem: TMenuItem Caption = '&M�diatrice' HelpContext = 405 Hint = 'cliquer un segment ou ses extr�mit�s' OnClick = SpeedConstructionClick end object ParalleleItem: TMenuItem Caption = '&Para&ll�le' HelpContext = 406 Hint = 'Cliquer un point puis un axe (droite ou segment)' ShortCut = 16498 OnClick = SpeedConstructionClick end object PerpendiculaireItem: TMenuItem Caption = 'Perpen&diculaire' HelpContext = 407 Hint = 'cliquer un point puis un axe (droite ou segment)' ShortCut = 16499 OnClick = SpeedConstructionClick end object N15: TMenuItem Caption = '-' OnClick = SpeedConstructionClick end object BissectricesItem: TMenuItem Caption = '&Bissectrice' HelpContext = 408 Hint = 'cliquer les sommets de l'#39'angle (sommet en 2i�me)' OnClick = SpeedConstructionClick end object SymetriqueItem: TMenuItem Caption = '&Sym�trique' HelpContext = 409 Hint = 'cliquer un point puis un centre ou un axe' OnClick = SpeedTransformationClick end object N16: TMenuItem Caption = '-' end object TrianglesMenu: TMenuItem Caption = '&Triangles ' HelpContext = 410 Hint = 'Travailler sur 3 points' object Triangle3ptItem: TMenuItem Caption = '&Triangle 3pts' HelpContext = 411 Hint = 'cliquer les 3 sommets' OnClick = SpeedConstructionClick end object TrianglequilateralItem: TMenuItem Caption = 'Triangle �&quilat�ral' HelpContext = 412 Hint = 'cliquer la base (directe)' OnClick = SpeedConstructionClick end object N17: TMenuItem Caption = '-' OnClick = SpeedConstructionClick end object OrthocentreItem: TMenuItem Caption = '&Orthocentre' HelpContext = 413 Hint = 'cliquer les 3 sommets' OnClick = SpeedConstructionClick end object CentredegraviteItem: TMenuItem Caption = 'Centre de &gravit�' HelpContext = 414 Hint = 'cliquer les 3 sommets' OnClick = SpeedConstructionClick end object CentreducerclecirconscritItem: TMenuItem Caption = 'Centre cercle &circonscrit' HelpContext = 415 Hint = 'cliquer les 3 sommets' OnClick = SpeedConstructionClick end object CentreducercleinscritItem: TMenuItem Caption = 'Centre cercle &inscrit' HelpContext = 416 Hint = 'cliquer les 3 sommets' OnClick = SpeedConstructionClick end end object PolygonesMenu: TMenuItem Caption = 'Pol&ygones' HelpContext = 417 Hint = 'travailler sur 4 points et plus' object ParalllogrammeItem: TMenuItem Caption = '&Parall�logramme' HelpContext = 418 Hint = 'cliquer les 3 sommets de BASE' OnClick = SpeedConstructionClick end object CarreItem: TMenuItem Caption = '&Carr�' HelpContext = 419 Hint = 'Cliquer les extr�mit�s d'#39'un c�t� (direct)' OnClick = SpeedConstructionClick end object N18: TMenuItem Caption = '-' end object PolygoneItem: TMenuItem Caption = 'Pol&ygone ...' HelpContext = 420 Hint = 'd�finir le nombre de sommet � cliquer' OnClick = SpeedConstructionClick end object PolygonergulierItem: TMenuItem Caption = 'Polygone &r�gulier ...' HelpContext = 421 Hint = 'cliquer le centre et un sommet (direct)' OnClick = SpeedConstructionClick end end object N35: TMenuItem Caption = '-' end object RapporteurItem: TMenuItem Caption = 'Rappor&teur' HelpContext = 612 Hint = 'cliquer le point puis l'#39'axe de r�f�rence' OnClick = SpeedTransformationClick end object MarquerangleItem: TMenuItem Caption = 'Mar&quer angle' HelpContext = 611 Hint = 'marquer angle : cliquer les 3 points (sommet en 2i�me)' OnClick = SpeedConstructionClick end object ArcItem: TMenuItem Caption = 'Marquer Ar&c' HelpContext = 613 Hint = 'cliquer le centre, le point "rayon" puis le point "�cart"' OnClick = SpeedConstructionClick end object N26: TMenuItem Caption = '-' end object LongueurSurCercleItem: TMenuItem Caption = 'En&roule segment' HelpContext = 422 Hint = 'Reporte la longueur d'#39'un segment � partir d'#39'un point le long d'#39'u' + 'n cercle' OnClick = SpeedConstructionClick end end object TransformationsMenu: TMenuItem Caption = '&Transformer' HelpContext = 500 Hint = 'gestion des transformations du plan' object ProjectionorthogonaleItem: TMenuItem Caption = '&Projection orthogonale' HelpContext = 501 Hint = 'Cliquer le point puis la droite des images' ShortCut = 122 OnClick = SpeedTransformationClick end object ProjectionobliqueItem: TMenuItem Caption = 'Projection &oblique' HelpContext = 502 Hint = 'cliquer le point, la direction puis la droite des images' ShortCut = 123 OnClick = SpeedTransformationClick end object N19: TMenuItem Caption = '-' end object SymetriecentraleItem: TMenuItem Caption = 'S&ym�trie centrale' HelpContext = 503 Hint = 'cliquer le point puis le centre' ShortCut = 116 OnClick = SpeedTransformationClick end object ReflexionItem: TMenuItem Caption = 'R�fle&xion' HelpContext = 504 Hint = 'cliquer le point puis l'#39'axe' ShortCut = 117 OnClick = SpeedTransformationClick end object TranslationItem: TMenuItem Caption = '&Translation' HelpContext = 505 Hint = 'cliquer le point, puis l'#39'origine et l'#39'extr�mit� du vecteur' ShortCut = 118 OnClick = SpeedTransformationClick end object N20: TMenuItem Caption = '-' end object RotationItem: TMenuItem Caption = '&Rotation' HelpContext = 506 Hint = 'pointer le point puis le centre ...' ShortCut = 119 OnClick = SpeedTransformationClick end object HomothetieItem: TMenuItem Caption = '&Homoth�tie' HelpContext = 507 Hint = 'pointer le point puis le centre ...' ShortCut = 120 OnClick = SpeedTransformationClick end object SimilitudeItem: TMenuItem Caption = '&Similitude' HelpContext = 508 Hint = 'pointer le point puis le centre ...' ShortCut = 121 OnClick = SpeedTransformationClick end object N21: TMenuItem Caption = '-' end object ModifierItem: TMenuItem Caption = '&Modifi� transform�' HelpContext = 509 Hint = 'pointer le point image' ShortCut = 16461 OnClick = SpeedTransformationClick end object N22: TMenuItem Caption = '-' end object ProjectionsurfonctionItem: TMenuItem Caption = 'Projection sur &fonction' HelpContext = 510 Hint = 'Cliquer le point puis la fonction' OnClick = SpeedTransformationClick end end object HistoriqueMenu: TMenuItem Caption = 'D�c&rire' HelpContext = 605 Hint = 'gestion de l'#39'historique, du titre, de l'#39'�nonc� et du scripte.' object TitreItem: TMenuItem Caption = '&Titre' HelpContext = 608 Hint = 'titre de la figure.' ShortCut = 8309 OnClick = TitreItemClick end object EnonceItem: TMenuItem Caption = '&Enonc�' HelpContext = 606 Hint = 'Lire/�crire un �nonc�.' OnClick = EnonceItemClick end object N31: TMenuItem Caption = '-' end object RecapitulationItem: TMenuItem Caption = '&Historique' HelpContext = 605 Hint = 'passage en mode historique.' ShortCut = 8306 OnClick = HistoriqueItemClick end object EcrireScripteItem: TMenuItem Caption = 'Ecrire &Script' HelpContext = 607 Hint = '�crit le script de la figure active.' OnClick = EcrireItemClick end object LireScripteItem: TMenuItem Caption = '&Lire Script' HelpContext = 607 Hint = 'affiche le texte d'#39'un script.' OnClick = LireItemClick end object N27: TMenuItem Caption = '-' end object EcrireImageo1: TMenuItem Caption = 'Ecrire &Imageo' HelpContext = 801 Hint = 'Ecrit un script avec le langage Imageo' OnClick = EcrireImageo1Click end object LireImageo1: TMenuItem Caption = 'Lire I&mageo' HelpContext = 801 Hint = 'Affiche un script Imageo' OnClick = LireImageo1Click end object N32: TMenuItem Caption = '-' end object DirectionItem: TMenuItem Caption = '&Directions' HelpContext = 614 Hint = 'Indique si les droites, segments sont parall�les, perpendiculair' + 'es ou s�cants.' OnClick = SpeedTransformationClick end object TriangleItem: TMenuItem Caption = 'Trian&gle' HelpContext = 614 Hint = 'Indique la nature d'#39'un triangle.' OnClick = SpeedTransformationClick end object QuadrilatereItem: TMenuItem Caption = '&Quadrilat�re' HelpContext = 614 Hint = 'Indique la nature d'#39'un quadrilat�re' OnClick = SpeedTransformationClick end object N33: TMenuItem Caption = '-' end object CoordonnesItem: TMenuItem Caption = '&Coordonn�es' HelpContext = 213 Hint = 'Coordonn�es d'#39'un point dans un rep�re.' OnClick = SpeedConstructionClick end object N25: TMenuItem Caption = '-' end object MesurerItem: TMenuItem Caption = '&Mesurer' HelpContext = 610 Hint = 'cliquer le segment ou l'#39'angle � mesurer' OnClick = SpeedConstructionClick end object EffacemesureItem: TMenuItem Caption = '&Efface mesure' HelpContext = 610 Hint = 'Cliquer l'#39'objet ' OnClick = SpeedConstructionClick end end object DiversMenu: TMenuItem Caption = '&Divers' HelpContext = 600 Hint = 'gestion de divers outils' object SupprimerobjetItem: TMenuItem Caption = 'Supprimer &objet' HelpContext = 601 Hint = 'cliquer l'#39'objet � supprimer' OnClick = SpeedPoubelleClick end object SupprimerrelationItem: TMenuItem Caption = 'Supprimer &relation' HelpContext = 602 Hint = 'cliquer l'#39'objet � lib�rer.' OnClick = SpeedConstructionClick end object N23: TMenuItem Caption = '-' end object LierpointobjetItem: TMenuItem Caption = 'Lier &point � objet' HelpContext = 603 Hint = 'cliquer le point puis l'#39'objet h�te' OnClick = SpeedConstructionClick end object N29: TMenuItem Caption = '-' end object LieudepointsItem: TMenuItem Caption = '&Lieu de points' HelpContext = 604 Hint = 'cliquer le point "lieu" puis drageur le point mobile' OnClick = SpeedCreationClick end object SupprimerlieuItem: TMenuItem Caption = 'S&upprimer lieu' HelpContext = 604 Hint = 'Emp�che le dessin de lieu pr�c�dent' OnClick = SupprimerlieuItemClick end object N34: TMenuItem Caption = '-' end object ReglerItem: TMenuItem Caption = 'R�&gler ...' HelpContext = 615 Hint = 'Param�tres des lieux automatiques' OnClick = ReglerItemClick end object LieuAutoMenuItem: TMenuItem Caption = 'Lieu &automatique' HelpContext = 615 Hint = 'Cliquer le point g�n�rateur, puis le point r�f�rence.' OnClick = SpeedConstructionClick end object N24: TMenuItem Caption = '-' end object MacroItem: TMenuItem Caption = '&Macros ...' HelpContext = 614 Hint = 'Acc�de au dialogue Macro' ShortCut = 16465 OnClick = MacroItemClick end end object FenetreMenu: TMenuItem Caption = 'Fe&n�tre' HelpContext = 700 Hint = 'Gestion de la fen�tre de D�clic' object OutilsItem: TMenuItem Caption = '&Validation outils ...' HelpContext = 702 Hint = 'Limitation des acc�s aux outils' OnClick = OutilsItemClick end object TrameItem: TMenuItem Caption = '&Trame' HelpContext = 703 Hint = 'Affiche ou non la trame de fond' OnClick = TrameItemClick end object ReglesItem: TMenuItem Caption = '&R�gles' Checked = True HelpContext = 704 Hint = 'Affiche ou non les r�gles' OnClick = ReglesItemClick end object PaletteItem: TMenuItem Caption = '&Palette' Checked = True HelpContext = 705 Hint = 'Affiche ou non la palette rapide' OnClick = PaletteItemClick end object N28: TMenuItem Caption = '-' end object LigneEtatItem: TMenuItem Caption = 'Ligne d'#39'�tat' Checked = True HelpContext = 708 Hint = 'Affiche ou non la ligne d'#39'�tat' OnClick = LigneEtatItemClick end object BarreoutilsItem: TMenuItem Caption = '&Barre outils' Checked = True HelpContext = 701 Hint = 'Affiche ou non la barre des outils' OnClick = BarreoutilsItemClick end object BarredroiteItem: TMenuItem Caption = 'Barr&e � droite' HelpContext = 705 Hint = 'Pour droitier ou gaucher' OnClick = BarredroiteItemClick end object N9: TMenuItem Caption = '-' end object InitialiseCopieItem: TMenuItem Caption = 'Init. copies �crans...' HelpContext = 706 Hint = 'Pr�pare le format de ma copie d'#39'�cran' OnClick = SpeedFLIsetupClick end object CopierEcranItem: TMenuItem Caption = '&Copier l'#39'�cran' HelpContext = 707 Hint = 'Copie la fen�tre D�clic (sans le menu)' ShortCut = 24699 OnClick = SpeedFLIRecordClick end end object HelpMenu: TMenuItem Caption = '&?' HelpContext = 800 Hint = 'gestion des aides' object AideItem: TMenuItem Caption = '&Aide' HelpContext = 801 Hint = 'Appel de l'#39'aide sur D�clic' ShortCut = 112 OnClick = AideItemClick end object RaccourcisItem: TMenuItem Caption = '&Raccourcis' HelpContext = 801 Hint = 'Affiche les raccourcis non explicites mais pratiques !' OnClick = RaccourcisItemClick end object N1: TMenuItem Caption = '-' end object SiteItem: TMenuItem Caption = '&Site D�clic' HelpContext = 801 Hint = 'Connecte � la page internet de D�clic (mise � jour, versions, lo' + 'giciels Keops ...)' OnClick = SiteItemClick end object SiteKeopsItem: TMenuItem Caption = 'Site &Keops' HelpContext = 801 Hint = 'Connecte � la page internet de Keops (logiciels, aiguillage, E-M' + 'ail ...)' OnClick = SiteKeopsItemClick end object N5: TMenuItem Caption = '-' end object AboutItem: TMenuItem Caption = 'A &propos ...' HelpContext = 802 Hint = 'A propos de D�clic' OnClick = AboutItemClick end end end object SaveDialog: TSaveDialog HelpContext = 103 DefaultExt = 'fdc' Filter = 'figure D�clic|*.fdc' Options = [ofPathMustExist, ofCreatePrompt] Title = 'Enregistrer figure sous ...' Left = 162 Top = 62 end object FontDialog: TFontDialog Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] Device = fdBoth MinFontSize = 0 MaxFontSize = 0 Options = [] Left = 228 Top = 86 end object ExporteDialog: TSaveDialog HelpContext = 107 DefaultExt = 'wmf' Filter = 'M�tafichier WMF|*.wmf|Bitmap BMP|*.bmp|Image GIF|*.gif' Options = [ofCreatePrompt] Title = 'Exporter figure' Left = 89 Top = 137 end object SaveScripteDialog: TSaveDialog HelpContext = 608 DefaultExt = 'scp' Filter = 'Fichier Scripte SCP|*.scp' Title = 'Ecire scripte' Left = 161 Top = 124 end object OpenScripteDialog: TOpenDialog HelpContext = 607 DefaultExt = 'scp' Filter = 'Scripte SCP|*.scp|Backup scripte BCP|*.bcp|Fichier Texte TXT|*.*' Title = 'Lire scripte' Left = 237 Top = 140 end object SaveImageoDialog: TSaveDialog HelpContext = 608 DefaultExt = 'fig' Filter = 'Fichier Imageo Fig|*.fig' Title = 'Ecire scripte Imageo' Left = 156 Top = 192 end object OpenImageoDialog: TOpenDialog HelpContext = 607 DefaultExt = 'fig' Filter = 'Scripte Imgeo Fig|*.fig|Backup Imageo Big|*.big|Fichier Texte T' + 'XT|*.*' Title = 'Lire Imageo' Left = 232 Top = 208 end end