Statistiques
| Révision:

root / UFGraph3D.dfm

Historique | Voir | Annoter | Télécharger (24,123 ko)

1 3 avalancogn
object FGraph3D: TFGraph3D
2
  Left = 0
3
  Top = 120
4
  HelpContext = 5390
5
  Caption = 'Energy response curve'
6
  ClientHeight = 560
7
  ClientWidth = 792
8
  Color = clBtnFace
9
  Font.Charset = DEFAULT_CHARSET
10
  Font.Color = clWindowText
11
  Font.Height = -11
12
  Font.Name = 'MS Sans Serif'
13
  Font.Style = []
14
  OldCreateOrder = False
15
  Position = poMainFormCenter
16
  OnClose = FormClose
17
  OnCreate = FormCreate
18
  OnShow = FormShow
19
  PixelsPerInch = 96
20
  TextHeight = 13
21
  object Panel2D: TPanel
22
    Left = 200
23
    Top = 0
24
    Width = 592
25
    Height = 560
26
    Align = alClient
27
    BevelOuter = bvNone
28
    TabOrder = 1
29
    Visible = False
30
    object TrackBarJour: TTrackBar
31
      Left = 0
32
      Top = 528
33
      Width = 592
34
      Height = 32
35
      Hint = 'Day-by-day progression of the simulation'
36
      Align = alBottom
37
      Max = 100
38
      Min = 1
39
      ParentShowHint = False
40
      PageSize = 7
41
      Frequency = 7
42
      Position = 1
43
      SelEnd = 1
44
      SelStart = 1
45
      ShowHint = True
46
      TabOrder = 0
47
      OnChange = TrackBarJourChange
48
    end
49
    object Chart2D: TChart
50
      Left = 0
51
      Top = 0
52
      Width = 592
53
      Height = 528
54
      Legend.Visible = False
55
      Title.Text.Strings = (
56
        'TChart')
57
      Title.Visible = False
58
      BottomAxis.Automatic = False
59
      BottomAxis.AutomaticMaximum = False
60
      BottomAxis.AutomaticMinimum = False
61
      BottomAxis.ExactDateTime = False
62
      BottomAxis.Increment = 1.000000000000000000
63
      BottomAxis.Maximum = 6.000000000000000000
64
      BottomAxis.Minimum = 1.000000000000000000
65
      BottomAxis.Title.Caption = 'NE intake (multiples of maintenance)'
66
      BottomAxis.Title.Font.Style = [fsBold]
67
      LeftAxis.Automatic = False
68
      LeftAxis.AutomaticMaximum = False
69
      LeftAxis.AutomaticMinimum = False
70
      LeftAxis.ExactDateTime = False
71
      LeftAxis.Increment = 25.000000000000000000
72
      LeftAxis.Maximum = 200.000000000000000000
73
      LeftAxis.MinorTickCount = 4
74
      LeftAxis.Title.Caption = 'Protein deposition (g/d)'
75
      LeftAxis.Title.Font.Color = clRed
76
      LeftAxis.Title.Font.Style = [fsBold]
77
      RightAxis.Automatic = False
78
      RightAxis.AutomaticMaximum = False
79
      RightAxis.AutomaticMinimum = False
80
      RightAxis.ExactDateTime = False
81
      RightAxis.Grid.Visible = False
82
      RightAxis.Increment = 100.000000000000000000
83
      RightAxis.Maximum = 600.000000000000000000
84
      RightAxis.Title.Angle = 90
85
      RightAxis.Title.Caption = 'Lipid deposition (g/d)'
86
      RightAxis.Title.Font.Color = clBlue
87
      RightAxis.Title.Font.Style = [fsBold]
88
      TopAxis.Automatic = False
89
      TopAxis.AutomaticMaximum = False
90
      TopAxis.AutomaticMinimum = False
91
      TopAxis.ExactDateTime = False
92
      TopAxis.Grid.Visible = False
93
      TopAxis.Increment = 0.500000000000000000
94
      TopAxis.MinorTickCount = 4
95
      TopAxis.Title.Caption = 'Feed intake (kg/d)'
96
      TopAxis.Title.Font.Style = [fsBold]
97
      View3D = False
98
      Align = alClient
99
      BevelOuter = bvNone
100
      TabOrder = 1
101
      PrintMargins = (
102
        15
103
        6
104
        15
105
        6)
