File: evaluatedlg.lfm

package info (click to toggle)
lazarus 4.0%2Bdfsg-3
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 275,760 kB
  • sloc: pascal: 2,341,904; xml: 509,420; makefile: 348,726; cpp: 93,608; sh: 3,387; java: 609; perl: 297; sql: 222; ansic: 137
file content (210 lines) | stat: -rw-r--r-- 6,027 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
object EvaluateDlg: TEvaluateDlg
  Left = 454
  Height = 290
  Top = 318
  Width = 420
  BorderStyle = bsSizeToolWin
  Caption = 'Evaluate/Modify'
  ClientHeight = 290
  ClientWidth = 420
  Constraints.MinHeight = 200
  Constraints.MinWidth = 300
  KeyPreview = True
  OnClose = FormClose
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  OnMouseDown = FormMouseDown
  object txtResult: TMemo
    Left = 0
    Height = 137
    Top = 112
    Width = 420
    Align = alClient
    ScrollBars = ssAutoBoth
    TabOrder = 1
    OnMouseDown = FormMouseDown
  end
  inline WatchInspectNav1: TWatchInspectNav
    Width = 420
    Align = alTop
    ClientWidth = 420
    inherited ToolBar1: TToolBar
      Height = 90
      Width = 420
      inherited btnColType: TToolButton
        Left = 1
        Top = 24
      end
      inherited btnColVisibility: TToolButton
        Left = 24
        Top = 24
      end
      inherited btnWordWrap: TToolButton
        Left = 47
        Top = 24
      end
      inherited tbDivCol: TToolButton
        Left = 243
        Top = 24
      end
      inherited edFilter: TEditButton
        Left = 93
        Top = 24
      end
      inherited ArrayNavigationBar1: TArrayNavigationBar
        Left = 1
        Height = 36
        Top = 46
        Width = 529
        AutoSize = True
        ClientHeight = 36
        ClientWidth = 529
        TabOrder = 1
        inherited btnArrayStart: TSpeedButton
          AnchorSideLeft.Control = WatchInspectNav1.ArrayNavigationBar1
          AnchorSideTop.Control = WatchInspectNav1.ArrayNavigationBar1
          AnchorSideBottom.Control = WatchInspectNav1.ArrayNavigationBar1
          Height = 36
        end
        inherited btnArrayFastDown: TSpeedButton
          AnchorSideTop.Control = WatchInspectNav1.ArrayNavigationBar1
          AnchorSideBottom.Control = WatchInspectNav1.ArrayNavigationBar1
          Height = 36
        end
        inherited edArrayStart: TLazIntegerEdit
          AnchorSideTop.Control = WatchInspectNav1.ArrayNavigationBar1
          AnchorSideBottom.Control = WatchInspectNav1.ArrayNavigationBar1
          Height = 36
        end
        inherited btnArrayFastUp: TSpeedButton
          AnchorSideTop.Control = WatchInspectNav1.ArrayNavigationBar1
          AnchorSideBottom.Control = WatchInspectNav1.ArrayNavigationBar1
          Height = 36
        end
        inherited btnArrayEnd: TSpeedButton
          AnchorSideTop.Control = WatchInspectNav1.ArrayNavigationBar1
          AnchorSideBottom.Control = WatchInspectNav1.ArrayNavigationBar1
          Height = 36
        end
        inherited Label1: TLabel
          AnchorSideTop.Control = WatchInspectNav1.ArrayNavigationBar1
          AnchorSideBottom.Control = WatchInspectNav1.ArrayNavigationBar1
          Height = 36
        end
        inherited btnArrayPageDec: TSpeedButton
          AnchorSideTop.Control = WatchInspectNav1.ArrayNavigationBar1
          AnchorSideBottom.Control = WatchInspectNav1.ArrayNavigationBar1
          Height = 36
        end
        inherited edArrayPageSize: TLazIntegerEdit
          AnchorSideTop.Control = WatchInspectNav1.ArrayNavigationBar1
          AnchorSideBottom.Control = WatchInspectNav1.ArrayNavigationBar1
          Height = 36
        end
        inherited btnArrayPageInc: TSpeedButton
          AnchorSideTop.Control = WatchInspectNav1.ArrayNavigationBar1
          AnchorSideBottom.Control = WatchInspectNav1.ArrayNavigationBar1
          Height = 36
        end
        inherited lblBounds: TLabel
          AnchorSideTop.Control = WatchInspectNav1.ArrayNavigationBar1
          AnchorSideBottom.Control = WatchInspectNav1.ArrayNavigationBar1
          Height = 36
        end
        inherited cbEnforceBound: TCheckBox
          AnchorSideTop.Control = WatchInspectNav1.ArrayNavigationBar1
          AnchorSideBottom.Control = WatchInspectNav1.ArrayNavigationBar1
          Height = 36
          Width = 133
        end
        inherited btnHide: TSpeedButton
          AnchorSideTop.Control = WatchInspectNav1.ArrayNavigationBar1
          AnchorSideBottom.Control = WatchInspectNav1.ArrayNavigationBar1
          Left = 411
          Height = 34
          Width = 10
        end
        inherited cbAutoHide: TCheckBox
          AnchorSideTop.Control = WatchInspectNav1.ArrayNavigationBar1
          AnchorSideBottom.Control = WatchInspectNav1.ArrayNavigationBar1
          Left = 427
          Height = 36
          Width = 102
        end
      end
      inherited tbDivArray: TToolButton
        Left = 1
        Top = 68
      end
      inherited BtnAddWatch: TToolButton
        Left = 6
        Top = 68
      end
      inherited BtnInspect: TToolButton
        Left = 149
        Top = 68
      end
      inherited BtnEvaluate: TToolButton
        Left = 84
        Top = 68
      end
      inherited tbDivAdd: TToolButton
        Left = 204
        Top = 68
      end
      inherited btnEvalHistory: TToolButton
        Left = 209
        Top = 68
      end
      inherited btnDisplayFormat: TToolButton
        Left = 70
        Top = 24
        PopupMenu = nil
      end
    end
    inherited Panel1: TPanel
      Width = 420
      ClientWidth = 420
      inherited EdInspect: TComboBox
        Width = 398
      end
      inherited BtnExecute: TSpeedButton
        Left = 399
      end
    end
  end
  object Panel1: TPanel
    Left = 0
    Height = 38
    Top = 252
    Width = 420
    Align = alBottom
    AutoSize = True
    BorderSpacing.Top = 3
    ClientHeight = 38
    ClientWidth = 420
    TabOrder = 2
    object EdModify: TComboBox
      Left = 1
      Height = 36
      Top = 1
      Width = 398
      Align = alClient
      ItemHeight = 0
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      TextHint = 'New Value'
      OnKeyDown = EdModifyKeyDown
    end
    object BtnExecModify: TSpeedButton
      Left = 399
      Height = 36
      Top = 1
      Width = 20
      Align = alRight
      Caption = ':='
      OnClick = BtnExecModifyClick
    end
  end
end