ArenaZ

Форк
0
/
Evaluate.lfm 
425 строк · 12.8 Кб
1
object EvaluateForm: TEvaluateForm
2
  Left = 1031
3
  Height = 293
4
  Top = 323
5
  Width = 320
6
  BorderIcons = [biSystemMenu]
7
  BorderStyle = bsDialog
8
  ClientHeight = 293
9
  ClientWidth = 320
10
  Color = clCream
11
  Font.Color = clWindowText
12
  Font.Height = -11
13
  Font.Name = 'MS Sans Serif'
14
  FormStyle = fsStayOnTop
15
  KeyPreview = True
16
  ShowHint = True
17
  LCLVersion = '1.6.4.0'
18
  object GroupBox1: TGroupBox
19
    Left = 8
20
    Height = 251
21
    Top = 5
22
    Width = 305
23
    Caption = '  Evaluate function  '
24
    ClientHeight = 233
25
    ClientWidth = 301
26
    ParentShowHint = False
27
    ShowHint = True
28
    TabOrder = 0
29
    object Labe1: TLabel
30
      Left = 19
31
      Height = 13
32
      Top = 20
33
      Width = 68
34
      Alignment = taRightJustify
35
      AutoSize = False
36
      Caption = 'Enter X value:'
37
      Font.CharSet = ANSI_CHARSET
38
      Font.Color = clBlack
39
      Font.Height = -11
40
      Font.Name = 'Tahoma'
41
      ParentColor = False
42
      ParentFont = False
43
    end
44
    object Label2: TLabel
45
      Left = 19
46
      Height = 13
47
      Top = 42
48
      Width = 68
49
      Alignment = taRightJustify
50
      AutoSize = False
51
      Caption = 'Enter Y value:'
52
      Font.CharSet = ANSI_CHARSET
53
      Font.Color = clBlack
54
      Font.Height = -11
55
      Font.Name = 'Tahoma'
56
      ParentColor = False
57
      ParentFont = False
58
    end
59
    object Label3: TLabel
60
      Left = 17
61
      Height = 13
62
      Top = 65
63
      Width = 68
64
      Alignment = taRightJustify
65
      AutoSize = False
66
      Caption = 'Z value:'
67
      Font.CharSet = ANSI_CHARSET
68
      Font.Color = clMaroon
69
      Font.Height = -11
70
      Font.Name = 'Tahoma'
71
      Font.Style = [fsBold]
72
      ParentColor = False
73
      ParentFont = False
74
    end
75
    object Label6: TLabel
76
      Left = 4
77
      Height = 13
78
      Top = 203
79
      Width = 56
80
      Alignment = taRightJustify
81
      AutoSize = False
82
      Caption = 'Line width:'
83
      Font.CharSet = ANSI_CHARSET
84
      Font.Color = clBlack
85
      Font.Height = -11
86
      Font.Name = 'Tahoma'
87
      ParentColor = False
88
      ParentFont = False
89
    end
90
    object ColorButton: TSpeedButton
91
      Left = 189
92
      Height = 29
93
      Top = 192
94
      Width = 100
95
      Caption = 'Line Color...'
