Statistiques
| Révision:

root / UFBesGestT.dfm @ 3

Historique | Voir | Annoter | Télécharger (22,089 ko)

1 3 avalancogn 
object FBesGestT: TFBesGestT
2 
  Left = 28
3 
  Top = 168
4 
  HelpContext = 4800
5 
  ActiveControl = CBProfil
6 
  BorderIcons = [biSystemMenu, biMaximize]
7 
  Caption = 'Requirements during gestation (sow)'
8 
  ClientHeight = 464
9 
  ClientWidth = 624
10 
  Color = clBtnFace
11 
  Font.Charset = DEFAULT_CHARSET
12 
  Font.Color = clWindowText
13 
  Font.Height = -11
14 
  Font.Name = 'MS Sans Serif'
15 
  Font.Style = []
16 
  FormStyle = fsMDIChild
17 
  OldCreateOrder = False
18 
  Scaled = False
19 
  Visible = True
20 
  OnActivate = FormActivate
21 
  OnClose = FormClose
22 
  OnCreate = FormCreate
23 
  OnShow = FormShow
24 
  PixelsPerInch = 96
25 
  TextHeight = 13
26 
  object GBProfil: TGroupBox
27 
    Left = 0
28 
    Top = 0
29 
    Width = 296
30 
    Height = 288
31 
    Caption = 'Animal profile'
32 
    TabOrder = 0
33 
    object LPortee: TLabel
34 
      Left = 16
35 
      Top = 44
36 
      Width = 23
37 
      Height = 13
38 
      Caption = 'Litter'
39 
    end
40 
    object CBProfil: TComboBox
41 
      Left = 16
42 
      Top = 16
43 
      Width = 240
44 
      Height = 21
45 
      AutoCompleteDelay = 1500
46 
      Style = csDropDownList
47 
      ItemHeight = 13
48 
      ParentShowHint = False
49 
      ShowHint = True
50 
      Sorted = True
51 
      TabOrder = 0
52 
      OnChange = CBProfilChange
53 
    end
54 
    object PBPortee: TPBSuperSpin
55 
      Left = 80
56 
      Top = 40
57 
      Width = 48
58 
      Height = 22
59 
      Cursor = crDefault
60 
      Alignment = taRightJustify
61 
      Decimals = 0
62 
      MaxValue = 8.000000000000000000
63 
      MinValue = 1.000000000000000000
64 
      NumberFormat = Standard
65 
      OnChange = PBPorteeChange
66 
      ParentShowHint = False
67 
      ShowHint = False
68 
      TabOrder = 1
69 
      Value = 1.000000000000000000
70 
      EditorEnabled = False
71 
      Increment = 1.000000000000000000
72 
      RoundValues = False
73 
      Wrap = False
74 
    end
75 
    object GBMiseBas: TGroupBox
76 
      Left = 8
77 
      Top = 160
78 
      Width = 280
79 
      Height = 120
80 
      Caption = 'Farrowing'
81 
      TabOrder = 3
82 
      object LP2MB: TLabel
83 
        Left = 8
84 
        Top = 44
85 
        Width = 110
86 
        Height = 13
87 
        Caption = 'Backfat thickness (mm)'
88 
      end
89 
      object LPdsApMB: TLabel
90 
        Left = 8
91 
        Top = 20
92 
        Width = 79
93 
        Height = 13
94 
        Caption = 'Weight after (kg)'
95 
      end
96 
      object LNesTotaux: TLabel
97 
        Left = 8
98 
        Top = 68
99 
        Width = 86
100 
        Height = 13
101 
        Caption = 'Total number born'
102 
      end
103 
      object LPdsNais: TLabel
104 
        Left = 8
105 
        Top = 92
106 
        Width = 76
107 
        Height = 13
108 
        Caption = 'Birth weight (kg)'
109 
      end
110 
      object PBPdsApMB: TPBNumEdit
111 
        Left = 200
112 
        Top = 16
113 
        Width = 48
114 
        Height = 21
115 
        Alignment = taRightJustify
116 
        Decimals = 1
117 
        NumberFormat = Standard
118 
        OnChange = PBPdsApMBChange
119 
        TabOrder = 0
120 
      end
121 
      object PBP2MB: TPBNumEdit
