ZoomIn and ZoomOut buttons in Editor.

This commit is contained in:
utak3r 2006-04-17 18:35:21 +00:00
parent 78f090e855
commit a885e4252b
2 changed files with 110 additions and 80 deletions

View File

@ -54,7 +54,7 @@ object EditForm: TEditForm
TextHeight = 13 TextHeight = 13
object StatusBar: TStatusBar object StatusBar: TStatusBar
Left = 0 Left = 0
Top = 530 Top = 524
Width = 576 Width = 576
Height = 15 Height = 15
Panels = < Panels = <
@ -81,7 +81,7 @@ object EditForm: TEditForm
object EditorToolBar: TToolBar object EditorToolBar: TToolBar
Left = 1 Left = 1
Top = 1 Top = 1
Width = 552 Width = 568
Height = 22 Height = 22
Align = alLeft Align = alLeft
ButtonWidth = 25 ButtonWidth = 25
@ -228,20 +228,33 @@ object EditForm: TEditForm
Style = tbsCheck Style = tbsCheck
OnClick = tbExtendedEditClick OnClick = tbExtendedEditClick
end end
object ToolButton6: TToolButton object tbZoomOut: TToolButton
Left = 291 Left = 291
Top = 0 Top = 0
Caption = 'tbZoomOut'
ImageIndex = 26
OnClick = tbZoomOutClick
end
object tbZoomIn: TToolButton
Left = 316
Top = 0
Caption = 'tbZoomIn'
ImageIndex = 27
OnClick = tbZoomInClick
end
object ToolButton6: TToolButton
Left = 341
Top = 0
Width = 8 Width = 8
Caption = 'ToolButton6' Caption = 'ToolButton6'
ImageIndex = 16 ImageIndex = 16
Style = tbsSeparator Style = tbsSeparator
end end
object tbAxisLock: TToolButton object tbAxisLock: TToolButton
Left = 299 Left = 349
Top = 0 Top = 0
Hint = 'Lock transform axis' Hint = 'Lock transform axis'
Caption = 'tbAxisLock' Caption = 'tbAxisLock'
Down = True
ImageIndex = 16 ImageIndex = 16
ParentShowHint = False ParentShowHint = False
ShowHint = True ShowHint = True
@ -250,7 +263,7 @@ object EditForm: TEditForm
OnClick = tbAxisLockClick OnClick = tbAxisLockClick
end end
object tbPivotMode: TToolButton object tbPivotMode: TToolButton
Left = 324 Left = 374
Top = 0 Top = 0
Hint = 'Toggle world pivot mode' Hint = 'Toggle world pivot mode'
Caption = 'tbPivotMode' Caption = 'tbPivotMode'
@ -261,7 +274,7 @@ object EditForm: TEditForm
OnClick = btnPivotModeClick OnClick = btnPivotModeClick
end end
object ToolButton5: TToolButton object ToolButton5: TToolButton
Left = 349 Left = 399
Top = 0 Top = 0
Width = 8 Width = 8
Caption = 'ToolButton5' Caption = 'ToolButton5'
@ -270,7 +283,7 @@ object EditForm: TEditForm
Visible = False Visible = False
end end
object tbRotate90CCW: TToolButton object tbRotate90CCW: TToolButton
Left = 357 Left = 407
Top = 0 Top = 0
Hint = 'Rotate triangle 90'#176' counter-clockwise' Hint = 'Rotate triangle 90'#176' counter-clockwise'
Caption = 'tbRotate90CCW' Caption = 'tbRotate90CCW'
@ -280,7 +293,7 @@ object EditForm: TEditForm
OnClick = btTrgRotateLeft90Click OnClick = btTrgRotateLeft90Click
end end
object tbRotate90CW: TToolButton object tbRotate90CW: TToolButton
Left = 382 Left = 432
Top = 0 Top = 0
Hint = 'Rotate triangle 90'#176' clockwise' Hint = 'Rotate triangle 90'#176' clockwise'
Caption = 'tbRotate90CW' Caption = 'tbRotate90CW'
@ -290,7 +303,7 @@ object EditForm: TEditForm
OnClick = btTrgRotateRight90Click OnClick = btTrgRotateRight90Click
end end
object tbFlipHorz: TToolButton object tbFlipHorz: TToolButton
Left = 407 Left = 457
Top = 0 Top = 0
Hint = 'Flip triangle horizontal' Hint = 'Flip triangle horizontal'
Caption = 'Flip Horizontal' Caption = 'Flip Horizontal'
@ -300,7 +313,7 @@ object EditForm: TEditForm
OnClick = mnuFlipHorizontalClick OnClick = mnuFlipHorizontalClick
end end
object tbFlipVert: TToolButton object tbFlipVert: TToolButton
Left = 432 Left = 482
Top = 0 Top = 0
Hint = 'Flip triangle vertical' Hint = 'Flip triangle vertical'
Caption = 'Flip Vertical' Caption = 'Flip Vertical'
@ -310,7 +323,7 @@ object EditForm: TEditForm
OnClick = mnuFlipVerticalClick OnClick = mnuFlipVerticalClick
end end
object ToolButton2: TToolButton object ToolButton2: TToolButton
Left = 457 Left = 507
Top = 0 Top = 0
Width = 8 Width = 8
Caption = 'ToolButton2' Caption = 'ToolButton2'
@ -318,7 +331,7 @@ object EditForm: TEditForm
Style = tbsSeparator Style = tbsSeparator
end end
object tbVarPreview: TToolButton object tbVarPreview: TToolButton
Left = 465 Left = 515
Top = 0 Top = 0
Hint = 'Show/hide variation preview' Hint = 'Show/hide variation preview'
Caption = 'Variation Preview' Caption = 'Variation Preview'
@ -329,7 +342,7 @@ object EditForm: TEditForm
OnClick = tbVarPreviewClick OnClick = tbVarPreviewClick
end end
object ToolButton3: TToolButton object ToolButton3: TToolButton
Left = 490 Left = 540
Top = 0 Top = 0
Width = 8 Width = 8
Caption = 'ToolButton3' Caption = 'ToolButton3'
@ -337,7 +350,7 @@ object EditForm: TEditForm
Style = tbsSeparator Style = tbsSeparator
end end
object tbEnableFinalXform: TToolButton object tbEnableFinalXform: TToolButton
Left = 498 Left = 548
Top = 0 Top = 0
Hint = 'Enable final transform' Hint = 'Enable final transform'
Caption = 'Show Final Xform' Caption = 'Show Final Xform'
@ -353,14 +366,14 @@ object EditForm: TEditForm
Left = 0 Left = 0
Top = 24 Top = 24
Width = 576 Width = 576
Height = 506 Height = 500
Align = alClient Align = alClient
TabOrder = 1 TabOrder = 1
object Splitter1: TSplitter object Splitter1: TSplitter
Left = 394 Left = 394
Top = 1 Top = 1
Width = 9 Width = 9
Height = 504 Height = 498
Align = alRight Align = alRight
AutoSnap = False AutoSnap = False
Beveled = True Beveled = True
@ -371,7 +384,7 @@ object EditForm: TEditForm
Left = 1 Left = 1
Top = 1 Top = 1
Width = 393 Width = 393
Height = 504 Height = 498
Align = alClient Align = alClient
BevelOuter = bvNone BevelOuter = bvNone
Color = clAppWorkSpace Color = clAppWorkSpace
@ -381,7 +394,7 @@ object EditForm: TEditForm
Left = 403 Left = 403
Top = 1 Top = 1
Width = 172 Width = 172
Height = 504 Height = 498
Align = alRight Align = alRight
Alignment = taLeftJustify Alignment = taLeftJustify
BevelOuter = bvNone BevelOuter = bvNone
@ -420,7 +433,7 @@ object EditForm: TEditForm
Left = 0 Left = 0
Top = 138 Top = 138
Width = 172 Width = 172
Height = 366 Height = 360
Align = alClient Align = alClient
TabOrder = 0 TabOrder = 0
object lblTransform: TLabel object lblTransform: TLabel
@ -451,7 +464,7 @@ object EditForm: TEditForm
end end
object PageControl: TPageControl object PageControl: TPageControl
Left = 1 Left = 1
Top = 32 Top = 26
Width = 170 Width = 170
Height = 333 Height = 333
ActivePage = TriangleTab ActivePage = TriangleTab
@ -1726,7 +1739,7 @@ object EditForm: TEditForm
Left = 313 Left = 313
Top = 40 Top = 40
Bitmap = { Bitmap = {
494C01011A001D00040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600 494C01011C001D00040010001000FFFFFFFFFF00FFFFFFFFFFFFFFFF424D3600
0000000000003600000028000000400000008000000001002000000000000080 0000000000003600000028000000400000008000000001002000000000000080
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
@ -1861,10 +1874,10 @@ object EditForm: TEditForm
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000292B2F000000
0000000000000000000000000000000000000000000000000000000000000000 00002F3236000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000292B2F000000
0000000000000000000000000000000000000000000000000000FFFFFF000000 00002F3236000000000000000000000000000000000000000000FFFFFF000000
00000000000000000000000000000000000000000000FFFFFF00000000000000 00000000000000000000000000000000000000000000FFFFFF00000000000000
000000000000FFFFFF0000000000000000000000000000000000000000000000 000000000000FFFFFF0000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
@ -1877,10 +1890,10 @@ object EditForm: TEditForm
000000000000FFFFFF0000000000000000000000000000000000000000000000 000000000000FFFFFF0000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000003F43480000000000575C
0000000000000000000000000000000000000000000000000000000000000000 6400000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000003F43480000000000575C
0000000000000000000000000000000000000000000000000000FFFFFF000000 6400000000000000000000000000000000000000000000000000FFFFFF000000
0000000000000000000000000000000000000000000000000000FFFFFF000000 0000000000000000000000000000000000000000000000000000FFFFFF000000
0000FFFFFF000000000000000000000000000000000000000000000000000000 0000FFFFFF000000000000000000000000000000000000000000000000000000
0000000000000000000040606000000000004060600000000000000000000000 0000000000000000000040606000000000004060600000000000000000000000
@ -1893,89 +1906,89 @@ object EditForm: TEditForm
FF00000000000000000000000000000000000000000000000000000000000000 FF00000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000393C410000000000626871000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000393C410000000000626871000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000FFFFFF000000 0000000000000000000000000000000000000000000000000000FFFFFF000000
0000000000000000000000000000000000000000000000000000FFFFFF000000 0000000000000000000000000000000000000000000000000000FFFFFF000000
0000FFFFFF000000000000000000000000000000000000000000000000000000 0000FFFFFF000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000006E52440033262100382A22000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000006E52440033262100382A22000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000FFFFFF000000 0000000000000000000000000000000000000000000000000000FFFFFF000000
00000000000000000000000000000000000000000000FFFFFF00000000000000 00000000000000000000000000000000000000000000FFFFFF00000000000000
000000000000FFFFFF0000000000000000000000000000000000000000000000 000000000000FFFFFF0000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000008668
0000000000000000000000000000000000000000000000000000000000000000 5A002A080000B57E5D00EFE4DF00E0CFC500AD7150002D0F0200957464000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000008668
0000000000000000000000000000000000000000000000000000000000000000 5A002A080000B57E5D00EFE4DF00E0CFC500AD7150002D0F0200957464000000
0000000000000000000000000000000000000000000000000000FFFFFF00FFFF 0000000000000000000000000000000000000000000000000000FFFFFF00FFFF
FF00FFFFFF00FFFFFF00000000000000000000000000FFFFFF00000000000000 FF00FFFFFF00FFFFFF00000000000000000000000000FFFFFF00000000000000
000000000000FFFFFF0000000000000000000000000000000000406060000000 000000000000FFFFFF0000000000000000000000000000000000406060000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000406060000000000000000000000000000000000000000000000000000000 000040606000000000000000000000000000000000000000000000000000350B
0000000000000000000000000000000000000000000000000000000000000000 0500E9DAC900FDF5E600FCEFE300FBEDE300FCF3EA00E2D1C8003B160B00A288
0000000000000000000000000000000000000000000000000000000000000000 800000000000000000000000000000000000000000000000000000000000350B
0000000000000000000000000000000000000000000000000000000000000000 0500E9DAC900FDF5E600FCEFE300FBEDE300FCF3EA00E2D1C8003B160B00A288
0000000000000000000000000000000000000000000000000000000000000000 8000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000003C2D2400D0AB
9600FCECD800F8DCC700F3D7C500F3D9C900F9E3D100FCF3E400D2B4A1002219
14000000000000000000000000000000000000000000000000003C2D2400D0AB
9600FCECD800F8DCC7000000000000000000F9E3D100FCF3E400D2B4A1002219
1400000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000406060000000 0000000000000000000000000000000000000000000000000000406060000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000406060000000000000000000000000000000000000000000000000000000 000040606000000000000000000000000000000000000000000001010100F6E3
0000000000000000000000000000000000000000000000000000000000000000 D300F9D1BB00EEBEA500EDBCA200ECC2A800F0CDB800FAE2CD00FEFCE2000000
0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000000000000001010100F6E3
0000000000000000000000000000000000000000000000000000000000000000 D300F9D1BB00EEBEA5000000000000000000F0CDB800FAE2CD00FEFCE2000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000008000000080000000000000000000000000 0000000000000000000000000000008000000080000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000000000000000000000FDEA
0000000000000000000000000000000000000000000000000000000000000000 D900000000000000000000000000000000000000000000000000FFEED3000A08
0000000000000000000000000000000000000000000000000000000000000000 050000000000000000000000000000000000000000000000000000000000FDEA
0000000000000000000000000000000000000000000000000000000000000000 D900000000000000000000000000000000000000000000000000FFEED3000A08
0000000000000000000000000000000000000000000000000000000000000000 0500000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000008000000080000000000000000000000000 0000000000000000000000000000008000000080000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000000000000000000000FBE2
0000000000000000000000000000000000000000000000000000000000000000 D300F8BCA300EC9D7F00E6978000E79D8400ECAD8D00F7C4A800EBCAB0000C09
0000000000000000000000000000000000000000000000000000000000000000 080000000000000000000000000000000000000000000000000000000000FBE2
0000000000000000000000000000000000000000000000000000000000000000 D300F8BCA300EC9D7F000000000000000000ECAD8D00F7C4A800EBCAB0000C09
0000000000000000000000000000000000000000000000000000000000000000 0800000000000000000000000000000000000000000000000000000000000000
0000000000000080000000800000008000000080000000800000008000000000 0000000000000080000000800000008000000080000000800000008000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000000000000067565100B57C
0000000000000000000000000000000000000000000000000000000000000000 5F00FDD1BA00F5AD9400F19B7E00F09D8200F6B29500FDC7A400925039006655
0000000000000000000000000000000000000000000000000000000000000000 500000000000000000000000000000000000000000000000000067565100B57C
0000000000000000000000000000000000000000000000000000000000000000 5F00FDD1BA00F5AD94000000000000000000F6B29500FDC7A400925039006655
0000000000000000000000000000000000000000000000000000000000000000 5000000000000000000000000000000000000000000000000000000000000000
0000000000000080000000800000008000000080000000800000008000000000 0000000000000080000000800000008000000080000000800000008000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000040606000000000004060600000000000000000000000 0000000000000000000040606000000000004060600000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000006147
0000000000000000000000000000000000000000000000000000000000000000 3800BD8B7100FEDECC00FED2BF00FCC0A900FEC7A9008E4C36001D1713000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000006147
0000000000000000000000000000000000000000000000000000000000000000 3800BD8B7100FEDECC00FED2BF00FCC0A900FEC7A9008E4C36001D1713000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000008000000080000000000000000000000000 0000000000000000000000000000008000000080000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
00005144400005030200583B2700452D1F000000000042383400000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 00005144400005030200583B2700452D1F000000000042383400000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000008000000080000000000000000000000000 0000000000000000000000000000008000000080000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
@ -2758,11 +2771,11 @@ object EditForm: TEditForm
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000008F11FFFF000000008F110EE100000000 000000000000000000000000000000008F11FFFFFFC7FFC78F110EE1FFCFFFCF
8F117C7D000000008383783D0000000083C77EFD000000008383FEFF00000000 8F117C7DFF8FFF8F8383783DFF9FFF9F83C77EFDFF1FFF1F8383FEFFF83FF83F
8111DEF70000000081119EF3000000008111000100000000FFFF9EF300000000 8111DEF7E01FE01F81119EF3E00FE00F81110001C00FC00FFFFF9EF3C00FC00F
FE7FDEF700000000FE7FFEFF00000000F81F7EFD00000000F81F783D00000000 FE7FDEF7C00FC00FFE7FFEFFC00FC00FF81F7EFDC00FC00FF81F783DE01FE01F
FE7F7C7D00000000FE7F0EE100000000FFFFFEFFFFF7FFFFFEFFFEFFFEF7FEFF FE7F7C7DF03FF03FFE7F0EE1FFFFFFFFFFFFFEFFFFF7FFFFFEFFFEFFFEF7FEFF
FFFFFEFFFFF7FFFFFEFFFABFFEF7FEFFFFFFFC7FFFD5FFFFFEFFEEFFFEE3FEFB FFFFFEFFFFF7FFFFFEFFFABFFEF7FEFFFFFFFC7FFFD5FFFFFEFFEEFFFEE3FEFB
FFFFF47FFFF7FFFDAA020002AA02AA00FEE7F467FEE7FEE5FECFEECFFECFFECB FFFFF47FFFF7FFFDAA020002AA02AA00FEE7F467FEE7FEE5FECFEECFFECFFECB
FE9FFE9FF69FFE9FFE3FFE3FFA3FFE3FFE7FFE7F007FFE7FFEFFFEFFFAFFFABF FE9FFE9FF69FFE9FFE3FFE3FFA3FFE3FFE7FFE7F007FFE7FFEFFFEFFFAFFFABF
@ -2786,8 +2799,7 @@ object EditForm: TEditForm
C003E001E001E001C003F1F9F1F9F1F9C003F8F90009D8D9C003FC7980098C09 C003E001E001E001C003F1F9F1F9F1F9C003F8F90009D8D9C003FC7980098C09
C003F239C609C619C003F319E309E219C003F389F189F009C003F3C1F8C1F8C1 C003F239C609C619C003F319E309E219C003F389F189F009C003F3C1F8C1F8C1
C0030021FC41F061C0070031FE01E231C00FF3F9FF09C719C01FF3FDFF8D8F8D C0030021FC41F061C0070031FE01E231C00FF3F9FF09C719C01FF3FDFF8D8F8D
C03FF3FFFFCFDFDFFFFFF3FFFFEFFFFF00000000000000000000000000000000 C03FF3FFFFCFDFDFFFFFF3FFFFEFFFFF}
000000000000}
end end
object TrianglePopup: TPopupMenu object TrianglePopup: TPopupMenu
AutoPopup = False AutoPopup = False