106
      object LabelLimitPD2D: TLabel
107
        Left = 0
108
        Top = 515
109
        Width = 592
110
        Height = 13
111
        Align = alBottom
112
        Alignment = taCenter
113
        AutoSize = False
114
        Caption = 'An amino acid limits protein deposition'
115
        Font.Charset = DEFAULT_CHARSET
116
        Font.Color = clRed
117
        Font.Height = -11
118
        Font.Name = 'MS Sans Serif'
119
        Font.Style = []
120
        ParentFont = False
121
        Visible = False
122
        ExplicitLeft = 64
123
        ExplicitTop = 64
124
        ExplicitWidth = 178
125
      end
126
      object SeriesCourbePD: TLineSeries
127
        HorizAxis = aBothHorizAxis
128
        Marks.Arrow.Visible = True
129
        Marks.Callout.Brush.Color = clBlack
130
        Marks.Callout.Arrow.Visible = True
131
        Marks.Visible = False
132
        LinePen.Color = clRed
133
        LinePen.Width = 2
134
        Pointer.InflateMargins = True
135
        Pointer.Style = psRectangle
136
        Pointer.Visible = False
137
        XValues.Name = 'X'
138
        XValues.Order = loAscending
139
        YValues.Name = 'Y'
140
        YValues.Order = loNone
141
      end
142
      object SeriesLimitePD: TLineSeries
143
        HorizAxis = aBothHorizAxis
144
        Marks.Arrow.Visible = True
145
        Marks.Callout.Brush.Color = clBlack
146
        Marks.Callout.Arrow.Visible = True
147
        Marks.Visible = False
148
        SeriesColor = clRed
149
        LinePen.Color = clRed
150
        LinePen.Visible = False
151
        Pointer.HorizSize = 3
152
        Pointer.InflateMargins = True
153
        Pointer.Pen.Visible = False
154
        Pointer.Style = psRectangle
155
        Pointer.VertSize = 1
156
        Pointer.Visible = True
157
        XValues.Name = 'X'
158
        XValues.Order = loAscending
159
        YValues.Name = 'Y'
160
        YValues.Order = loNone
161
      end
162
      object SeriesPointPD: TLineSeries
163
        HorizAxis = aBothHorizAxis
164
        Marks.Arrow.Visible = True
165
        Marks.Callout.Brush.Color = clBlack
166
        Marks.Callout.Arrow.Visible = True
167
        Marks.Visible = False
168
        SeriesColor = clRed
169
        LinePen.Color = clRed
170
        LinePen.Visible = False
171
        Pointer.HorizSize = 5
172
        Pointer.InflateMargins = True
173
        Pointer.Style = psCircle
174
        Pointer.VertSize = 5
175
        Pointer.Visible = True
176
        XValues.Name = 'X'
177
        XValues.Order = loAscending
178
        YValues.Name = 'Y'
179
        YValues.Order = loNone
180
      end
181
      object SeriesDroitePD: TLineSeries
182
        HorizAxis = aBothHorizAxis
183
        Marks.Arrow.Visible = True
184
        Marks.Callout.Brush.Color = clBlack
185
        Marks.Callout.Arrow.Visible = True
186
        Marks.Visible = False
187
        SeriesColor = clBlack
188
        Pointer.HorizSize = 3
189
        Pointer.InflateMargins = True
190
        Pointer.Style = psCircle
191
        Pointer.VertSize = 3
192
        Pointer.Visible = False
193
        XValues.Name = 'X'
194
        XValues.Order = loAscending
195
        YValues.Name = 'Y'
196
        YValues.Order = loNone
197
      end
198
      object SeriesPointPDAdLib: TLineSeries
199
        HorizAxis = aBothHorizAxis
200
        Marks.Arrow.Visible = True
201
        Marks.Callout.Brush.Color = clBlack
202
        Marks.Callout.Arrow.Visible = True
203
        Marks.Style = smsSeriesTitle
204
        Marks.Visible = True
205
        SeriesColor = clBlack
206
        Title = 'Ad libitum'
207
        LinePen.Color = clRed
208
        LinePen.Visible = False
209
        Pointer.HorizSize = 5
210
        Pointer.InflateMargins = True
211
        Pointer.Style = psCircle
212
        Pointer.VertSize = 5
213
        Pointer.Visible = True
214
        XValues.Name = 'X'
215
        XValues.Order = loAscending
