Statistiques
| Révision:

root / UFBesLactT.dfm

Historique | Voir | Annoter | Télécharger (16,794 ko)

1 3 avalancogn 
object FBesLactT: TFBesLactT
2 
  Left = 25
3 
  Top = 167
4 
  HelpContext = 4900
5 
  BorderIcons = [biSystemMenu, biMaximize]
6 
  Caption = 'Requirements during lactation (sow)'
7 
  ClientHeight = 464
8 
  ClientWidth = 624
9 
  Color = clBtnFace
10 
  Font.Charset = DEFAULT_CHARSET
11 
  Font.Color = clWindowText
12 
  Font.Height = -11
13 
  Font.Name = 'MS Sans Serif'
14 
  Font.Style = []
15 
  FormStyle = fsMDIChild
16 
  OldCreateOrder = False
17 
  Scaled = False
18 
  Visible = True
19 
  OnActivate = FormActivate
20 
  OnClose = FormClose
21 
  OnCreate = FormCreate
22 
  OnShow = FormShow
23 
  PixelsPerInch = 96
24 
  TextHeight = 13
25 
  object GBProfil: TGroupBox
26 
    Left = 0
27 
    Top = 0
28 
    Width = 296
29 
    Height = 288
30 
    Caption = 'Animal profile'
31 
    TabOrder = 0
32 
    object LPortee: TLabel
33 
      Left = 16
34 
      Top = 44
35 
      Width = 23
36 
      Height = 13
37 
      Caption = 'Litter'
38 
    end
39 
    object CBProfil: TComboBox
40 
      Left = 16
41 
      Top = 16
42 
      Width = 240
43 
      Height = 21
44 
      AutoCompleteDelay = 1500
45 
      Style = csDropDownList
46 
      ItemHeight = 13
47 
      ParentShowHint = False
48 
      ShowHint = True
49 
      Sorted = True
50 
      TabOrder = 0
51 
      OnChange = CBProfilChange
52 
    end
53 
    object PBPortee: TPBSuperSpin
54 
      Left = 80
55 
      Top = 40
56 
      Width = 48
57 
      Height = 22
58 
      Cursor = crDefault
59 
      Alignment = taRightJustify
60 
      Decimals = 0
61 
      MaxValue = 8.000000000000000000
62 
      MinValue = 1.000000000000000000
63 
      NumberFormat = Standard
64 
      OnChange = PBPorteeChange
65 
      ParentShowHint = False
66 
      ShowHint = False
67 
      TabOrder = 1
68 
      EditorEnabled = False
69 
      Increment = 1.000000000000000000
70 
      RoundValues = False
71 
      Wrap = False
72 
    end
73 
    object GBSevrage: TGroupBox
74 
      Left = 8
75 
      Top = 136
76 
      Width = 280
77 
      Height = 144
78 
      Caption = 'Weaning'
79 
      TabOrder = 3
80 
      object LSevres: TLabel
81 
        Left = 8
82 
        Top = 44
83 
        Width = 78
84 
        Height = 13
85 
        Caption = 'Number weaned'
86 
      end
87 
      object LPdsNais: TLabel
88 
        Left = 8
89 
        Top = 68
90 
        Width = 76
91 
        Height = 13
92 
        Caption = 'Birth weight (kg)'
93 
      end
94 
      object LDureeLact: TLabel
95 
        Left = 8
96 
        Top = 20
97 
        Width = 110
98 
        Height = 13
99 
        Caption = 'Duration of lactation (d)'
100 
      end
101 
      object LPdsSev: TLabel
102 
        Left = 8
103 
        Top = 92
104 
        Width = 98
105 
        Height = 13
106 
        Caption = 'Weaning weight (kg)'
107 
      end
108 
      object LGMQ: TLabel
109 
        Left = 8
110 
        Top = 116
111 
        Width = 66
112 
        Height = 13
113 
        Caption = 'ADG litter (kg)'
114 
      end
115 
      object PBSevres: TPBNumEdit
116 
        Left = 200
117 
        Top = 40
118 
        Width = 48
119 
        Height = 21
120 
        Alignment = taRightJustify
121 
        Decimals = 1
122 
        NumberFormat = Standard
123 
        OnChange = PBSevresChange
124 
        TabOrder = 1
125 
      end
126 
      object PBPdsNais: TPBNumEdit
127 
        Left = 200
128 
        Top = 64
129 
        Width = 48
130 
        Height = 21
131 
        Alignment = taRightJustify
132 
        Decimals = 3
133 
        NumberFormat = Standard
