object DarstellungDialog: TDarstellungDialog Left = 504 Top = 286 BorderIcons = [] BorderStyle = bsDialog Caption = 'Structure depiction ' ClientHeight = 265 ClientWidth = 663 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -14 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} OldCreateOrder = True Position = poScreenCenter Scaled = False OnActivate = FormActivate OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 16 object PageControl1: TPageControl Left = 0 Top = 0 Width = 663 Height = 200 ActivePage = TabSheet1 Align = alClient TabOrder = 0 object TabSheet1: TTabSheet Caption = 'Depiction' object Label1: TLabel Left = 423 Top = 30 Width = 189 Height = 24 Caption = 'Depiction of the &if-parts' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -20 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label2: TLabel Left = 502 Top = 69 Width = 82 Height = 24 Caption = '&Then-part' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -20 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label3: TLabel Left = 502 Top = 108 Width = 75 Height = 24 Caption = '&Else-Part' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -20 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object CheckBox1: TCheckBox Left = 36 Top = 30 Width = 379 Height = 20 Caption = '&Hide levels when opening the window.' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -20 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 end object CheckBox2: TCheckBox Left = 36 Top = 63 Width = 251 Height = 21 Caption = '&Line numbers' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -20 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 end object CheckBox3: TCheckBox Left = 36 Top = 96 Width = 325 Height = 25 Caption = 'Hide line &comments' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -20 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 2 end object CaseVertCB: TCheckBox Left = 36 Top = 129 Width = 237 Height = 25 Caption = 'Case-structure &vertical' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -20 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 3 end object ThenEdit: TEdit Left = 463 Top = 69 Width = 21 Height = 24 MaxLength = 1 TabOrder = 4 Text = 'J' end object elseEdit: TEdit Left = 463 Top = 108 Width = 21 Height = 24 MaxLength = 1 TabOrder = 5 Text = 'N' end end object ScrollTabSheet: TTabSheet Caption = 'Scrolling' ImageIndex = 1 object Label4: TLabel Left = 96 Top = 114 Width = 317 Height = 20 Caption = 'ms &fall back time to complete depiction.' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object SchnellScrollCB: TCheckBox Left = 28 Top = 32 Width = 237 Height = 25 Caption = '&Quick scroll' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -20 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 end object ProcKoepfeCB: TCheckBox Left = 28 Top = 72 Width = 533 Height = 25 Caption = '&Show source code in procedure heads while quick scroll, ' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -20 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 end object TimerZeitSpinEdit: TSpinEdit Left = 24 Top = 112 Width = 65 Height = 26 Increment = 10 MaxValue = 1500 MinValue = 100 TabOrder = 2 Value = 200 end end end object Panel1: TPanel Left = 0 Top = 200 Width = 663 Height = 65 Align = alBottom TabOrder = 1 object BitBtn1: TBitBtn Left = 325 Top = 17 Width = 100 Height = 32 Caption = '&OK' TabOrder = 2 OnClick = BitBtn1Click Kind = bkOK end object BitBtn2: TBitBtn Left = 434 Top = 17 Width = 100 Height = 32 Caption = '&Cancel' TabOrder = 3 Kind = bkAbort end object BitBtn3: TBitBtn Left = 547 Top = 17 Width = 100 Height = 32 Caption = '&Help' TabOrder = 4 OnClick = BitBtn3Click Kind = bkHelp end object FontButton: TButton Left = 36 Top = 17 Width = 100 Height = 32 Caption = '&Font...' TabOrder = 0 OnClick = FontButtonClick end object FarbenButton: TButton Left = 145 Top = 17 Width = 100 Height = 32 Caption = 'Co&lors...' TabOrder = 1 OnClick = FarbenButtonClick end end end