216
        YValues.Name = 'Y'
217
        YValues.Order = loNone
218
      end
219
      object SeriesPointLD: TLineSeries
220
        HorizAxis = aBothHorizAxis
221
        Marks.Arrow.Visible = True
222
        Marks.Callout.Brush.Color = clBlack
223
        Marks.Callout.Arrow.Visible = True
224
        Marks.Visible = False
225
        SeriesColor = clBlue
226
        VertAxis = aRightAxis
227
        LinePen.Color = clBlue
228
        LinePen.Visible = False
229
        Pointer.HorizSize = 5
230
        Pointer.InflateMargins = True
231
        Pointer.Style = psCircle
232
        Pointer.VertSize = 5
233
        Pointer.Visible = True
234
        XValues.Name = 'X'
235
        XValues.Order = loAscending
236
        YValues.Name = 'Y'
237
        YValues.Order = loNone
238
      end
239
      object SeriesDroiteLD: TLineSeries
240
        HorizAxis = aBothHorizAxis
241
        Marks.Arrow.Visible = True
242
        Marks.Callout.Brush.Color = clBlack
243
        Marks.Callout.Arrow.Visible = True
244
        Marks.Visible = False
245
        SeriesColor = clBlack
246
        VertAxis = aRightAxis
247
        Pointer.HorizSize = 3
248
        Pointer.InflateMargins = True
249
        Pointer.Style = psCircle
250
        Pointer.VertSize = 3
251
        Pointer.Visible = False
252
        XValues.Name = 'X'
253
        XValues.Order = loAscending
254
        YValues.Name = 'Y'
255
        YValues.Order = loNone
256
      end
257
      object SeriesCourbeLD: TLineSeries
258
        HorizAxis = aBothHorizAxis
259
        Marks.Arrow.Visible = True
260
        Marks.Callout.Brush.Color = clBlack
261
        Marks.Callout.Arrow.Visible = True
262
        Marks.Visible = False
263
        SeriesColor = clBlue
264
        VertAxis = aRightAxis
265
        LinePen.Color = clBlue
266
        LinePen.Width = 2
267
        Pointer.InflateMargins = True
268
        Pointer.Style = psRectangle
269
        Pointer.Visible = False
270
        XValues.Name = 'X'
271
        XValues.Order = loAscending
272
        YValues.Name = 'Y'
273
        YValues.Order = loNone
274
      end
275
      object SeriesPointLDAdLib: TLineSeries
276
        HorizAxis = aBothHorizAxis
277
        Marks.Arrow.Visible = True
278
        Marks.Callout.Brush.Color = clBlack
279
        Marks.Callout.Arrow.Visible = True
280
        Marks.Style = smsSeriesTitle
281
        Marks.Visible = True
282
        SeriesColor = clBlack
283
        Title = 'Ad libitum'
284
        VertAxis = aRightAxis
285
        LinePen.Color = clBlue
286
        LinePen.Visible = False
287
        Pointer.HorizSize = 5
288
        Pointer.InflateMargins = True
289
        Pointer.Style = psCircle
290
        Pointer.VertSize = 5
291
        Pointer.Visible = True
292
        XValues.Name = 'X'
293
        XValues.Order = loAscending
294
        YValues.Name = 'Y'
295
        YValues.Order = loNone
296
      end
297
    end
298
  end
299
  object PanelData: TPanel
300
    Left = 0
301
    Top = 0
302
    Width = 200
303
    Height = 560
304
    Align = alLeft
305
    BevelOuter = bvNone
306
    TabOrder = 0
307
    object GroupBoxResult: TGroupBox
308
      Left = 0
309
      Top = 288
310
      Width = 192
311
      Height = 224
312
      Caption = 'Results'
313
      TabOrder = 6
314
      Visible = False
315
      object StringGridResult: TStringGrid
316
        Left = 8
317
        Top = 16
318
        Width = 176
319
        Height = 199
320
        TabStop = False
321
        ColCount = 2
322
        Ctl3D = False
323
        DefaultRowHeight = 17
324
        FixedCols = 0
325
        RowCount = 11
326
        FixedRows = 0
327
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine]
328
        ParentCtl3D = False
329
        ParentShowHint = False
330
        ScrollBars = ssNone
331
        ShowHint = True
332
        TabOrder = 0
333
        OnDrawCell = StringGridResultDrawCell