122 
        Left = 200
123 
        Top = 40
124 
        Width = 48
125 
        Height = 21
126 
        Alignment = taRightJustify
127 
        Decimals = 1
128 
        NumberFormat = Standard
129 
        OnChange = PBP2MBChange
130 
        TabOrder = 2
131 
      end
132 
      object ChkPdsApMB: TCheckBox
133 
        Left = 256
134 
        Top = 18
135 
        Width = 17
136 
        Height = 17
137 
        Hint =
138 
          'Check the checkbox to calculate the information from the animal ' +
139 
          'profile and the age at service'
140 
        TabStop = False
141 
        ParentShowHint = False
142 
        ShowHint = True
143 
        TabOrder = 1
144 
        OnClick = ChkPdsApMBClick
145 
      end
146 
      object ChkP2MB: TCheckBox
147 
        Left = 256
148 
        Top = 42
149 
        Width = 17
150 
        Height = 17
151 
        Hint =
152 
          'Check the checkbox to use the information from the animal profil' +
153 
          'e'
154 
        TabStop = False
155 
        ParentShowHint = False
156 
        ShowHint = True
157 
        TabOrder = 3
158 
        OnClick = ChkP2MBClick
159 
      end
160 
      object PBNesTotaux: TPBNumEdit
161 
        Left = 200
162 
        Top = 64
163 
        Width = 48
164 
        Height = 21
165 
        Alignment = taRightJustify
166 
        Decimals = 1
167 
        NumberFormat = Standard
168 
        OnChange = PBNesTotauxChange
169 
        TabOrder = 4
170 
      end
171 
      object PBPdsNais: TPBNumEdit
172 
        Left = 200
173 
        Top = 88
174 
        Width = 48
175 
        Height = 21
176 
        Alignment = taRightJustify
177 
        Decimals = 3
178 
        NumberFormat = Standard
179 
        OnChange = PBPdsNaisChange
180 
        TabOrder = 6
181 
      end
182 
      object ChkNesTotaux: TCheckBox
183 
        Left = 256
184 
        Top = 66
185 
        Width = 17
186 
        Height = 17
187 
        Hint =
188 
          'Check the checkbox to use the information from the animal profil' +
189 
          'e'
190 
        TabStop = False
191 
        ParentShowHint = False
192 
        ShowHint = True
193 
        TabOrder = 5
194 
        OnClick = ChkNesTotauxClick
195 
      end
196 
      object ChkPdsNais: TCheckBox
197 
        Left = 256
198 
        Top = 90
199 
        Width = 17
200 
        Height = 17
201 
        Hint =
202 
          'Check the checkbox to use the information from the animal profil' +
203 
          'e'
204 
        TabStop = False
205 
        ParentShowHint = False
206 
        ShowHint = True
207 
        TabOrder = 7
208 
        OnClick = ChkPdsNaisClick
209 
      end
210 
    end
211 
    object GBSaillie: TGroupBox
212 
      Left = 8
213 
      Top = 64
214 
      Width = 280
215 
      Height = 96
216 
      Caption = 'Service'
217 
      TabOrder = 2
218 
      object LAgeSail: TLabel
219 
        Left = 8
220 
        Top = 20
221 
        Width = 34
222 
        Height = 13
223 
        Caption = 'Age (d)'
224 
      end
225 
      object LPdsSail: TLabel
226 
        Left = 8
227 
        Top = 44
228 
        Width = 79
229 
        Height = 13
230 
        Caption = 'Body weight (kg)'
231 
      end
232 
      object LP2Sail: TLabel
233 
        Left = 8
234 
        Top = 68
235 
        Width = 110
236 
        Height = 13
237 
        Caption = 'Backfat thickness (mm)'
238 
      end
239 
      object PBAgeSail: TPBNumEdit
240 
        Left = 200
241 
        Top = 16
242 
        Width = 48
243 
        Height = 21
244 
        Alignment = taRightJustify
245 
        Decimals = 0
246 
        NumberFormat = Standard
247 
        OnChange = PBAgeSailChange
248 
        TabOrder = 0
249 
      end
250 
      object PBPdsSail: TPBNumEdit
251 
        Left = 200
252 
        Top = 40