96
      Glyph.Data = {
97
        F6060000424DF606000000000000360000002800000018000000180000000100
98
        180000000000C00600000000000000000000000000000000000082C9F77FC8F7
99
        86CBF78CCEF792D0F898D3F89FD6F8A5D8F9AADBF9B1DDFAB7E0FABCE3FBC2E5
100
        FBC7E7FBCDE9FCD2ECFCD7EEFCDCF0FDE1F3FDE6F5FDE9F7FEEDF8FEF2F9FEF5
101
        FBFE70C3F570C2F677C5F67EC8F784CBF78BCDF792D0F898D3F89ED6F9A6D9F9
102
        ACDBFAB2DEFAB8E1FBBFE3FBC4E6FBCAE9FCCFEBFCD5EDFCDAEFFDDFF2FDE4F4
103
        FDE8F6FEEDF7FEF2F9FE6DC1F66ABFF571C2F678C5F6FF0000FF0000FF0000FF
104
        0000FF00009FD6F9FF0000FF0000FF0000B8E1FAFF0000C4E6FBFF0000FF0000
105
        D5EDFCDAF0FDDFF2FDE4F4FDE8F6FEEEF8FE67BEF563BDF56BC0F571C3F6FF00
106
        007EC8F785CBF78CCDF892D0F7FF00009FD6F9A6D9F9FF0000B2DEFAFF0000BF
107
        E4FBFF0000CAE8FCCFEBFCD5EDFCDAF0FDDFF2FDE4F4FDEAF7FE60BBF55EBAF4
108
        64BDF56BC0F5FF000077C5F67EC8F785CBF78CCEF7FF000098D3F89FD6F9FF00
109
        00ABDCFAFF0000B9E1FBFF0000C4E6FBCAE9FCCFEBFCD5EDFCDAEFFDDFF2FDE6
110
        F5FD5BB9F557B7F45EBAF464BDF5FF0000FF0000FF0000FF0000FF0000FF0000
111
        C0C0C099D4F8FF0000C0C0C0FF0000C0C0C0FF0000BFE3FBC4E6FBCAE9FCD0EA
112
        FCD5EDFCDAF0FDE2F3FD56B7F451B5F458B8F45EBAF5FF00006BC0F5FF00FFFF
113
        00FFFF00FFFF00FFFF0000FF0000FF000000FFFFFF0000FF0000FF0000FF0000
114
        BFE4FBC4E6FBCAE9FCD0EBFCD6EEFCDDF1FD50B5F44AB2F351B5F457B7F4FF00
115
        00FF00FFFF00FFFF00FFFF00FFFF00FF0000FF0000FFFF000000FFFF00FFFF00
116
        FFFFFF000000FFFF00FFFFBFE3FBC5E6FBCAE9FCCFEBFCD8EFFC49B2F344B0F3
117
        4BB2F352B5F4FF0000FF0000FF0000FF0000FF0000FF00FF0000FF0000FFFF00
118
        000000FFFF000000FFFF00FFFF00FFFF00FFFFB9E1FBBFE4FBC5E6FBCAE9FCD3
119
        ECFC45AFF33FADF346AFF34CB2F3FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
120
        0000FF0000FF0000FF0000FF00FFFF00FFFF00FFFF00FFFF00FFFFC0C0C0B9E1
121
        FBBFE4FBC5E6FBCEE9FC3FADF339AAF240ADF346B0F3FF00FFFF00FFFF00FFFF
122
        00FFFF00FF80008000008000000000000000008000808000FFFF00FFFF00FFFF
123
        00FFFF00FFFFB3DEFAB9E1FBBFE4FBC8E7FB3AABF234A8F239ABF23FADF2FF00
124
        FFFF00FFFF00FFFF00FFFF00FF80000000000000000000000000000000800000
125
        FF0000FFFF00FFFF00FFFFC0C0C0ADDCFAB3DFFABAE1FBC4E6FB36A8F22EA6F1
126
        34A8F23AAAF240ADF2FF00FFFF00FFFF00FFFF0000FF00000000000000000000
127
        0000000000FF0000FF0000FFFF00FFFF00FFFFA0D6F9A7D9F9ADDCFAB4DFFABE
128
        E3FB30A7F229A3F12FA6F134A9F239ABF2FF00FFFF00FFFF0000FF0000FF0000
129
        80000000000000000000800000FF0000FF0000FF0000FFFF00FFFF99D4F8A0D7
130
        F9A6D9F9ADDCFAB8E1FA2CA6F124A2F029A4F12FA6F134A8F23AABF2FF00FFFF
131
        0000FF0000FF0000FF000000000000800000FF0000FF0000FF0000FF0000FFFF
132
        8DCEF894D1F89AD4F8A1D7F9A7DAF9B3DEFA28A3F11F9FF024A1F129A3F12FA5
133
        F134A9F239ABF2FFFF00FF0000FF0000FF0000FFFF00FFFF0000FF0000FF0000
134
        FF00FFFF0080C8F786CCF78DCEF894D1F89AD4F9A1D7F9ACDBF924A1F11A9DF0
135
        1FA0F024A2F129A4F12FA6F134A8F2FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
136
        00FFFF00FFFF00FFFF00FFFF0079C6F680C9F786CBF78DCEF893D1F89AD4F8A7
137
        D9F920A0F0169BF01A9EF00000FF0000FF2AA3F12FA7F1C0C0C00000FF0000FF
138
        FFFF00FFFF000000FFFFFF00FFFF000000FF0000FF72C3F67AC6F60000FF87CC
139
        F78DCFF893D1F8A1D7F81C9DF01299EF0000FF1A9EF020A0F00000FF29A4F100
140
        00FFFFFF00FFFF000000FFFFFF000000FFFFFF000000FFFFFF0066BEF50000FF
141
        73C3F60000FF80C9F787CCF78DCFF89AD4F8189CF00E98EF0000FF169BF01B9E
142
        F01F9FF025A1F10000FF2FA6F1FFFF000000FFFFFF000000FFFFFF000000FF59
143
        B8F45FBBF50000FF6DC1F60000FF79C6F680C9F787CBF794D1F8159BF00A97EF
144
        0000FF129AEF169CF00000FF1FA0F00000FF2AA4F12FA7F10000FFC0C0C00000
145
        FF47B0F30000FF53B6F459B8F40000FF66BEF50000FF73C3F67AC6F681C9F78E
146
        CFF71299EF0695EF0A97EF0000FF0000FF169CF01B9DF01FA0F00000FF0000FF
147
        2FA6F134A8F20000FF41AEF347B0F30000FF0000FF59B8F45FBBF50000FF0000
148
        FF0000FF7AC6F688CCF70C97EF0394EE0795EF0A96EF0E98EF1299EF169CF01B
149
        9DF0209FF025A1F12AA4F12FA7F10000FF3AABF240AEF347B0F34CB3F352B6F4
150
        59B8F460BBF566BEF56DC1F573C3F680C8F61E9FF01098EF129AEF159BF0189D
151
        F01C9EF020A1F024A1F128A3F12DA6F132A7F237A9F20000FF41AEF346B0F34C
152
        B3F452B5F457B7F45DBAF563BCF569BFF66FC2F676C5F683CBF7
153
      }