134 
        OnChange = PBPdsNaisChange
135 
        TabOrder = 3
136 
      end
137 
      object ChkSevres: TCheckBox
138 
        Left = 256
139 
        Top = 42
140 
        Width = 17
141 
        Height = 17
142 
        Hint =
143 
          'Check the checkbox to use the information from the animal profil' +
144 
          'e'
145 
        TabStop = False
146 
        ParentShowHint = False
147 
        ShowHint = True
148 
        TabOrder = 2
149 
        OnClick = ChkSevresClick
150 
      end
151 
      object ChkPdsNais: TCheckBox
152 
        Left = 256
153 
        Top = 66
154 
        Width = 17
155 
        Height = 17
156 
        Hint =
157 
          'Check the checkbox to use the information from the animal profil' +
158 
          'e'
159 
        TabStop = False
160 
        ParentShowHint = False
161 
        ShowHint = True
162 
        TabOrder = 4
163 
        OnClick = ChkPdsNaisClick
164 
      end
165 
      object PBDureeLact: TPBSuperSpin
166 
        Left = 200
167 
        Top = 16
168 
        Width = 48
169 
        Height = 22
170 
        Cursor = crDefault
171 
        Alignment = taRightJustify
172 
        Decimals = 0
173 
        MaxValue = 28.000000000000000000
174 
        MinValue = 14.000000000000000000
175 
        NumberFormat = Standard
176 
        OnChange = PBDureeLactChange
177 
        ParentShowHint = False
178 
        ShowHint = False
179 
        TabOrder = 0
180 
        EditorEnabled = False
181 
        Increment = 1.000000000000000000
182 
        RoundValues = False
183 
        Wrap = False
184 
      end
185 
      object PBPdsSev: TPBNumEdit
186 
        Left = 200
187 
        Top = 88
188 
        Width = 48
189 
        Height = 21
190 
        Alignment = taRightJustify
191 
        Decimals = 3
192 
        NumberFormat = Standard
193 
        OnChange = PBPdsSevChange
194 
        TabOrder = 5
195 
      end
196 
      object ChkPdsSev: TCheckBox
197 
        Left = 256
198 
        Top = 90
199 
        Width = 17
200 
        Height = 17
201 
        Hint =
202 
          'Check the checkbox to calculate the information from the animal ' +
203 
          'profile and the duration of lactation'
204 
        TabStop = False
205 
        ParentShowHint = False
206 
        ShowHint = True
207 
        TabOrder = 6
208 
        OnClick = ChkPdsSevClick
209 
      end
210 
      object PBGMQ: TPBNumEdit
211 
        Left = 200
212 
        Top = 112
213 
        Width = 48
214 
        Height = 21
215 
        Alignment = taRightJustify
216 
        Enabled = False
217 
        Decimals = 3
218 
        NumberFormat = Standard
219 
        TabOrder = 7
220 
      end
221 
      object ChkDureeLact: TCheckBox
222 
        Left = 256
223 
        Top = 18
224 
        Width = 17
225 
        Height = 17
226 
        Hint =
227 
          'Check the checkbox to use the information from the animal profil' +
228 
          'e'
229 
        TabStop = False
230 
        ParentShowHint = False
231 
        ShowHint = True
232 
        TabOrder = 8
233 
        OnClick = ChkDureeLactClick
234 
      end
235 
    end
236 
    object GBMiseBas: TGroupBox
237 
      Left = 8
238 
      Top = 64
239 
      Width = 280
240 
      Height = 72
241 
      Caption = 'Farrowing'
242 
      TabOrder = 2
243 
      object LP2MB: TLabel
244 
        Left = 8
245 
        Top = 44
246 
        Width = 110
247 
        Height = 13
248 
        Caption = 'Backfat thickness (mm)'
249 
      end
250 
      object LPdsApMB: TLabel
251 
        Left = 8
252 
        Top = 20
253 
        Width = 79
254 
        Height = 13
255 
        Caption = 'Weight after (kg)'
256 
      end
257 
      object PBPdsApMB: TPBNumEdit
258 
        Left = 200
259 
        Top = 16
260 
        Width = 48
261 
        Height = 21
262 
        Alignment = taRightJustify
263 
        Decimals = 1
264 
        NumberFormat = Standard
265 
        OnChange = PBPdsApMBChange
266 
        TabOrder = 0
267 
      end
268 
      object PBP2MB: TPBNumEdit
269 
        Left = 200
270 
        Top = 40
271 
        Width = 48
272 
        Height = 21
273 
        Alignment = taRightJustify