334
        OnMouseMove = StringGridResultMouseMove
335
        ColWidths = (
336
          109
337
          64)
338
      end
339
    end
340
    object GroupBoxAdLib: TGroupBox
341
      Left = 0
342
      Top = 0
343
      Width = 192
344
      Height = 120
345
      Caption = 'Ad libitum intake'
346
      TabOrder = 0
347
      object LabelA: TLabel
348
        Left = 64
349
        Top = 68
350
        Width = 8
351
        Height = 13
352
        Hint = 'Parameter a of the equation'
353
        Alignment = taRightJustify
354
        AutoSize = False
355
        Caption = 'a'
356
        ParentShowHint = False
357
        ShowHint = True
358
      end
359
      object LabelUnite: TLabel
360
        Left = 8
361
        Top = 20
362
        Width = 19
363
        Height = 13
364
        Caption = 'Unit'
365
      end
366
      object LabelEquation: TLabel
367
        Left = 8
368
        Top = 44
369
        Width = 42
370
        Height = 13
371
        Caption = 'Equation'
372
      end
373
      object LabelB: TLabel
374
        Left = 64
375
        Top = 92
376
        Width = 8
377
        Height = 13
378
        Hint = 'Parameter b of the equation'
379
        Alignment = taRightJustify
380
        AutoSize = False
381
        Caption = 'b'
382
        ParentShowHint = False
383
        ShowHint = True
384
      end
385
      object SuperSpinA: TPBSuperSpin
386
        Left = 120
387
        Top = 64
388
        Width = 64
389
        Height = 22
390
        Cursor = crDefault
391
        Alignment = taRightJustify
392
        Decimals = 0
393
        NumberFormat = Standard
394
        OnChange = SuperSpinAChange
395
        TabOrder = 2
396
        Increment = 1.000000000000000000
397
        RoundValues = False
398
        Wrap = False
399
      end
400
      object SuperSpinB: TPBSuperSpin
401
        Left = 120
402
        Top = 88
403
        Width = 64
404
        Height = 22
405
        Cursor = crDefault
406
        Alignment = taRightJustify
407
        Decimals = 0
408
        NumberFormat = Standard
409
        OnChange = SuperSpinBChange
410
        TabOrder = 3
411
        Increment = 1.000000000000000000
412
        RoundValues = False
413
        Wrap = False
414
      end
415
      object EditUnit: TEdit
416
        Left = 64
417
        Top = 16
418
        Width = 120
419
        Height = 21
420
        Enabled = False
421
        TabOrder = 0
422
      end
423
      object EditEquation: TEdit
424
        Left = 64
425
        Top = 40
426
        Width = 120
427
        Height = 21
428
        Enabled = False
429
        TabOrder = 1
430
      end
431
    end
432
    object GroupBoxPotential: TGroupBox
433
      Left = 0
434
      Top = 120
435
      Width = 192
436
      Height = 120
437
      Caption = 'Growth potential'
438
      TabOrder = 1
439
      object LabelEntretien: TLabel
440
        Left = 8
441
        Top = 68
442
        Width = 62
443
        Height = 13
444
        Hint = 'Maintenance correction factor'
445
        Caption = 'Maintenance'
446
        ParentShowHint = False
447
        ShowHint = True
448
      end
449
      object LabelPrecocite: TLabel
450
        Left = 8
451
        Top = 44
452
        Width = 64
453
        Height = 13
454
        Hint =
455
          'Maturation coefficient (shape parameter of the Gompertz function' +
456
          ')'
457
        Caption = 'Precocity (/d)'
458
        ParentShowHint = False
459
        ShowHint = True
460
      end
461
      object LabelPDMoy: TLabel
462
        Left = 8
463
        Top = 20
464
        Width = 71
465
        Height = 13
466
        Hint = 'Average protein deposition (g/d)'
467
        Caption = 'Mean PD (g/d)'
468
        ParentShowHint = False
469
        ShowHint = True
470
      end
471
      object LabelPVPDmax: TLabel
472
        Left = 8
473
        Top = 92
474
        Width = 76
475
        Height = 13
476
        Hint = 'Body weight (kg) to reach PDmax'
477
        Caption = 'BW PDmax (kg)'
478
        ParentShowHint = False
479
        ShowHint = True
480
      end
481
      object SuperSpinPDMoy: TPBSuperSpin
482
        Left = 120
483
        Top = 16