253 
        Width = 48
254 
        Height = 21
255 
        Alignment = taRightJustify
256 
        Decimals = 1
257 
        NumberFormat = Standard
258 
        OnChange = PBPdsSailChange
259 
        TabOrder = 2
260 
      end
261 
      object PBP2Sail: TPBNumEdit
262 
        Left = 200
263 
        Top = 64
264 
        Width = 48
265 
        Height = 21
266 
        Alignment = taRightJustify
267 
        Decimals = 1
268 
        NumberFormat = Standard
269 
        OnChange = PBP2SailChange
270 
        TabOrder = 4
271 
      end
272 
      object ChkAgeSail: TCheckBox
273 
        Left = 256
274 
        Top = 18
275 
        Width = 17
276 
        Height = 17
277 
        Hint =
278 
          'Check the checkbox to use the information from the animal profil' +
279 
          'e'
280 
        TabStop = False
281 
        ParentShowHint = False
282 
        ShowHint = True
283 
        TabOrder = 1
284 
        OnClick = ChkAgeSailClick
285 
      end
286 
      object ChkPdsSail: TCheckBox
287 
        Left = 256
288 
        Top = 42
289 
        Width = 17
290 
        Height = 17
291 
        Hint =
292 
          'Check the checkbox to use the information from the animal profil' +
293 
          'e'
294 
        TabStop = False
295 
        ParentShowHint = False
296 
        ShowHint = True
297 
        TabOrder = 3
298 
        OnClick = ChkPdsSailClick
299 
      end
300 
      object ChkP2Sail: TCheckBox
301 
        Left = 256
302 
        Top = 66
303 
        Width = 17
304 
        Height = 17
305 
        Hint =
306 
          'Check the checkbox to use the information from the animal profil' +
307 
          'e'
308 
        TabStop = False
309 
        ParentShowHint = False
310 
        ShowHint = True
311 
        TabOrder = 5
312 
        OnClick = ChkP2SailClick
313 
      end
314 
    end
315 
  end
316 
  object GBResult: TGroupBox
317 
    Left = 302
318 
    Top = 288
319 
    Width = 320
320 
    Height = 176
321 
    Caption = 'Results'
322 
    Color = clMoneyGreen
323 
    ParentBackground = False
324 
    ParentColor = False
325 
    TabOrder = 3
326 
    object LAliment: TLabel
327 
      Left = 16
328 
      Top = 36
329 
      Width = 107
330 
      Height = 13
331 
      Caption = 'Quantity of feed (kg/d)'
332 
    end
333 
    object LBesoins: TLabel
334 
      Left = 192
335 
      Top = 12
336 
      Width = 80
337 
      Height = 13
338 
      Alignment = taCenter
339 
      AutoSize = False
340 
      Caption = 'Requirements'
341 
    end
342 
    object LdLys: TLabel
343 
      Left = 16
344 
      Top = 108
345 
      Width = 145
346 
      Height = 13
347 
      Caption = 'Digestible lysine (g/d @ 105 d)'
348 
    end
349 
    object LEN: TLabel
350 
      Left = 16
351 
      Top = 84
352 
      Width = 86
353 
      Height = 13
354 
      Caption = 'Net energy (MJ/d)'
355 
    end
356 
    object LEM: TLabel
357 
      Left = 16
358 
      Top = 60
359 
      Width = 134
360 
      Height = 13
361 
      Caption = 'Metabolizable energy (MJ/d)'
362 
    end
363 
    object PBdLys: TPBNumEdit
364 
      Left = 208
365 
      Top = 104
366 
      Width = 48
367 
      Height = 21
368 
      Alignment = taRightJustify
369 
      Decimals = 2
370 
      NumberFormat = Standard
371 
      ReadOnly = True
372 
      TabOrder = 3
373 
    end
374 
    object PBEN: TPBNumEdit
375 
      Left = 208
376 
      Top = 80
377 
      Width = 48
378 
      Height = 21
379 
      Alignment = taRightJustify
380 
      Decimals = 2
381 
      NumberFormat = Standard
382 
      ReadOnly = True
383 
      TabOrder = 2
384 
    end
385 
    object PBEM: TPBNumEdit
386 
      Left = 208
387 
      Top = 56