274 
        Decimals = 1
275 
        NumberFormat = Standard
276 
        OnChange = PBP2MBChange
277 
        TabOrder = 2
278 
      end
279 
      object ChkPdsApMB: TCheckBox
280 
        Left = 256
281 
        Top = 18
282 
        Width = 17
283 
        Height = 17
284 
        Hint =
285 
          'Check the checkbox to use the information from the animal profil' +
286 
          'e'
287 
        TabStop = False
288 
        ParentShowHint = False
289 
        ShowHint = True
290 
        TabOrder = 1
291 
        OnClick = ChkPdsApMBClick
292 
      end
293 
      object ChkP2MB: TCheckBox
294 
        Left = 256
295 
        Top = 42
296 
        Width = 17
297 
        Height = 17
298 
        Hint =
299 
          'Check the checkbox to use the information from the animal profil' +
300 
          'e'
301 
        TabStop = False
302 
        ParentShowHint = False
303 
        ShowHint = True
304 
        TabOrder = 3
305 
        OnClick = ChkP2MBClick
306 
      end
307 
    end
308 
  end
309 
  object GBAliment: TGroupBox
310 
    Left = 0
311 
    Top = 288
312 
    Width = 296
313 
    Height = 176
314 
    Hint = 'Feed supply at which the calcuated requirements are compared'
315 
    Caption = 'Reference feed'
316 
    Color = clSilver
317 
    ParentBackground = False
318 
    ParentColor = False
319 
    ParentShowHint = False
320 
    ShowHint = True
321 
    TabOrder = 1
322 
    object LRation: TLabel
323 
      Left = 16
324 
      Top = 68
325 
      Width = 90
326 
      Height = 13
327 
      Caption = 'Feed rationing plan'
328 
      ParentShowHint = False
329 
      ShowHint = False
330 
    end
331 
    object LSeqAli: TLabel
332 
      Left = 16
333 
      Top = 20
334 
      Width = 97
335 
      Height = 13
336 
      Caption = 'Feed sequence plan'
337 
      ParentShowHint = False
338 
      ShowHint = False
339 
    end
340 
    object LAppAli: TLabel
341 
      Left = 16
342 
      Top = 124
343 
      Width = 104
344 
      Height = 13
345 
      Caption = 'Average intake (kg/d)'
346 
      ParentShowHint = False
347 
      ShowHint = False
348 
    end
349 
    object LEMAli: TLabel
350 
      Left = 16
351 
      Top = 148
352 
      Width = 125
353 
      Height = 13
354 
      Caption = 'ME content (MJ/(kg feed))'
355 
      ParentShowHint = False
356 
      ShowHint = False
357 
    end
358 
    object CBRation: TComboBox
359 
      Left = 16
360 
      Top = 88
361 
      Width = 240
362 
      Height = 21
363 
      AutoCompleteDelay = 1500
364 
      Style = csDropDownList
365 
      ItemHeight = 13
366 
      ParentShowHint = False
367 
      ShowHint = True
368 
      Sorted = True
369 
      TabOrder = 2
370 
      OnChange = CBRationChange
371 
    end
372 
    object CBSeqAli: TComboBox
373 
      Left = 16
374 
      Top = 40
375 
      Width = 240
376 
      Height = 21
377 
      AutoCompleteDelay = 1500
378 
      Style = csDropDownList
379 
      ItemHeight = 13
380 
      ParentShowHint = False
381 
      ShowHint = True
382 
      Sorted = True
383 
      TabOrder = 0
384 
      OnChange = CBSeqAliChange
385 
    end
386 
    object PBAppAli: TPBNumEdit
387 
      Left = 208
388 
      Top = 120
389 
      Width = 48
390 
      Height = 21
391 
      Alignment = taRightJustify
392 
      Decimals = 3
393 
      NumberFormat = Standard
394 
      OnChange = PBAppAliChange
395 
      ParentShowHint = False
396 
      ShowHint = False
397 
      TabOrder = 4
398 
    end
399 
    object PBEMAli: TPBNumEdit
400 
      Left = 208
401 
      Top = 144
402 
      Width = 48
403 
      Height = 21
404 
      Alignment = taRightJustify
405 
      Decimals = 2
406 
      NumberFormat = Standard
407 
      OnChange = PBEMAliChange
408 
      ParentShowHint = False
409 
      ShowHint = False
410 
      TabOrder = 6
411 
    end
412 
    object ChkSeqAli: TCheckBox
413 
      Left = 264
414 
      Top = 42
415 
      Width = 17
