1object WatchPropertyDlg: TWatchPropertyDlg 2 Left = 513 3 Height = 281 4 Top = 271 5 Width = 428 6 AutoSize = True 7 BorderIcons = [biSystemMenu] 8 BorderStyle = bsDialog 9 Caption = 'Watch Properties' 10 ClientHeight = 281 11 ClientWidth = 428 12 Constraints.MinWidth = 400 13 Position = poScreenCenter 14 LCLVersion = '1.9.0.0' 15 object rgStyle: TRadioGroup 16 Left = 6 17 Height = 104 18 Top = 138 19 Width = 416 20 Align = alClient 21 AutoFill = True 22 AutoSize = True 23 BorderSpacing.Left = 6 24 BorderSpacing.Right = 6 25 Caption = 'Style' 26 ChildSizing.LeftRightSpacing = 6 27 ChildSizing.TopBottomSpacing = 6 28 ChildSizing.EnlargeHorizontal = crsHomogenousChildResize 29 ChildSizing.EnlargeVertical = crsHomogenousChildResize 30 ChildSizing.ShrinkHorizontal = crsScaleChilds 31 ChildSizing.ShrinkVertical = crsScaleChilds 32 ChildSizing.Layout = cclLeftToRightThenTopToBottom 33 ChildSizing.ControlsPerLine = 3 34 ClientHeight = 85 35 ClientWidth = 412 36 Columns = 3 37 ItemIndex = 7 38 Items.Strings = ( 39 'Character' 40 'String' 41 'Decimal' 42 'Hexadecimal' 43 'Unsigned' 44 'Pointer' 45 'Record/Structure' 46 'Default' 47 'Memory Dump' 48 'Binary' 49 ) 50 TabOrder = 1 51 end 52 object ButtonPanel: TButtonPanel 53 Left = 6 54 Height = 27 55 Top = 248 56 Width = 416 57 OKButton.Name = 'OKButton' 58 OKButton.DefaultCaption = True 59 OKButton.OnClick = btnOKClick 60 HelpButton.Name = 'HelpButton' 61 HelpButton.DefaultCaption = True 62 HelpButton.OnClick = btnHelpClick 63 CloseButton.Name = 'CloseButton' 64 CloseButton.DefaultCaption = True 65 CloseButton.Enabled = False 66 CancelButton.Name = 'CancelButton' 67 CancelButton.DefaultCaption = True 68 TabOrder = 2 69 ShowButtons = [pbOK, pbCancel, pbHelp] 70 ShowBevel = False 71 end 72 object PanelTop: TPanel 73 Left = 0 74 Height = 138 75 Top = 0 76 Width = 428 77 Align = alTop 78 AutoSize = True 79 BevelOuter = bvNone 80 ClientHeight = 138 81 ClientWidth = 428 82 TabOrder = 0 83 object lblExpression: TLabel 84 AnchorSideLeft.Control = PanelTop 85 AnchorSideTop.Control = txtExpression 86 AnchorSideTop.Side = asrCenter 87 Left = 6 88 Height = 17 89 Top = 11 90 Width = 64 91 BorderSpacing.Left = 6 92 Caption = 'Expression:' 93 ParentColor = False 94 end 95 object txtExpression: TEdit 96 AnchorSideLeft.Control = lblExpression 97 AnchorSideLeft.Side = asrBottom 98 AnchorSideRight.Control = PanelTop 99 AnchorSideRight.Side = asrBottom 100 Left = 76 101 Height = 27 102 Top = 6 103 Width = 346 104 Anchors = [akTop, akLeft, akRight] 105 BorderSpacing.Left = 6 106 BorderSpacing.Top = 6 107 BorderSpacing.Right = 6 108 TabOrder = 0 109 end 110 object lblRepCount: TLabel 111 AnchorSideLeft.Control = PanelTop 112 AnchorSideTop.Control = txtRepCount 113 AnchorSideTop.Side = asrCenter 114 Left = 6 115 Height = 17 116 Top = 44 117 Width = 78 118 BorderSpacing.Left = 6 119 Caption = 'Repeat Count:' 120 ParentColor = False 121 end 122 object txtRepCount: TEdit 123 AnchorSideLeft.Control = lblRepCount 124 AnchorSideLeft.Side = asrBottom 125 AnchorSideTop.Control = txtExpression 126 AnchorSideTop.Side = asrBottom 127 Left = 90 128 Height = 27 129 Top = 39 130 Width = 60 131 BorderSpacing.Left = 6 132 BorderSpacing.Top = 6 133 TabOrder = 1 134 Text = '0' 135 end 136 object txtDigits: TEdit 137 AnchorSideLeft.Control = lblDigits 138 AnchorSideLeft.Side = asrBottom 139 AnchorSideTop.Control = txtRepCount 140 AnchorSideTop.Side = asrCenter 141 Left = 203 142 Height = 27 143 Top = 39 144 Width = 60 145 BorderSpacing.Left = 6 146 BorderSpacing.Top = 6 147 TabOrder = 2 148 Text = '0' 149 end 150 object lblDigits: TLabel 151 AnchorSideLeft.Control = txtRepCount 152 AnchorSideLeft.Side = asrBottom 153 AnchorSideTop.Control = lblRepCount 154 AnchorSideTop.Side = asrCenter 155 Left = 162 156 Height = 17 157 Top = 44 158 Width = 35 159 BorderSpacing.Left = 12 160 Caption = 'Digits:' 161 ParentColor = False 162 end 163 object chkEnabled: TCheckBox 164 AnchorSideTop.Control = txtRepCount 165 AnchorSideTop.Side = asrBottom 166 Left = 6 167 Height = 21 168 Top = 69 169 Width = 68 170 BorderSpacing.Left = 6 171 BorderSpacing.Top = 3 172 Caption = 'Enabled' 173 TabOrder = 3 174 end 175 object chkAllowFunc: TCheckBox 176 AnchorSideLeft.Control = chkEnabled 177 AnchorSideTop.Control = chkEnabled 178 AnchorSideTop.Side = asrBottom 179 Left = 6 180 Height = 21 181 Top = 90 182 Width = 133 183 AllowGrayed = True 184 Caption = 'Allow Function Calls' 185 TabOrder = 4 186 end 187 object chkUseInstanceClass: TCheckBox 188 AnchorSideLeft.Control = chkEnabled 189 AnchorSideTop.Control = chkAllowFunc 190 AnchorSideTop.Side = asrBottom 191 Left = 6 192 Height = 21 193 Top = 111 194 Width = 142 195 BorderSpacing.Bottom = 6 196 Caption = 'chkUseInstanceClass' 197 TabOrder = 5 198 end 199 end 200end 201