484
        Width = 64
485
        Height = 22
486
        Cursor = crDefault
487
        Hint = 'Average protein deposition (g/d)'
488
        Alignment = taRightJustify
489
        Decimals = 2
490
        MaxValue = 260.000000000000000000
491
        MinValue = 50.000000000000000000
492
        NumberFormat = Standard
493
        OnChange = SuperSpinPDMoyChange
494
        ParentShowHint = False
495
        ShowHint = True
496
        TabOrder = 0
497
        Increment = 0.100000000000000000
498
        RoundValues = False
499
        Wrap = False
500
      end
501
      object SuperSpinPrecocite: TPBSuperSpin
502
        Left = 120
503
        Top = 40
504
        Width = 64
505
        Height = 22
506
        Cursor = crDefault
507
        Hint =
508
          'Maturation coefficient (shape parameter of the Gompertz function' +
509
          ')'
510
        Alignment = taRightJustify
511
        Decimals = 5
512
        MaxValue = 0.040000000000000000
513
        MinValue = 0.001000000000000000
514
        NumberFormat = Standard
515
        OnChange = SuperSpinPrecociteChange
516
        ParentShowHint = False
517
        ShowHint = True
518
        TabOrder = 1
519
        Increment = 0.000100000000000000
520
        RoundValues = False
521
        Wrap = False
522
      end
523
      object SuperSpinEntretien: TPBSuperSpin
524
        Left = 120
525
        Top = 64
526
        Width = 64
527
        Height = 22
528
        Cursor = crDefault
529
        Hint = 'Maintenance correction factor'
530
        Alignment = taRightJustify
531
        Decimals = 3
532
        MaxValue = 1.300000000000000000
533
        MinValue = 0.700000000000000000
534
        NumberFormat = Standard
535
        OnChange = SuperSpinEntretienChange
536
        ParentShowHint = False
537
        ShowHint = True
538
        TabOrder = 2
539
        Increment = 0.010000000000000000
540
        RoundValues = False
541
        Wrap = False
542
      end
543
      object SuperSpinPVPDmax: TPBSuperSpin
544
        Left = 120
545
        Top = 88
546
        Width = 64
547
        Height = 22
548
        Cursor = crDefault
549
        Hint = 'Body weight (kg) to reach PDmax'
550
        Alignment = taRightJustify
551
        Decimals = 0
552
        MaxValue = 5000.000000000000000000
553
        MinValue = 20.000000000000000000
554
        NumberFormat = Standard
555
        OnChange = SuperSpinPVPDmaxChange
556
        ParentShowHint = False
557
        ShowHint = True
558
        TabOrder = 3
559
        Increment = 1.000000000000000000
560
        RoundValues = False
561
        Wrap = False
562
      end
563
    end
564
    object GroupBoxType: TGroupBox
565
      Left = 0
566
      Top = 240
567
      Width = 192
568
      Height = 48
569
      Caption = 'Graph type'
570
      TabOrder = 2
571
      object RadioButton2D: TRadioButton
572
        Left = 48
573
        Top = 18
574
        Width = 32
575
        Height = 17
576
        Alignment = taLeftJustify
577
        Caption = '2D'
578
        TabOrder = 0
579
        OnClick = RadioButton2DClick
580
      end
581
      object RadioButton3D: TRadioButton
582
        Left = 96
583
        Top = 18
584
        Width = 32
585
        Height = 17
586
        Caption = '3D'
587
        Checked = True
588
        TabOrder = 1
589
        TabStop = True
590
        OnClick = RadioButton3DClick
591
      end
592
    end
593
    object GroupBoxX: TGroupBox
594
      Left = 0
595
      Top = 288
596
      Width = 192
597
      Height = 48
598
      Caption = 'X-axis'
599
      TabOrder = 3
600
      object ComboBoxX: TComboBox
601
        Left = 16
602
        Top = 16
603
        Width = 160
604
        Height = 21
605
        Style = csDropDownList
606
        ItemHeight = 13
607
        ItemIndex = 0
608
        TabOrder = 0
609
        Text = 'Duration (d)'
610
        OnChange = ComboBoxXChange
611
        Items.Strings = (
612
          'Duration (d)'
613
          'Age (d)'
614
          'Body weight (kg)')
615
      end
616
    end
617
    object GroupBoxY: TGroupBox
618
      Left = 0
619
      Top = 336