416 
      Height = 17
417 
      Hint =
418 
        'Check the checkbox to use the information from the animal profil' +
419 
        'e'
420 
      TabStop = False
421 
      TabOrder = 1
422 
      OnClick = ChkSeqAliClick
423 
    end
424 
    object ChkRation: TCheckBox
425 
      Left = 264
426 
      Top = 90
427 
      Width = 17
428 
      Height = 17
429 
      Hint =
430 
        'Check the checkbox to use the information from the animal profil' +
431 
        'e'
432 
      TabStop = False
433 
      TabOrder = 3
434 
      OnClick = ChkRationClick
435 
    end
436 
    object ChkAppAli: TCheckBox
437 
      Left = 264
438 
      Top = 122
439 
      Width = 17
440 
      Height = 17
441 
      Hint =
442 
        'Check the checkbox to use the information from the feed rationin' +
443 
        'g plan'
444 
      TabStop = False
445 
      TabOrder = 5
446 
      OnClick = ChkAppAliClick
447 
    end
448 
    object ChkEMAli: TCheckBox
449 
      Left = 264
450 
      Top = 146
451 
      Width = 17
452 
      Height = 17
453 
      Hint =
454 
        'Check the checkbox to calculate the information from the feed se' +
455 
        'quence plan and the feed rationing plan'
456 
      TabStop = False
457 
      TabOrder = 7
458 
      OnClick = ChkEMAliClick
459 
    end
460 
    object CBRationProfil: TComboBox
461 
      Left = 16
462 
      Top = 88
463 
      Width = 240
464 
      Height = 21
465 
      AutoCompleteDelay = 1500
466 
      Style = csDropDownList
467 
      Enabled = False
468 
      ItemHeight = 13
469 
      ItemIndex = 0
470 
      ParentShowHint = False
471 
      ShowHint = True
472 
      Sorted = True
473 
      TabOrder = 8
474 
      Text = '(Reference feed of the animal profile)'
475 
      Visible = False
476 
      OnChange = CBRationChange
477 
      Items.Strings = (
478 
        '(Reference feed of the animal profile)')
479 
    end
480 
  end
481 
  object GBResult: TGroupBox
482 
    Left = 304
483 
    Top = 288
484 
    Width = 320
485 
    Height = 176
486 
    Caption = 'Results'
487 
    Color = clMoneyGreen
488 
    ParentBackground = False
489 
    ParentColor = False
490 
    TabOrder = 2
491 
    object LAliment: TLabel
492 
      Left = 16
493 
      Top = 36
494 
      Width = 107
495 
      Height = 13
496 
      Caption = 'Quantity of feed (kg/d)'
497 
    end
498 
    object LBesoins: TLabel
499 
      Left = 152
500 
      Top = 12
501 
      Width = 80
502 
      Height = 13
503 
      Alignment = taCenter
504 
      AutoSize = False
505 
      Caption = 'Requirements'
506 
    end
507 
    object LdLys: TLabel
508 
      Left = 16
509 
      Top = 108
510 
      Width = 101
511 
      Height = 13
512 
      Caption = 'Digestible lysine (g/d)'
513 
    end
514 
    object LEN: TLabel
515 
      Left = 16
516 
      Top = 84
517 
      Width = 86
518 
      Height = 13
519 
      Caption = 'Net energy (MJ/d)'
520 
    end
521 
    object LEM: TLabel
522 
      Left = 16
523 
      Top = 60
524 
      Width = 134
525 
      Height = 13
526 
      Caption = 'Metabolizable energy (MJ/d)'
527 
    end
528 
    object Label2: TLabel
529 
      Left = 232
530 
      Top = 12
531 
      Width = 80
532 
      Height = 13
533 
      Alignment = taCenter
534 
      AutoSize = False
535 
      Caption = 'Deficiency'
536 
    end
537 
    object PBBesdLys: TPBNumEdit
538 
      Left = 168
539 
      Top = 104
540 
      Width = 48
541 
      Height = 21
542 
      Alignment = taRightJustify
543 
      Decimals = 2
544 
      NumberFormat = Standard
545 
      ReadOnly = True
546 
      TabOrder = 3
547 
    end
548 
    object PBBesEN: TPBNumEdit
549 
      Left = 168
550 
      Top = 80
551 
      Width = 48
552 
      Height = 21
553 
      Alignment = taRightJustify
554 
      Decimals = 2
555 
      NumberFormat = Standard
556 
      ReadOnly = True
557 
      TabOrder = 2
558 
    end
559 
    object PBBesEM: TPBNumEdit