154
      OnClick = ColorButtonClick
155
    end
156
    object Label4: TLabel
157
      Left = 8
158
      Height = 18
159
      Top = 87
160
      Width = 75
161
      Alignment = taRightJustify
162
      AutoSize = False
163
      Caption = 'dz/dx:'
164
      Font.CharSet = ANSI_CHARSET
165
      Font.Color = clMaroon
166
      Font.Height = -11
167
      Font.Name = 'Tahoma'
168
      Font.Style = [fsBold]
169
      ParentColor = False
170
      ParentFont = False
171
    end
172
    object Label5: TLabel
173
      Left = 8
174
      Height = 18
175
      Top = 109
176
      Width = 75
177
      Alignment = taRightJustify
178
      AutoSize = False
179
      Caption = 'dz/dy:'
180
      Font.CharSet = ANSI_CHARSET
181
      Font.Color = clMaroon
182
      Font.Height = -11
183
      Font.Name = 'Tahoma'
184
      Font.Style = [fsBold]
185
      ParentColor = False
186
      ParentFont = False
187
    end
188
    object Label1: TLabel
189
      Left = 171
190
      Height = 13
191
      Top = 172
192
      Width = 56
193
      Alignment = taRightJustify
194
      AutoSize = False
195
      Caption = 'Arrow size:'
196
      Font.CharSet = ANSI_CHARSET
197
      Font.Color = clBlack
198
      Font.Height = -11
199
      Font.Name = 'Tahoma'
