You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
153 lines
3.2 KiB
153 lines
3.2 KiB
2 years ago
|
object VTK_Form: TVTK_Form
|
||
|
Left = 287
|
||
|
Top = 176
|
||
|
Width = 610
|
||
|
Height = 480
|
||
|
Caption = 'VTK_Form'
|
||
|
Color = clBtnFace
|
||
|
Font.Charset = DEFAULT_CHARSET
|
||
|
Font.Color = clWindowText
|
||
|
Font.Height = -11
|
||
|
Font.Name = 'MS Sans Serif'
|
||
|
Font.Style = []
|
||
|
OldCreateOrder = True
|
||
|
OnDestroy = FormDestroy
|
||
|
OnShow = FormShow
|
||
|
PixelsPerInch = 96
|
||
|
TextHeight = 13
|
||
|
object Panel3: TPanel
|
||
|
Left = 0
|
||
|
Top = 0
|
||
|
Width = 101
|
||
|
Height = 455
|
||
|
Align = alLeft
|
||
|
BevelInner = bvLowered
|
||
|
BorderWidth = 2
|
||
|
TabOrder = 0
|
||
|
object Label1: TLabel
|
||
|
Left = 10
|
||
|
Top = 46
|
||
|
Width = 48
|
||
|
Height = 13
|
||
|
Caption = 'Shrinker...'
|
||
|
OnClick = BackgroundColour1Click
|
||
|
end
|
||
|
object bc1: TButton
|
||
|
Left = 11
|
||
|
Top = 8
|
||
|
Width = 75
|
||
|
Height = 25
|
||
|
Caption = 'Create 1'
|
||
|
TabOrder = 0
|
||
|
OnClick = bc1Click
|
||
|
end
|
||
|
object ShrinkScroll: TScrollBar
|
||
|
Left = 10
|
||
|
Top = 62
|
||
|
Width = 72
|
||
|
Height = 13
|
||
|
PageSize = 0
|
||
|
Position = 50
|
||
|
TabOrder = 1
|
||
|
OnChange = ShrinkScrollChange
|
||
|
end
|
||
|
end
|
||
|
object BorderWindow: TPanel
|
||
|
Left = 101
|
||
|
Top = 0
|
||
|
Width = 501
|
||
|
Height = 455
|
||
|
Align = alClient
|
||
|
BevelInner = bvLowered
|
||
|
BevelWidth = 2
|
||
|
BorderWidth = 2
|
||
|
TabOrder = 1
|
||
|
object Panel2: TPanel
|
||
|
Left = 6
|
||
|
Top = 432
|
||
|
Width = 489
|
||
|
Height = 17
|
||
|
Align = alBottom
|
||
|
AutoSize = True
|
||
|
BevelOuter = bvNone
|
||
|
TabOrder = 0
|
||
|
object HeaderControl1: THeaderControl
|
||
|
Left = 0
|
||
|
Top = 0
|
||
|
Width = 489
|
||
|
Height = 17
|
||
|
Align = alBottom
|
||
|
DragReorder = False
|
||
|
Sections = <
|
||
|
item
|
||
|
ImageIndex = -1
|
||
|
MaxWidth = 60
|
||
|
MinWidth = 60
|
||
|
Text = 'Mode'
|
||
|
Width = 60
|
||
|
end
|
||
|
item
|
||
|
ImageIndex = -1
|
||
|
MaxWidth = 60
|
||
|
MinWidth = 60
|
||
|
Text = 'Window'
|
||
|
Width = 60
|
||
|
end>
|
||
|
OnSectionClick = HeaderControl1SectionClick
|
||
|
end
|
||
|
end
|
||
|
object vtkWindow1: TvtkBorlandRenderWindow
|
||
|
Left = 6
|
||
|
Top = 6
|
||
|
Width = 489
|
||
|
Height = 426
|
||
|
Align = alClient
|
||
|
Color = clMenuText
|
||
|
ParentColor = False
|
||
|
TabOrder = 1
|
||
|
OnEnter = vtkWindow1Enter
|
||
|
OnExit = vtkWindow1Exit
|
||
|
end
|
||
|
end
|
||
|
object ModeMenu: TPopupMenu
|
||
|
Left = 193
|
||
|
Top = 56
|
||
|
object TrackBallMode1: TMenuItem
|
||
|
Caption = 'TrackBall Mode'
|
||
|
Checked = True
|
||
|
GroupIndex = 1
|
||
|
RadioItem = True
|
||
|
OnClick = TrackBallMode1Click
|
||
|
end
|
||
|
object JoystickMode1: TMenuItem
|
||
|
Caption = 'Joystick Mode'
|
||
|
GroupIndex = 1
|
||
|
RadioItem = True
|
||
|
OnClick = TrackBallMode1Click
|
||
|
end
|
||
|
object FlightMode1: TMenuItem
|
||
|
Caption = 'Flight Mode'
|
||
|
GroupIndex = 1
|
||
|
RadioItem = True
|
||
|
OnClick = TrackBallMode1Click
|
||
|
end
|
||
|
end
|
||
|
object WindowMenu: TPopupMenu
|
||
|
Left = 221
|
||
|
Top = 56
|
||
|
object BackgroundColour1: TMenuItem
|
||
|
Caption = 'Background Colour'
|
||
|
OnClick = BackgroundColour1Click
|
||
|
end
|
||
|
object ResetCamera1: TMenuItem
|
||
|
Caption = 'Reset Camera'
|
||
|
OnClick = ResetCamera1Click
|
||
|
end
|
||
|
end
|
||
|
object backgroundcolor: TColorDialog
|
||
|
Ctl3D = True
|
||
|
Left = 301
|
||
|
Top = 56
|
||
|
end
|
||
|
end
|