mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-30 15:42:40 +02:00
92aacc4bf2
- add skVariant enum value for Variant data type, - move Variant type handling to skVariant - misc Inspect dialog improvements (hiding pages, close on escape) git-svn-id: trunk@23002 -
53 lines
1.0 KiB
Plaintext
53 lines
1.0 KiB
Plaintext
inherited IDEInspectDlg: TIDEInspectDlg
|
|
Left = 366
|
|
Height = 407
|
|
Top = 185
|
|
Width = 295
|
|
BorderStyle = bsSizeToolWin
|
|
Caption = 'IDEInspectDlg'
|
|
ClientHeight = 407
|
|
ClientWidth = 295
|
|
Constraints.MinHeight = 200
|
|
Constraints.MinWidth = 200
|
|
KeyPreview = True
|
|
OnClose = FormClose
|
|
OnKeyDown = FormKeyDown
|
|
object StatusBar1: TStatusBar[0]
|
|
Left = 0
|
|
Height = 23
|
|
Top = 384
|
|
Width = 295
|
|
Panels = <>
|
|
end
|
|
object PageControl: TPageControl[1]
|
|
Left = 0
|
|
Height = 363
|
|
Top = 21
|
|
Width = 295
|
|
ActivePage = DataPage
|
|
Align = alClient
|
|
TabIndex = 0
|
|
TabOrder = 1
|
|
object DataPage: TTabSheet
|
|
Caption = 'DataPage'
|
|
end
|
|
object PropertiesPage: TTabSheet
|
|
Caption = 'PropertiesPage'
|
|
end
|
|
object MethodsPage: TTabSheet
|
|
Caption = 'MethodsPage'
|
|
end
|
|
end
|
|
object EditInspected: TEdit[2]
|
|
Left = 0
|
|
Height = 21
|
|
Top = 0
|
|
Width = 295
|
|
Align = alTop
|
|
Enabled = False
|
|
ReadOnly = True
|
|
TabOrder = 2
|
|
Text = '(...)'
|
|
end
|
|
end
|