620
      Width = 192
621
      Height = 48
622
      Caption = 'Y-axis'
623
      TabOrder = 4
624
      object ComboBoxY: TComboBox
625
        Left = 16
626
        Top = 16
627
        Width = 160
628
        Height = 21
629
        Style = csDropDownList
630
        ItemHeight = 13
631
        ItemIndex = 0
632
        TabOrder = 0
633
        Text = 'Protein deposition (g/d)'
634
        OnChange = ComboBoxYChange
635
        Items.Strings = (
636
          'Protein deposition (g/d)'
637
          'Lipid deposition (g/d)')
638
      end
639
    end
640
    object GroupBoxZ: TGroupBox
641
      Left = 0
642
      Top = 384
643
      Width = 192
644
      Height = 48
645
      Caption = 'Feed intake'
646
      TabOrder = 5
647
      object ComboBoxZ: TComboBox
648
        Left = 16
649
        Top = 16
650
        Width = 160
651
        Height = 21
652
        Style = csDropDownList
653
        ItemHeight = 13
654
        ItemIndex = 0
655
        TabOrder = 0
656
        Text = 'Feed intake (kg/d)'
657
        OnChange = ComboBoxZChange
658
        Items.Strings = (
659
          'Feed intake (kg/d)'
660
          'NE intake (x maintenance)')
661
      end
662
    end
663
  end
664
  object Panel3D: TPanel
665
    Left = 200
666
    Top = 0
667
    Width = 592
668
    Height = 560
669
    Align = alClient
670
    BevelOuter = bvNone
671
    TabOrder = 2
672
    DesignSize = (
673
      592
674
      560)
675
    object Chart3D: TChart
676
      Left = -2
677
      Top = 18
678
      Width = 568
679
      Height = 512
680
      BottomWall.Transparent = True
681
      LeftWall.Transparent = True
682
      Legend.Alignment = laBottom
683
      MarginBottom = 5
684
      MarginLeft = 5
685
      MarginRight = 5
686
      MarginTop = 5
687
      Title.Text.Strings = (
688
        'TChart')
689
      Title.Visible = False
690
      BottomAxis.ExactDateTime = False
691
      BottomAxis.Increment = 10.000000000000000000
692
      BottomAxis.Title.Font.Style = [fsBold]
693
      Chart3DPercent = 100
694
      DepthAxis.Automatic = False
695
      DepthAxis.AutomaticMaximum = False
696
      DepthAxis.AutomaticMinimum = False
697
      DepthAxis.ExactDateTime = False
698
      DepthAxis.Increment = 1.000000000000000000
699
      DepthAxis.Maximum = 99.000000000000000000
700
      DepthAxis.Minimum = 1.000000000000000000
701
      DepthAxis.Title.Font.Style = [fsBold]
702
      DepthAxis.Visible = True
703
      LeftAxis.Automatic = False
704
      LeftAxis.AutomaticMinimum = False
705
      LeftAxis.ExactDateTime = False
706
      LeftAxis.Increment = 50.000000000000000000
707
      LeftAxis.Title.Font.Style = [fsBold]
708
      RightAxis.Title.Font.Style = [fsBold]
709
      TopAxis.Title.Font.Style = [fsBold]
710
      View3DOptions.OrthoAngle = 30
711
      View3DOptions.Orthogonal = False
712
      View3DOptions.Perspective = 0
713
      View3DOptions.Rotation = 320
714
      View3DOptions.Zoom = 70
715
      View3DOptions.ZoomText = False
716
      BevelOuter = bvNone
717
      TabOrder = 0
718
      Anchors = [akLeft, akTop, akRight, akBottom]
719
      PrintMargins = (
720
        10
721
        10
722
        10
723
        10)
724
      object LabelLimitPD3D: TLabel
725
        Left = 0
726
        Top = 499
727
        Width = 568
728
        Height = 13
729
        Align = alBottom
730
        Alignment = taCenter
731
        AutoSize = False
732
        Caption = 'An amino acid limits protein deposition'
733
        Font.Charset = DEFAULT_CHARSET
734
        Font.Color = clRed
735
        Font.Height = -11
736
        Font.Name = 'MS Sans Serif'
737
        Font.Style = []
738
        ParentFont = False
739
        Visible = False
740
        ExplicitLeft = 64
741
        ExplicitTop = 64
742
        ExplicitWidth = 178