200
      ParentColor = False
201
      ParentFont = False
202
    end
203
    object EditX: TEdit
204
      Tag = 1
205
      Left = 89
206
      Height = 21
207
      Top = 17
208
      Width = 200
209
      Font.CharSet = ANSI_CHARSET
210
      Font.Color = clBlack
211
      Font.Height = -11
212
      Font.Name = 'Tahoma'
213
      OnKeyPress = FloatKeyPress
214
      OnKeyUp = EditXKeyUp
215
      ParentFont = False
216
      TabOrder = 0
217
    end
218
    object EditY: TEdit
219
      Tag = 2
220
      Left = 89
221
      Height = 21
222
      Top = 39
223
      Width = 200
224
      Font.CharSet = ANSI_CHARSET
225
      Font.Color = clBlack
226
      Font.Height = -11
227
      Font.Name = 'Tahoma'
228
      OnKeyPress = FloatKeyPress
229
      OnKeyUp = EditYKeyUp
230
      ParentFont = False
231
      TabOrder = 1
232
    end
233
    object EditZ: TEdit
234
      Left = 89
235
      Height = 21
236
      Top = 62
237
      Width = 200
238
      Color = clCream
239
      Font.CharSet = ANSI_CHARSET
240
      Font.Color = clMaroon
241
      Font.Height = -11
242
      Font.Name = 'Tahoma'
243
      Font.Style = [fsBold]
244
      ParentFont = False
245
      ReadOnly = True
246
      TabOrder = 2
247
    end
248
    object Coordinates: TCheckBox
249
      Left = 29
250
      Height = 19
251
      Top = 133
252
      Width = 143
253
      Caption = 'Show coordinate lines'
254
      Checked = True
255
      Font.CharSet = ANSI_CHARSET
256
      Font.Color = clMaroon
257
      Font.Height = -11
258
      Font.Name = 'Tahoma'
259
      Font.Style = [fsBold]
260
      OnClick = CoordinatesClick
261
      ParentFont = False
262
      State = cbChecked
263
      TabOrder = 5
264
    end
265
    object ToGrids: TCheckBox
266
      Left = 29
267
      Height = 19
268
      Top = 152
269
      Width = 189
270
      Caption = 'Show coordinate lines to grids'
271
      Font.CharSet = ANSI_CHARSET
272
      Font.Color = clMaroon
273
      Font.Height = -11
274
      Font.Name = 'Tahoma'
275
      Font.Style = [fsBold]
276
      OnClick = ToGridsClick
277
      ParentFont = False
278
      TabOrder = 6
279
    end
280
    object EditCoordWidth: TEdit
281
      Tag = 1
282
      Left = 64
283
      Height = 21
284
      Top = 200
285
      Width = 56
286
      Font.CharSet = ANSI_CHARSET
287
      Font.Color = clBlack
288
      Font.Height = -11
289
      Font.Name = 'Tahoma'
290
      OnKeyPress = IntPress
291
      OnKeyUp = EditCoordWidthKeyUp
292
      ParentFont = False
293
      TabOrder = 7
294
    end
295
    object Editdzdx: TEdit
296
      Left = 89
297
      Height = 21
298
      Hint = 'Right click for Popup menu'
299
      Top = 84
300
      Width = 200
301
      Color = clCream
302
      Font.CharSet = ANSI_CHARSET
303
      Font.Color = clMaroon
304
      Font.Height = -11
305
      Font.Name = 'Tahoma'
306
      Font.Style = [fsBold]
307
      ParentFont = False
308
      PopupMenu = PopupMenu1
309
      ReadOnly = True
310
      TabOrder = 3
311
    end
312
    object Editdzdy: TEdit
313
      Left = 89
314
      Height = 21
315
      Hint = 'Right click for Popup menu'
316
      Top = 106
317
      Width = 200
318
      Color = clCream
319
      Font.CharSet = ANSI_CHARSET
320
      Font.Color = clMaroon
321
      Font.Height = -11