388 
      Width = 48
389 
      Height = 21
390 
      Alignment = taRightJustify
391 
      Decimals = 2
392 
      NumberFormat = Standard
393 
      ReadOnly = True
394 
      TabOrder = 1
395 
    end
396 
    object PBAliment: TPBNumEdit
397 
      Left = 208
398 
      Top = 32
399 
      Width = 48
400 
      Height = 21
401 
      Alignment = taRightJustify
402 
      Decimals = 2
403 
      NumberFormat = Standard
404 
      ReadOnly = True
405 
      TabOrder = 0
406 
    end
407 
    object BBRapGest: TBitBtn
408 
      Left = 128
409 
      Top = 144
410 
      Width = 80
411 
      Height = 24
412 
      Hint = 'Show the simulation results as a report'
413 
      Caption = 'Report'
414 
      Enabled = False
415 
      Glyph.Data = {
416 
        76010000424D7601000000000000760000002800000020000000100000000100
417 
        04000000000000010000120B0000120B00001000000000000000000000000000
418 
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
419 
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
420 
        333333333333333333333333333333333333333333FFFFF3333333333CCCCC33
421 
        33333FFFF77777FFFFFFCCCCCC808CCCCCC377777737F777777F008888070888
422 
        8003773FFF7773FFF77F0F0770F7F0770F037F777737F777737F70FFFFF7FFFF
423 
        F07373F3FFF7F3FFF37F70F000F7F000F07337F77737F777373330FFFFF7FFFF
424 
        F03337FF3FF7F3FF37F3370F00F7F00F0733373F7737F77337F3370FFFF7FFFF
425 
        0733337F33373F337333330FFF030FFF03333373FF7373FF7333333000333000
426 
        3333333777333777333333333333333333333333333333333333333333333333
427 
        3333333333333333333333333333333333333333333333333333}
428 
      NumGlyphs = 2
429 
      ParentShowHint = False
430 
      ShowHint = True
431 
      TabOrder = 5
432 
      OnClick = BBRapGestClick
433 
    end
434 
    object BBResGest: TBitBtn
435 
      Left = 32
436 
      Top = 144
437 
      Width = 80
438 
      Height = 24
439 
      Hint = 'Show the simulation results as graphs'
440 
      Caption = 'Graphs'
441 
      Enabled = False
442 
      Glyph.Data = {
443 
        76010000424D7601000000000000760000002800000020000000100000000100
444 
        04000000000000010000120B0000120B00001000000000000000000000000000
445 
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
446 
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
447 
        3333333333FFFFF3333333333700073333333FFF3777773F3FFF00030990BB03
448 
        000077737337F373777733309990BBB0333333373337F3373F3333099990BBBB
449 
        033333733337F33373F337999990BBBBB73337F33337F33337F330999990BBBB
450 
        B03337F33337FFFFF7F3309999900000003337F33337777777F33099990A0CCC
451 
        C03337F3337373F337F3379990AAA0CCC733373F3733373F373333090AAAAA0C
452 
        033333737333337373333330AAAAAAA033333FF73F33333733FF00330AAAAA03
453 
        3000773373FFFF73377733333700073333333333377777333333333333333333
454 
        3333333333333333333333333333333333333333333333333333}
455 
      NumGlyphs = 2
456 
      ParentShowHint = False
457 
      ShowHint = True
458 
      TabOrder = 4
459 
      OnClick = BBResGestClick
460 
    end
461 
  end
462 
  object GBLoge: TGroupBox
463 
    Left = 304
464 
    Top = 0
465 
    Width = 320
466 
    Height = 288
467 
    Caption = 'Housing'
468 
    TabOrder = 1
469 
    object CBLoge: TComboBox
470 
      Left = 16
471 
      Top = 16
472 
      Width = 240
473 
      Height = 21
474 
      AutoCompleteDelay = 1500
475 
      Style = csDropDownList
476 
      ItemHeight = 13
477 
      ParentShowHint = False
478 
      ShowHint = True
479 
      Sorted = True
480 
      TabOrder = 0
481 
      OnChange = CBLogeChange
482 
    end
483 
    object GBComport: TGroupBox
484 
      Left = 8
485 
      Top = 168