560 
      Left = 168
561 
      Top = 56
562 
      Width = 48
563 
      Height = 21
564 
      Alignment = taRightJustify
565 
      Decimals = 2
566 
      NumberFormat = Standard
567 
      ReadOnly = True
568 
      TabOrder = 1
569 
    end
570 
    object PBBesAli: TPBNumEdit
571 
      Left = 168
572 
      Top = 32
573 
      Width = 48
574 
      Height = 21
575 
      Alignment = taRightJustify
576 
      Decimals = 2
577 
      NumberFormat = Standard
578 
      ReadOnly = True
579 
      TabOrder = 0
580 
    end
581 
    object BBRapLact: TBitBtn
582 
      Left = 128
583 
      Top = 144
584 
      Width = 80
585 
      Height = 24
586 
      Hint = 'Show the simulation results as a report'
587 
      Caption = 'Report'
588 
      Enabled = False
589 
      Glyph.Data = {
590 
        76010000424D7601000000000000760000002800000020000000100000000100
591 
        04000000000000010000120B0000120B00001000000000000000000000000000
592 
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
593 
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
594 
        333333333333333333333333333333333333333333FFFFF3333333333CCCCC33
595 
        33333FFFF77777FFFFFFCCCCCC808CCCCCC377777737F777777F008888070888
596 
        8003773FFF7773FFF77F0F0770F7F0770F037F777737F777737F70FFFFF7FFFF
597 
        F07373F3FFF7F3FFF37F70F000F7F000F07337F77737F777373330FFFFF7FFFF
598 
        F03337FF3FF7F3FF37F3370F00F7F00F0733373F7737F77337F3370FFFF7FFFF
599 
        0733337F33373F337333330FFF030FFF03333373FF7373FF7333333000333000
600 
        3333333777333777333333333333333333333333333333333333333333333333
601 
        3333333333333333333333333333333333333333333333333333}
602 
      NumGlyphs = 2
603 
      ParentShowHint = False
604 
      ShowHint = True
605 
      TabOrder = 8
606 
      OnClick = BBRapLactClick
607 
    end
608 
    object BBResLact: TBitBtn
609 
      Left = 32
610 
      Top = 144
611 
      Width = 80
612 
      Height = 24
613 
      Hint = 'Show the simulation results as graphs'
614 
      Caption = 'Graphs'
615 
      Enabled = False
616 
      Glyph.Data = {
617 
        76010000424D7601000000000000760000002800000020000000100000000100
618 
        04000000000000010000120B0000120B00001000000000000000000000000000
619 
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
620 
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
621 
        3333333333FFFFF3333333333700073333333FFF3777773F3FFF00030990BB03
622 
        000077737337F373777733309990BBB0333333373337F3373F3333099990BBBB
623 
        033333733337F33373F337999990BBBBB73337F33337F33337F330999990BBBB
624 
        B03337F33337FFFFF7F3309999900000003337F33337777777F33099990A0CCC
625 
        C03337F3337373F337F3379990AAA0CCC733373F3733373F373333090AAAAA0C
626 
        033333737333337373333330AAAAAAA033333FF73F33333733FF00330AAAAA03
627 
        3000773373FFFF73377733333700073333333333377777333333333333333333
628 
        3333333333333333333333333333333333333333333333333333}
629 
      NumGlyphs = 2
630 
      ParentShowHint = False
631 
      ShowHint = True
632 
      TabOrder = 7
633 
      OnClick = BBResLactClick
634 
    end
635 
    object PBDefEN: TPBNumEdit
636 
      Left = 248
637 
      Top = 80
638 
      Width = 48
639 
      Height = 21
640 
      Alignment = taRightJustify
641 
      Decimals = 2
642 
      NumberFormat = Standard
643 
      ReadOnly = True
644 
      TabOrder = 6
645 
    end
646 
    object PBDefEM: TPBNumEdit
647 
      Left = 248
648 
      Top = 56
649 
      Width = 48
650 
      Height = 21
651 
      Alignment = taRightJustify
652 
      Decimals = 2
653 
      NumberFormat = Standard
654 
      ReadOnly = True
655 
      TabOrder = 5
656 
    end
657 
    object PBDefAli: TPBNumEdit
658 
      Left = 248
659 
      Top = 32
660 
      Width = 48
661 
      Height = 21
662 
      Alignment = taRightJustify
663 
      Decimals = 2
664 
      NumberFormat = Standard
665 
      ReadOnly = True
666 
      TabOrder = 4
667 
    end
668 
  end
669 
end