322
      Font.Name = 'Tahoma'
323
      Font.Style = [fsBold]
324
      ParentFont = False
325
      PopupMenu = PopupMenu1
326
      ReadOnly = True
327
      TabOrder = 4
328
    end
329
    object dzdx_dzdy: TCheckBox
330
      Left = 29
331
      Height = 19
332
      Top = 171
333
      Width = 134
334
      Caption = 'Show dz/dx && dz/dy'
335
      Font.CharSet = ANSI_CHARSET
336
      Font.Color = clMaroon
337
      Font.Height = -11
338
      Font.Name = 'Tahoma'
339
      Font.Style = [fsBold]
340
      OnClick = dzdx_dzdyClick
341
      ParentFont = False
342
      TabOrder = 8
343
    end
344
    object EditArrow: TEdit
345
      Tag = 1
346
      Left = 231
347
      Height = 21
348
      Top = 170
349
      Width = 56
350
      Font.CharSet = ANSI_CHARSET
351
      Font.Color = clBlack
352
      Font.Height = -11
353
      Font.Name = 'Tahoma'
354
      OnKeyPress = EditArrowKeyPress
355
      OnKeyUp = EditArrowKeyUp
356
      ParentFont = False
357
      TabOrder = 9
358
    end
359
  end
360
  object BitBtn1: TBitBtn
361
    Left = 232
362
    Height = 29
363
    Top = 256
364
    Width = 75
365
    Caption = '&Close'
366
    Glyph.Data = {
367
      F6000000424DF600000000000000760000002800000010000000100000000100
368
      040000000000800000000000000000000000100000001000000000000000FFFF
369
      000000008400FF00FF0000FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
370
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00330000000000
371
      0333330244444444033333022444444403333302224444440333330222044444
372
      0333330222044444033333022204444403333302220444440333330222044444
373
      0333330222044444033333022240444403333302220444440333330222044444
374
      0333330212044444033333021104444403333300000000000333
375
    }
376
    OnClick = BitBtn1Click
377
    TabOrder = 1
378
  end
379
  object ColorDialog: TColorDialog
380
    Color = clBlack
381
    CustomColors.Strings = (
382
      'ColorA=000000'
383
      'ColorB=000080'
384
      'ColorC=008000'
385
      'ColorD=008080'
386
      'ColorE=800000'
387
      'ColorF=800080'
388
      'ColorG=808000'
389
      'ColorH=808080'
390
      'ColorI=C0C0C0'
391
      'ColorJ=0000FF'
392
      'ColorK=00FF00'
393
      'ColorL=00FFFF'
394
      'ColorM=FF0000'
395
      'ColorN=FF00FF'
396
      'ColorO=FFFF00'
397
      'ColorP=FFFFFF'
398
      'ColorQ=C0DCC0'
399
      'ColorR=F0CAA6'
400
      'ColorS=F0FBFF'
401
      'ColorT=A4A0A0'
402
    )
403
    left = 16
404
    top = 59
405
  end
406
  object PopupMenu1: TPopupMenu
407
    left = 16
408
    top = 103
409
    object Slope1: TMenuItem
410
      Caption = 'Tangent'
411
      Checked = True
412
      OnClick = MenuClick
413
    end
414
    object Degree1: TMenuItem
415
      Tag = 1
416
      Caption = 'Degree'
417
      OnClick = MenuClick
418
    end
419
    object Radian1: TMenuItem
420
      Tag = 2
421
      Caption = 'Radian'
422
      OnClick = MenuClick
423
    end
424
  end
425
end
426

Использование cookies

Мы используем файлы cookie в соответствии с Политикой конфиденциальности и Политикой использования cookies.

Нажимая кнопку «Принимаю», Вы даете АО «СберТех» согласие на обработку Ваших персональных данных в целях совершенствования нашего веб-сайта и Сервиса GitVerse, а также повышения удобства их использования.

Запретить использование cookies Вы можете самостоятельно в настройках Вашего браузера.