486 
      Width = 304
487 
      Height = 96
488 
      Hint = 'To modify these values, select the housing "(Manual entry)"'
489 
      Caption = 'Behavior'
490 
      ParentShowHint = False
491 
      ShowHint = True
492 
      TabOrder = 4
493 
      object LDebout: TLabel
494 
        Left = 8
495 
        Top = 20
496 
        Width = 89
497 
        Height = 13
498 
        Caption = 'Standing time (min)'
499 
        ParentShowHint = False
500 
        ShowHint = False
501 
      end
502 
      object PAct: TPanel
503 
        Left = 8
504 
        Top = 48
505 
        Width = 240
506 
        Height = 40
507 
        BevelOuter = bvNone
508 
        TabOrder = 1
509 
        object LCalme: TLabel
510 
          Left = 8
511 
          Top = 24
512 
          Width = 23
513 
          Height = 13
514 
          Caption = 'Calm'
515 
        end
516 
        object LMoyenne: TLabel
517 
          Left = 96
518 
          Top = 24
519 
          Width = 27
520 
          Height = 13
521 
          Caption = 'Mean'
522 
        end
523 
        object LActive: TLabel
524 
          Left = 192
525 
          Top = 24
526 
          Width = 30
527 
          Height = 13
528 
          Caption = 'Active'
529 
        end
530 
        object TBAct: TTrackBar
531 
          Left = 16
532 
          Top = 0
533 
          Width = 200
534 
          Height = 22
535 
          BorderWidth = 1
536 
          LineSize = 15
537 
          Max = 360
538 
          Min = 120
539 
          ParentShowHint = False
540 
          PageSize = 60
541 
          Frequency = 60
542 
          Position = 240
543 
          SelEnd = 240
544 
          ShowHint = False
545 
          TabOrder = 0
546 
          TabStop = False
547 
          ThumbLength = 12
548 
          OnChange = TBActChange
549 
        end
550 
      end
551 
      object PBAct: TPBNumEdit
552 
        Left = 200
553 
        Top = 16
554 
        Width = 48
555 
        Height = 21
556 
        Alignment = taRightJustify
557 
        Enabled = False
558 
        Decimals = 0
559 
        NumberFormat = Standard
560 
        ParentShowHint = False
561 
        ShowHint = False
562 
        TabOrder = 0
563 
        Value = 240.000000000000000000
564 
      end
565 
    end
566 
    object GBParam: TGroupBox
567 
      Left = 8
568 
      Top = 64
569 
      Width = 304
570 
      Height = 104
571 
      Hint = 'To modify these values, select the housing "(Manual entry)"'
572 
      Caption = 'Housing parameters'
573 
      ParentShowHint = False
574 
      ShowHint = True
575 
      TabOrder = 3
576 
      object LTyp: TLabel
577 
        Left = 8
578 
        Top = 20
579 
        Width = 24
580 
        Height = 13
581 
        Caption = 'Type'
582 
        ParentShowHint = False
583 
        ShowHint = False
584 
      end
585 
      object LSol: TLabel
586 
        Left = 8
587 
        Top = 44
588 
        Width = 23
589 
        Height = 13
590 
        Caption = 'Floor'
591 
        ParentShowHint = False
592 
        ShowHint = False
593 
      end
594 
      object LTemp: TLabel
595 
        Left = 8
596 
        Top = 76
597 
        Width = 60
598 
        Height = 13
599 
        Caption = 'Temperature'
600 
        ParentShowHint = False
601 
        ShowHint = False
602 
      end
603 
      object CBTyp: TComboBox
604 
        Left = 128
605 
        Top = 16
606 
        Width = 120
607 
        Height = 21
608 
        Style = csDropDownList
609 
        ItemHeight = 13
610 
        ItemIndex = 0
611 
        ParentShowHint = False
612 
        ShowHint = False
613 
        TabOrder = 0
614 
        Text = 'Individual'
615 
        OnChange = CBTypChange
616 
        Items.Strings = (
617 
          'Individual'
618 
          'In groups'
619 
          'Out-doors')
620 
      end
621 
      object CBSol: TComboBox
622 
        Left = 128
623 
        Top = 40
624 
        Width = 120
625 
        Height = 21
