Statistiques
| Révision:

root / UFBesLactT.dfm

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

1
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