View File

@ -192,6 +192,8 @@ type
tbRotate90CCW: TToolButton; tbRotate90CCW: TToolButton;
tbRotate90CW: TToolButton; tbRotate90CW: TToolButton;
chkAxisLock: TCheckBox; chkAxisLock: TCheckBox;
tbZoomOut: TToolButton;
tbZoomIn: TToolButton;
procedure ValidateVariable; procedure ValidateVariable;
procedure vleVariablesValidate(Sender: TObject; ACol, ARow: Integer; const KeyName, KeyValue: string); procedure vleVariablesValidate(Sender: TObject; ACol, ARow: Integer; const KeyName, KeyValue: string);
procedure vleVariablesKeyPress(Sender: TObject; var Key: Char); procedure vleVariablesKeyPress(Sender: TObject; var Key: Char);
@ -334,6 +336,8 @@ type
procedure ResetAxisScale(n: integer); procedure ResetAxisScale(n: integer);
procedure tbExtendedEditClick(Sender: TObject); procedure tbExtendedEditClick(Sender: TObject);
procedure tbAxisLockClick(Sender: TObject); procedure tbAxisLockClick(Sender: TObject);
procedure tbZoomOutClick(Sender: TObject);
procedure tbZoomInClick(Sender: TObject);
private private
TriangleView: TCustomDrawControl; TriangleView: TCustomDrawControl;
@ -4411,5 +4415,19 @@ begin
end; end;
end; end;
procedure TEditForm.tbZoomOutClick(Sender: TObject);
begin
GraphZoom := GraphZoom * 0.8;
EditForm.StatusBar.Panels[2].Text := Format('Zoom: %f', [GraphZoom]);
TriangleView.Invalidate;
end;
procedure TEditForm.tbZoomInClick(Sender: TObject);
begin
GraphZoom := GraphZoom * 1.2;
EditForm.StatusBar.Panels[2].Text := Format('Zoom: %f', [GraphZoom]);
TriangleView.Invalidate;
end;
end. end.