626 
        Style = csDropDownList
627 
        ItemHeight = 13
628 
        ItemIndex = 0
629 
        ParentShowHint = False
630 
        ShowHint = False
631 
        TabOrder = 1
632 
        Text = 'Slatted floor'
633 
        OnChange = CBSolChange
634 
        Items.Strings = (
635 
          'Slatted floor'
636 
          'Straw-bedded')
637 
      end
638 
      object PBTemp: TPBSuperSpin
639 
        Left = 200
640 
        Top = 72
641 
        Width = 48
642 
        Height = 22
643 
        Cursor = crDefault
644 
        Alignment = taRightJustify
645 
        Decimals = 0
646 
        NumberFormat = Standard
647 
        OnChange = PBTempChange
648 
        ParentShowHint = False
649 
        ShowHint = False
650 
        TabOrder = 2
651 
        EditorEnabled = False
652 
        Increment = 1.000000000000000000
653 
        RoundValues = False
654 
        Wrap = False
655 
      end
656 
    end
657 
    object ChkLoge: TCheckBox
658 
      Left = 264
659 
      Top = 18
660 
      Width = 17
661 
      Height = 17
662 
      Hint =
663 
        'Check the checkbox to use the information from the animal profil' +
664 
        'e'
665 
      TabStop = False
666 
      ParentShowHint = False
667 
      ShowHint = True
668 
      TabOrder = 1
669 
      OnClick = ChkLogeClick
670 
    end
671 
    object PRegle: TPanel
672 
      Left = 8
673 
      Top = 40
674 
      Width = 280
675 
      Height = 24
676 
      BevelOuter = bvNone
677 
      TabOrder = 2
678 
      Visible = False
679 
      object LRegle: TLabel
680 
        Left = 8
681 
        Top = 4
682 
        Width = 33
683 
        Height = 13
684 
        Caption = 'Rule(s)'
685 
      end
686 
      object LNbRegles: TLabel
687 
        Left = 184
688 
        Top = 4
689 
        Width = 14
690 
        Height = 13
691 
        Caption = '/ 0'
692 
      end
693 
      object PBRegle: TPBSuperSpin
694 
        Left = 128
695 
        Top = 0
696 
        Width = 48
697 
        Height = 22
698 
        Cursor = crDefault
699 
        Hint = 'Show the information corresponding to a selected housing rule'
700 
        Alignment = taRightJustify
701 
        Decimals = 0
702 
        MaxValue = 10.000000000000000000
703 
        MinValue = 1.000000000000000000
704 
        NumberFormat = Standard
705 
        OnChange = PBRegleChange
706 
        ParentShowHint = False
707 
        ShowHint = True
708 
        TabOrder = 0
709 
        EditorEnabled = False
710 
        Increment = 1.000000000000000000
711 
        RoundValues = False
712 
        Wrap = False
713 
      end
714 
    end
715 
  end
716 
  object GBAliment: TGroupBox
717 
    Left = 0
718 
    Top = 288
719 
    Width = 296
720 
    Height = 176
721 
    Hint = 'Feed supply at which the calcuated requirements are compared'
722 
    Caption = 'Reference feed'
723 
    Color = clSilver
724 
    ParentBackground = False
725 
    ParentColor = False
726 
    ParentShowHint = False
727 
    ShowHint = True
728 
    TabOrder = 2
729 
    object LRation: TLabel
730 
      Left = 16
731 
      Top = 68
732 
      Width = 90
733 
      Height = 13
734 
      Caption = 'Feed rationing plan'
735 
      ParentShowHint = False
736 
      ShowHint = False
737 
    end
738 
    object LSeqAli: TLabel
739 
      Left = 16
740 
      Top = 20
741 
      Width = 97
742 
      Height = 13
743 
      Caption = 'Feed sequence plan'
744 
      ParentShowHint = False
745 
      ShowHint = False
746 
    end
747 
    object LAppAli: TLabel
748 
      Left = 16
749 
      Top = 124
750 
      Width = 104
751 
      Height = 13
752 
      Caption = 'Average intake (kg/d)'
753 
      ParentShowHint = False
754 
      ShowHint = False
755 
    end
756 
    object LEMAli: TLabel
757 
      Left = 16
