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