743
      end
744
      object SeriesSurface: TSurfaceSeries
745
        FastBrush = True
746
        Marks.Arrow.Visible = True
747
        Marks.Callout.Brush.Color = clBlack
748
        Marks.Callout.Arrow.Visible = True
749
        Marks.Visible = False
750
        SeriesColor = 12615680
751
        ShowInLegend = False
752
        Title = 'Surface'
753
        Brush.Color = 12615680
754
        EndColor = 10109259
755
        IrregularGrid = True
756
        MidColor = 7548915
757
        SideBrush.Color = clWhite
758
        SideBrush.Style = bsClear
759
        SmoothPalette = True
760
        StartColor = 2152289
761
        XValues.Name = 'X'
762
        XValues.Order = loNone
763
        YValues.Name = 'Y'
764
        YValues.Order = loNone
765
        ZValues.Name = 'Z'
766
        ZValues.Order = loNone
767
      end
768
      object SeriesAdLib: TPoint3DSeries
769
        Marks.Arrow.Visible = True
770
        Marks.Callout.Brush.Color = clBlack
771
        Marks.Callout.Arrow.Visible = True
772
        Marks.Visible = False
773
        SeriesColor = clBlack
774
        Title = 'Ad libitum'
775
        LinePen.Width = 3
776
        Pointer.HorizSize = 5
777
        Pointer.InflateMargins = True
778
        Pointer.Pen.Visible = False
779
        Pointer.Style = psCircle
780
        Pointer.VertSize = 5
781
        Pointer.Visible = False
782
        XValues.Name = 'X'
783
        XValues.Order = loNone
784
        YValues.Name = 'Y'
785
        YValues.Order = loNone
786
        ZValues.Name = 'Z'
787
        ZValues.Order = loNone
788
      end
789
      object SeriesRation: TPoint3DSeries
790
        Marks.Arrow.Visible = True
791
        Marks.Callout.Brush.Color = clBlack
792
        Marks.Callout.Arrow.Visible = True
793
        Marks.Visible = False
794
        Title = 'Feed rationing plan'
795
        LinePen.Color = clRed
796
        LinePen.Width = 3
797
        Pointer.HorizSize = 5
798
        Pointer.InflateMargins = True
799
        Pointer.Pen.Visible = False
800
        Pointer.Style = psCircle
801
        Pointer.VertSize = 5
802
        Pointer.Visible = False
803
        XValues.Name = 'X'
804
        XValues.Order = loNone
805
        YValues.Name = 'Y'
806
        YValues.Order = loNone
807
        ZValues.Name = 'Z'
808
        ZValues.Order = loNone
809
      end
810
    end
811
    object SliderRotation: TJvxSlider
812
      Left = 24
813
      Top = 536
814
      Width = 544
815
      Height = 24
816
      Hint = 'Rotation'
817
      MinValue = 270
818
      MaxValue = 360
819
      ParentShowHint = False
820
      ShowHint = True
821
      TabOrder = 1
822
      TabStop = False
823
      Value = 270
824
      Anchors = [akLeft, akRight, akBottom]
825
      OnChange = SliderRotationChange
826
    end
827
    object SliderElevation: TJvxSlider
828
      Left = 568
829
      Top = 24
830
      Width = 24
831
      Height = 512
832
      Hint = 'Elevation'
833
      MinValue = 270
834
      MaxValue = 360
835
      Orientation = soVertical
836
      ParentShowHint = False
837
      ShowHint = True
838
      TabOrder = 2
839
      TabStop = False
840
      Value = 270
841
      Anchors = [akTop, akRight, akBottom]
842
      OnChange = SliderElevationChange
843
    end
844
    object SliderPerspective: TJvxSlider
845
      Left = 32
846
      Top = 0
847
      Width = 200
848
      Height = 24
849
      Hint = 'Perspective'
850
      ParentShowHint = False
851
      ShowHint = True
852
      TabOrder = 3
853
      TabStop = False
854
      OnChange = SliderPerspectiveChange
855
    end
856
    object SliderZoom: TJvxSlider
857
      Left = 240
858
      Top = 0
859
      Width = 200
860
      Height = 24
861
      Hint = 'Zoom'
862
      ParentShowHint = False
863
      ShowHint = True
864
      TabOrder = 4
865
      TabStop = False
866
      OnChange = SliderZoomChange
867
    end
868
  end
869
end