758 
      Top = 148
759 
      Width = 125
760 
      Height = 13
761 
      Caption = 'ME content (MJ/(kg feed))'
762 
      ParentShowHint = False
763 
      ShowHint = False
764 
    end
765 
    object CBRation: TComboBox
766 
      Left = 16
767 
      Top = 88
768 
      Width = 240
769 
      Height = 21
770 
      AutoCompleteDelay = 1500
771 
      Style = csDropDownList
772 
      ItemHeight = 13
773 
      ParentShowHint = False
774 
      ShowHint = True
775 
      Sorted = True
776 
      TabOrder = 2
777 
      OnChange = CBRationChange
778 
    end
779 
    object CBSeqAli: TComboBox
780 
      Left = 16
781 
      Top = 40
782 
      Width = 240
783 
      Height = 21
784 
      AutoCompleteDelay = 1500
785 
      Style = csDropDownList
786 
      ItemHeight = 13
787 
      ParentShowHint = False
788 
      ShowHint = True
789 
      Sorted = True
790 
      TabOrder = 0
791 
      OnChange = CBSeqAliChange
792 
    end
793 
    object PBAppAli: TPBNumEdit
794 
      Left = 208
795 
      Top = 120
796 
      Width = 48
797 
      Height = 21
798 
      Alignment = taRightJustify
799 
      Decimals = 3
800 
      NumberFormat = Standard
801 
      OnChange = PBAppAliChange
802 
      ParentShowHint = False
803 
      ShowHint = False
804 
      TabOrder = 4
805 
    end
806 
    object PBEMAli: TPBNumEdit
807 
      Left = 208
808 
      Top = 144
809 
      Width = 48
810 
      Height = 21
811 
      Alignment = taRightJustify
812 
      Decimals = 2
813 
      NumberFormat = Standard
814 
      OnChange = PBEMAliChange
815 
      ParentShowHint = False
816 
      ShowHint = False
817 
      TabOrder = 6
818 
    end
819 
    object ChkSeqAli: TCheckBox
820 
      Left = 264
821 
      Top = 42
822 
      Width = 17
823 
      Height = 17
824 
      Hint =
825 
        'Check the checkbox to use the information from the animal profil' +
826 
        'e'
827 
      TabStop = False
828 
      TabOrder = 1
829 
      OnClick = ChkSeqAliClick
830 
    end
831 
    object ChkRation: TCheckBox
832 
      Left = 264
833 
      Top = 90
834 
      Width = 17
835 
      Height = 17
836 
      Hint =
837 
        'Check the checkbox to use the information from the animal profil' +
838 
        'e'
839 
      TabStop = False
840 
      TabOrder = 3
841 
      OnClick = ChkRationClick
842 
    end
843 
    object ChkAppAli: TCheckBox
844 
      Left = 264
845 
      Top = 122
846 
      Width = 17
847 
      Height = 17
848 
      Hint =
849 
        'Check the checkbox to use the information from the feed rationin' +
850 
        'g plan'
851 
      TabStop = False
852 
      TabOrder = 5
853 
      OnClick = ChkAppAliClick
854 
    end
855 
    object ChkEMAli: TCheckBox
856 
      Left = 264
857 
      Top = 146
858 
      Width = 17
859 
      Height = 17
860 
      Hint =
861 
        'Check the checkbox to calculate the information from the feed se' +
862 
        'quence plan and the feed rationing plan'
863 
      TabStop = False
864 
      TabOrder = 7
865 
      OnClick = ChkEMAliClick
866 
    end
867 
    object CBRationProfil: TComboBox
868 
      Left = 16
869 
      Top = 88
870 
      Width = 240
871 
      Height = 21
872 
      AutoCompleteDelay = 1500
873 
      Style = csDropDownList
874 
      Enabled = False
875 
      ItemHeight = 13
876 
      ItemIndex = 0
877 
      ParentShowHint = False
878 
      ShowHint = True
879 
      Sorted = True
880 
      TabOrder = 8
881 
      Text = '(Reference feed of the animal profile)'
882 
      Visible = False
883 
      OnChange = CBRationChange
884 
      Items.Strings = (
885 
        '(Reference feed of the animal profile)')
886 
    end
887 
  end
888 
end