root / Ludo / UFLudo.dfm
Historique | Voir | Annoter | Télécharger (27,852 ko)
1 |
object FLudo: TFLudo |
---|---|
2 |
Left = 120 |
3 |
Top = 120 |
4 |
Caption = 'InraPorc population' |
5 |
ClientHeight = 566 |
6 |
ClientWidth = 792 |
7 |
Color = clBtnFace |
8 |
Font.Charset = DEFAULT_CHARSET |
9 |
Font.Color = clWindowText |
10 |
Font.Height = -11 |
11 |
Font.Name = 'MS Sans Serif' |
12 |
Font.Style = [] |
13 |
OldCreateOrder = False |
14 |
Position = poDesktopCenter |
15 |
OnClose = FormClose |
16 |
OnCreate = FormCreate |
17 |
OnShow = FormShow |
18 |
PixelsPerInch = 96 |
19 |
TextHeight = 13 |
20 |
object PFolder: TPanel |
21 |
Left = 0 |
22 |
Top = 0 |
23 |
Width = 792 |
24 |
Height = 56 |
25 |
Align = alTop |
26 |
BevelOuter = bvNone |
27 |
TabOrder = 0 |
28 |
object LFolder: TLabel |
29 |
Left = 16 |
30 |
Top = 20 |
31 |
Width = 94 |
32 |
Height = 13 |
33 |
Caption = 'Dossier de donn'#233'es' |
34 |
Transparent = True |
35 |
end |
36 |
object JvDEFolder: TJvDirectoryEdit |
37 |
Left = 160 |
38 |
Top = 16 |
39 |
Width = 320 |
40 |
Height = 21 |
41 |
AcceptFiles = False |
42 |
DialogKind = dkWin32 |
43 |
DialogText = 'S'#233'lectionner le dossier contenant les donn'#233'es' |
44 |
DialogOptions = [] |
45 |
DirectInput = False |
46 |
TabOrder = 0 |
47 |
OnChange = JvDEFolderChange |
48 |
end |
49 |
end |
50 |
object PC: TPageControl |
51 |
Left = 0 |
52 |
Top = 56 |
53 |
Width = 792 |
54 |
Height = 510 |
55 |
ActivePage = TSImport |
56 |
Align = alClient |
57 |
TabOrder = 1 |
58 |
object TSImport: TTabSheet |
59 |
Caption = 'Importation' |
60 |
DesignSize = ( |
61 |
784 |
62 |
482) |
63 |
object LImport: TLabel |
64 |
Left = 12 |
65 |
Top = 12 |
66 |
Width = 80 |
67 |
Height = 13 |
68 |
Caption = 'Fichier '#224' importer' |
69 |
Transparent = True |
70 |
end |
71 |
object SBImport: TSpeedButton |
72 |
Left = 156 |
73 |
Top = 32 |
74 |
Width = 80 |
75 |
Height = 24 |
76 |
Caption = 'Importer' |
77 |
ParentShowHint = False |
78 |
ShowHint = True |
79 |
Spacing = 1 |
80 |
Transparent = False |
81 |
OnClick = SBImportClick |
82 |
end |
83 |
object JvFEImport: TJvFilenameEdit |
84 |
Left = 156 |
85 |
Top = 8 |
86 |
Width = 240 |
87 |
Height = 21 |
88 |
Hint = |
89 |
'Ligne de titre : Nom;Sexe;AgeInit;PVInit;ModeFin;Duree;PVFin;Car' + |
90 |
'casse;Unite;Equation;a;b;PDMoy;Bgompertz;Entretien;PVmr2' |
91 |
AddQuotes = False |
92 |
DefaultExt = '.csv' |
93 |
Filter = 'Fichier CSV|*.csv' |
94 |
DialogOptions = [ofHideReadOnly, ofNoChangeDir, ofPathMustExist, ofFileMustExist] |
95 |
DialogTitle = 'S'#233'lectionner le fichier CSV '#224' importer' |
96 |
DirectInput = False |
97 |
ParentShowHint = False |
98 |
ShowHint = True |
99 |
TabOrder = 0 |
100 |
end |
101 |
object MImport: TMemo |
102 |
Left = 12 |
103 |
Top = 64 |
104 |
Width = 760 |
105 |
Height = 410 |
106 |
Anchors = [akLeft, akTop, akRight, akBottom] |
107 |
Color = clBtnFace |
108 |
ReadOnly = True |
109 |
ScrollBars = ssVertical |
110 |
TabOrder = 1 |
111 |
end |
112 |
end |
113 |
object TSObserv: TTabSheet |
114 |
Caption = 'Observations' |
115 |
ImageIndex = 1 |
116 |
ExplicitLeft = 0 |
117 |
ExplicitTop = 0 |
118 |
ExplicitWidth = 0 |
119 |
ExplicitHeight = 0 |
120 |
DesignSize = ( |
121 |
784 |
122 |
482) |
123 |
object LObserv: TLabel |
124 |
Left = 12 |
125 |
Top = 260 |
126 |
Width = 80 |
127 |
Height = 13 |
128 |
Caption = 'Fichier '#224' importer' |
129 |
Transparent = True |
130 |
end |
131 |
object SBObserv: TSpeedButton |
132 |
Left = 156 |
133 |
Top = 280 |
134 |
Width = 80 |
135 |
Height = 24 |
136 |
Caption = 'Importer' |
137 |
ParentShowHint = False |
138 |
ShowHint = True |
139 |
Spacing = 1 |
140 |
Transparent = False |
141 |
OnClick = SBObservClick |
142 |
end |
143 |
object LCarcasse: TLabel |
144 |
Left = 12 |
145 |
Top = 12 |
146 |
Width = 118 |
147 |
Height = 13 |
148 |
Caption = 'Rendement carcasse (%)' |
149 |
Transparent = True |
150 |
end |
151 |
object LPDMoy: TLabel |
152 |
Left = 12 |
153 |
Top = 156 |
154 |
Width = 71 |
155 |
Height = 13 |
156 |
Caption = 'PD moyen (g/j)' |
157 |
Transparent = True |
158 |
end |
159 |
object LPrecocite: TLabel |
160 |
Left = 12 |
161 |
Top = 180 |
162 |
Width = 61 |
163 |
Height = 13 |
164 |
Caption = 'Pr'#233'cocit'#233' (/j)' |
165 |
Transparent = True |
166 |
end |
167 |
object LEntretien: TLabel |
168 |
Left = 12 |
169 |
Top = 204 |
170 |
Width = 42 |
171 |
Height = 13 |
172 |
Caption = 'Entretien' |
173 |
Transparent = True |
174 |
end |
175 |
object LPVmr2: TLabel |
176 |
Left = 12 |
177 |
Top = 228 |
178 |
Width = 72 |
179 |
Height = 13 |
180 |
Caption = 'PV PDmax (kg)' |
181 |
Transparent = True |
182 |
end |
183 |
object JvFEObserv: TJvFilenameEdit |
184 |
Left = 156 |
185 |
Top = 256 |
186 |
Width = 240 |
187 |
Height = 21 |
188 |
Hint = 'Ligne de titre : Nom;Sexe;Age;Conso;PV;P2;TMP' |
189 |
AddQuotes = False |
190 |
DefaultExt = '.csv' |
191 |
Filter = 'Fichier CSV|*.csv' |
192 |
DialogOptions = [ofHideReadOnly, ofNoChangeDir, ofPathMustExist, ofFileMustExist] |
193 |
DialogTitle = 'S'#233'lectionner le fichier CSV '#224' importer' |
194 |
DirectInput = False |
195 |
ParentShowHint = False |
196 |
ShowHint = True |
197 |
TabOrder = 6 |
198 |
end |
199 |
object MObserv: TMemo |
200 |
Left = 12 |
201 |
Top = 312 |
202 |
Width = 760 |
203 |
Height = 162 |
204 |
Anchors = [akLeft, akTop, akRight, akBottom] |
205 |
Color = clBtnFace |
206 |
ReadOnly = True |
207 |
ScrollBars = ssVertical |
208 |
TabOrder = 7 |
209 |
end |
210 |
object GBAdLib: TGroupBox |
211 |
Left = 4 |
212 |
Top = 32 |
213 |
Width = 400 |
214 |
Height = 116 |
215 |
Caption = 'Consommation ad libitum' |
216 |
TabOrder = 1 |
217 |
object LUnite: TLabel |
218 |
Left = 8 |
219 |
Top = 20 |
220 |
Width = 25 |
221 |
Height = 13 |
222 |
Caption = 'Unit'#233 |
223 |
Transparent = True |
224 |
end |
225 |
object LEquation: TLabel |
226 |
Left = 8 |
227 |
Top = 44 |
228 |
Width = 42 |
229 |
Height = 13 |
230 |
Caption = 'Equation' |
231 |
Transparent = True |
232 |
end |
233 |
object LY50: TLabel |
234 |
Left = 8 |
235 |
Top = 68 |
236 |
Width = 105 |
237 |
Height = 13 |
238 |
Caption = 'Aliment ing'#233'r'#233' '#224' 50 kg' |
239 |
Transparent = True |
240 |
end |
241 |
object LY100: TLabel |
242 |
Left = 8 |
243 |
Top = 92 |
244 |
Width = 111 |
245 |
Height = 13 |
246 |
Caption = 'Aliment ing'#233'r'#233' '#224' 100 kg' |
247 |
Transparent = True |
248 |
end |
249 |
object CBUnite: TComboBox |
250 |
Left = 152 |
251 |
Top = 16 |
252 |
Width = 240 |
253 |
Height = 21 |
254 |
Style = csDropDownList |
255 |
ItemHeight = 0 |
256 |
ItemIndex = 3 |
257 |
TabOrder = 0 |
258 |
Text = 'EN (MJ/j)' |
259 |
OnChange = CBUniteChange |
260 |
Items.Strings = ( |
261 |
'Quantit'#233' (kg/j)' |
262 |
'ED (MJ/j)' |
263 |
'EM (MJ/j)' |
264 |
'EN (MJ/j)' |
265 |
'MS (kg/j)') |
266 |
end |
267 |
object CBEquation: TComboBox |
268 |
Left = 152 |
269 |
Top = 40 |
270 |
Width = 240 |
271 |
Height = 21 |
272 |
Style = csDropDownList |
273 |
ItemHeight = 0 |
274 |
ItemIndex = 3 |
275 |
TabOrder = 1 |
276 |
Text = 'Gamma (entretien)' |
277 |
Items.Strings = ( |
278 |
'a+PV*b' |
279 |
'a*PV^b' |
280 |
'a*(1-exp(-b*PV))' |
281 |
'Gamma (entretien)') |
282 |
end |
283 |
object JvVEY50: TJvValidateEdit |
284 |
Left = 152 |
285 |
Top = 64 |
286 |
Width = 64 |
287 |
Height = 21 |
288 |
CriticalPoints.MaxValueIncluded = False |
289 |
CriticalPoints.MinValueIncluded = False |
290 |
DisplayFormat = dfFloat |
291 |
DecimalPlaces = 2 |
292 |
EditText = '20.00' |
293 |
TabOrder = 2 |
294 |
end |
295 |
object JvVEY100: TJvValidateEdit |
296 |
Left = 152 |
297 |
Top = 88 |
298 |
Width = 64 |
299 |
Height = 21 |
300 |
CriticalPoints.MaxValueIncluded = False |
301 |
CriticalPoints.MinValueIncluded = False |
302 |
DisplayFormat = dfFloat |
303 |
DecimalPlaces = 2 |
304 |
EditText = '30.00' |
305 |
TabOrder = 3 |
306 |
end |
307 |
end |
308 |
object JvVECarcasse: TJvValidateEdit |
309 |
Left = 156 |
310 |
Top = 8 |
311 |
Width = 64 |
312 |
Height = 21 |
313 |
CriticalPoints.MaxValueIncluded = False |
314 |
CriticalPoints.MinValueIncluded = False |
315 |
DisplayFormat = dfFloat |
316 |
DecimalPlaces = 1 |
317 |
EditText = '79' |
318 |
TabOrder = 0 |
319 |
end |
320 |
object JvVEPDMoy: TJvValidateEdit |
321 |
Left = 156 |
322 |
Top = 152 |
323 |
Width = 64 |
324 |
Height = 21 |
325 |
CriticalPoints.MaxValueIncluded = False |
326 |
CriticalPoints.MinValueIncluded = False |
327 |
DisplayFormat = dfFloat |
328 |
DecimalPlaces = 2 |
329 |
EditText = '150.00' |
330 |
TabOrder = 2 |
331 |
end |
332 |
object JvVEPrecocite: TJvValidateEdit |
333 |
Left = 156 |
334 |
Top = 176 |
335 |
Width = 64 |
336 |
Height = 21 |
337 |
CriticalPoints.MaxValueIncluded = False |
338 |
CriticalPoints.MinValueIncluded = False |
339 |
DisplayFormat = dfFloat |
340 |
DecimalPlaces = 5 |
341 |
EditText = '0.01400' |
342 |
TabOrder = 3 |
343 |
end |
344 |
object JvVEEntretien: TJvValidateEdit |
345 |
Left = 156 |
346 |
Top = 200 |
347 |
Width = 64 |
348 |
Height = 21 |
349 |
CriticalPoints.MaxValueIncluded = False |
350 |
CriticalPoints.MinValueIncluded = False |
351 |
DisplayFormat = dfFloat |
352 |
DecimalPlaces = 3 |
353 |
EditText = '1.000' |
354 |
TabOrder = 4 |
355 |
end |
356 |
object JvVEPVmr2: TJvValidateEdit |
357 |
Left = 156 |
358 |
Top = 224 |
359 |
Width = 64 |
360 |
Height = 21 |
361 |
CriticalPoints.MaxValueIncluded = False |
362 |
CriticalPoints.MinValueIncluded = False |
363 |
DisplayFormat = dfFloat |
364 |
EditText = '70' |
365 |
TabOrder = 5 |
366 |
end |
367 |
end |
368 |
object TSCalibr: TTabSheet |
369 |
Caption = 'Calibrage' |
370 |
ImageIndex = 2 |
371 |
ExplicitLeft = 0 |
372 |
ExplicitTop = 0 |
373 |
ExplicitWidth = 0 |
374 |
ExplicitHeight = 0 |
375 |
DesignSize = ( |
376 |
784 |
377 |
482) |
378 |
object LRation1: TLabel |
379 |
Left = 12 |
380 |
Top = 36 |
381 |
Width = 100 |
382 |
Height = 13 |
383 |
Caption = 'Plan de rationnement' |
384 |
Transparent = True |
385 |
end |
386 |
object LSeqAli1: TLabel |
387 |
Left = 12 |
388 |
Top = 12 |
389 |
Width = 102 |
390 |
Height = 13 |
391 |
Caption = 'S'#233'quence alimentaire' |
392 |
Transparent = True |
393 |
end |
394 |
object SBCalibr: TSpeedButton |
395 |
Left = 156 |
396 |
Top = 64 |
397 |
Width = 80 |
398 |
Height = 24 |
399 |
Caption = 'Calibrer' |
400 |
NumGlyphs = 2 |
401 |
ParentShowHint = False |
402 |
ShowHint = True |
403 |
Spacing = 1 |
404 |
Transparent = False |
405 |
OnClick = SBCalibrClick |
406 |
end |
407 |
object CBRation1: TComboBox |
408 |
Left = 156 |
409 |
Top = 32 |
410 |
Width = 240 |
411 |
Height = 21 |
412 |
Style = csDropDownList |
413 |
ItemHeight = 0 |
414 |
Sorted = True |
415 |
TabOrder = 1 |
416 |
end |
417 |
object CBSeqAli1: TComboBox |
418 |
Left = 156 |
419 |
Top = 8 |
420 |
Width = 240 |
421 |
Height = 21 |
422 |
Style = csDropDownList |
423 |
ItemHeight = 0 |
424 |
Sorted = True |
425 |
TabOrder = 0 |
426 |
end |
427 |
object MCalibr: TMemo |
428 |
Left = 12 |
429 |
Top = 96 |
430 |
Width = 760 |
431 |
Height = 378 |
432 |
Anchors = [akLeft, akTop, akRight, akBottom] |
433 |
Color = clBtnFace |
434 |
ReadOnly = True |
435 |
ScrollBars = ssVertical |
436 |
TabOrder = 3 |
437 |
end |
438 |
object CheckBox1: TCheckBox |
439 |
Left = 412 |
440 |
Top = 66 |
441 |
Width = 16 |
442 |
Height = 17 |
443 |
TabOrder = 4 |
444 |
Visible = False |
445 |
end |
446 |
object CheckBox2: TCheckBox |
447 |
Left = 428 |
448 |
Top = 66 |
449 |
Width = 16 |
450 |
Height = 17 |
451 |
TabOrder = 5 |
452 |
Visible = False |
453 |
end |
454 |
object CheckBox3: TCheckBox |
455 |
Left = 444 |
456 |
Top = 66 |
457 |
Width = 16 |
458 |
Height = 17 |
459 |
TabOrder = 6 |
460 |
Visible = False |
461 |
end |
462 |
object CheckBox4: TCheckBox |
463 |
Left = 460 |
464 |
Top = 66 |
465 |
Width = 16 |
466 |
Height = 17 |
467 |
TabOrder = 7 |
468 |
Visible = False |
469 |
end |
470 |
object CheckBox5: TCheckBox |
471 |
Left = 484 |
472 |
Top = 66 |
473 |
Width = 16 |
474 |
Height = 17 |
475 |
TabOrder = 8 |
476 |
Visible = False |
477 |
end |
478 |
object CheckBox7: TCheckBox |
479 |
Left = 516 |
480 |
Top = 66 |
481 |
Width = 16 |
482 |
Height = 17 |
483 |
TabOrder = 10 |
484 |
Visible = False |
485 |
end |
486 |
object CheckBox8: TCheckBox |
487 |
Left = 532 |
488 |
Top = 66 |
489 |
Width = 16 |
490 |
Height = 17 |
491 |
TabOrder = 11 |
492 |
Visible = False |
493 |
end |
494 |
object CheckBox9: TCheckBox |
495 |
Left = 548 |
496 |
Top = 66 |
497 |
Width = 16 |
498 |
Height = 17 |
499 |
TabOrder = 12 |
500 |
Visible = False |
501 |
end |
502 |
object CheckBox6: TCheckBox |
503 |
Left = 500 |
504 |
Top = 66 |
505 |
Width = 16 |
506 |
Height = 17 |
507 |
TabOrder = 9 |
508 |
Visible = False |
509 |
end |
510 |
object CBAALimitCalibr: TCheckBox |
511 |
Left = 12 |
512 |
Top = 66 |
513 |
Width = 128 |
514 |
Height = 17 |
515 |
Caption = 'Acides amin'#233's limitants' |
516 |
Checked = True |
517 |
State = cbChecked |
518 |
TabOrder = 2 |
519 |
end |
520 |
end |
521 |
object TSGraph: TTabSheet |
522 |
Caption = 'Graphique' |
523 |
ImageIndex = 3 |
524 |
DesignSize = ( |
525 |
784 |
526 |
482) |
527 |
object LProfil: TLabel |
528 |
Left = 12 |
529 |
Top = 12 |
530 |
Width = 56 |
531 |
Height = 13 |
532 |
Caption = 'Profil animal' |
533 |
Transparent = True |
534 |
end |
535 |
object CBProfil: TComboBox |
536 |
Left = 156 |
537 |
Top = 8 |
538 |
Width = 240 |
539 |
Height = 21 |
540 |
Style = csDropDownList |
541 |
ItemHeight = 13 |
542 |
Sorted = True |
543 |
TabOrder = 0 |
544 |
OnChange = CBProfilChange |
545 |
end |
546 |
object CGraph: TChart |
547 |
Left = 4 |
548 |
Top = 64 |
549 |
Width = 776 |
550 |
Height = 418 |
551 |
Legend.Visible = False |
552 |
MarginBottom = 1 |
553 |
MarginLeft = 1 |
554 |
MarginRight = 1 |
555 |
MarginTop = 1 |
556 |
Title.Text.Strings = ( |
557 |
'TChart') |
558 |
Title.Visible = False |
559 |
BottomAxis.Labels = False |
560 |
BottomAxis.Title.Caption = 'Age (j)' |
561 |
BottomAxis.Title.Font.Style = [fsBold] |
562 |
LeftAxis.Labels = False |
563 |
LeftAxis.Title.Caption = 'Aliment distribu'#233' (kg)' |
564 |
LeftAxis.Title.Font.Color = clRed |
565 |
LeftAxis.Title.Font.Style = [fsBold] |
566 |
RightAxis.Labels = False |
567 |
RightAxis.Title.Caption = 'Poids vif (kg)' |
568 |
RightAxis.Title.Font.Color = clGreen |
569 |
RightAxis.Title.Font.Style = [fsBold] |
570 |
View3D = False |
571 |
BevelOuter = bvNone |
572 |
TabOrder = 7 |
573 |
Anchors = [akLeft, akTop, akRight, akBottom] |
574 |
object LineFeed: TLineSeries |
575 |
Marks.Arrow.Visible = True |
576 |
Marks.Callout.Brush.Color = clBlack |
577 |
Marks.Callout.Arrow.Visible = True |
578 |
Marks.Visible = False |
579 |
Title = 'Aliment distribu'#233 |
580 |
LinePen.Width = 2 |
581 |
Pointer.InflateMargins = True |
582 |
Pointer.Style = psRectangle |
583 |
Pointer.Visible = False |
584 |
XValues.Name = 'X' |
585 |
XValues.Order = loAscending |
586 |
YValues.Name = 'Y' |
587 |
YValues.Order = loNone |
588 |
end |
589 |
object LineWeight: TLineSeries |
590 |
Marks.Arrow.Visible = True |
591 |
Marks.Callout.Brush.Color = clBlack |
592 |
Marks.Callout.Arrow.Visible = True |
593 |
Marks.Visible = False |
594 |
Title = 'Poids vif' |
595 |
VertAxis = aRightAxis |
596 |
LinePen.Width = 2 |
597 |
Pointer.InflateMargins = True |
598 |
Pointer.Style = psRectangle |
599 |
Pointer.Visible = False |
600 |
XValues.Name = 'X' |
601 |
XValues.Order = loAscending |
602 |
YValues.Name = 'Y' |
603 |
YValues.Order = loNone |
604 |
end |
605 |
object PointFeed: TLineSeries |
606 |
Marks.Arrow.Visible = True |
607 |
Marks.Callout.Brush.Color = clBlack |
608 |
Marks.Callout.Arrow.Visible = True |
609 |
Marks.Visible = False |
610 |
Title = 'Aliment distribu'#233 |
611 |
LinePen.Width = 2 |
612 |
LinePen.Visible = False |
613 |
Pointer.Brush.Color = clWhite |
614 |
Pointer.Brush.Style = bsClear |
615 |
Pointer.InflateMargins = True |
616 |
Pointer.Pen.Color = clRed |
617 |
Pointer.Pen.Width = 2 |
618 |
Pointer.Style = psCircle |
619 |
Pointer.Visible = True |
620 |
XValues.Name = 'X' |
621 |
XValues.Order = loAscending |
622 |
YValues.Name = 'Y' |
623 |
YValues.Order = loNone |
624 |
end |
625 |
object PointWeight: TLineSeries |
626 |
Marks.Arrow.Visible = True |
627 |
Marks.Callout.Brush.Color = clBlack |
628 |
Marks.Callout.Arrow.Visible = True |
629 |
Marks.Visible = False |
630 |
Title = 'Poids vif' |
631 |
VertAxis = aRightAxis |
632 |
LinePen.Width = 2 |
633 |
LinePen.Visible = False |
634 |
Pointer.Brush.Color = clWhite |
635 |
Pointer.Brush.Style = bsClear |
636 |
Pointer.InflateMargins = True |
637 |
Pointer.Pen.Color = clGreen |
638 |
Pointer.Pen.Width = 2 |
639 |
Pointer.Style = psCircle |
640 |
Pointer.Visible = True |
641 |
XValues.Name = 'X' |
642 |
XValues.Order = loAscending |
643 |
YValues.Name = 'Y' |
644 |
YValues.Order = loNone |
645 |
end |
646 |
end |
647 |
object EY50: TEdit |
648 |
Left = 236 |
649 |
Top = 40 |
650 |
Width = 64 |
651 |
Height = 21 |
652 |
Hint = 'Aliment ing'#233'r'#233' '#224' 50 kg' |
653 |
TabStop = False |
654 |
Anchors = [akLeft, akBottom] |
655 |
ParentShowHint = False |
656 |
ShowHint = True |
657 |
TabOrder = 2 |
658 |
end |
659 |
object EY100: TEdit |
660 |
Left = 316 |
661 |
Top = 40 |
662 |
Width = 64 |
663 |
Height = 21 |
664 |
Hint = 'Aliment ing'#233'r'#233' '#224' 100 kg' |
665 |
TabStop = False |
666 |
Anchors = [akLeft, akBottom] |
667 |
ParentShowHint = False |
668 |
ShowHint = True |
669 |
TabOrder = 3 |
670 |
end |
671 |
object EPDMoy: TEdit |
672 |
Left = 396 |
673 |
Top = 40 |
674 |
Width = 64 |
675 |
Height = 21 |
676 |
Hint = 'PD moyen (g/j)' |
677 |
TabStop = False |
678 |
Anchors = [akLeft, akBottom] |
679 |
ParentShowHint = False |
680 |
ShowHint = True |
681 |
TabOrder = 4 |
682 |
end |
683 |
object EPrecocite: TEdit |
684 |
Left = 476 |
685 |
Top = 40 |
686 |
Width = 64 |
687 |
Height = 21 |
688 |
Hint = 'Pr'#233'cocit'#233' (/j)' |
689 |
TabStop = False |
690 |
Anchors = [akLeft, akBottom] |
691 |
ParentShowHint = False |
692 |
ShowHint = True |
693 |
TabOrder = 5 |
694 |
end |
695 |
object EEntretien: TEdit |
696 |
Left = 556 |
697 |
Top = 40 |
698 |
Width = 64 |
699 |
Height = 21 |
700 |
Hint = 'Entretien' |
701 |
TabStop = False |
702 |
Anchors = [akLeft, akBottom] |
703 |
ParentShowHint = False |
704 |
ShowHint = True |
705 |
TabOrder = 6 |
706 |
end |
707 |
object EPVInit: TEdit |
708 |
Left = 156 |
709 |
Top = 40 |
710 |
Width = 64 |
711 |
Height = 21 |
712 |
Hint = 'Poids vif initial' |
713 |
TabStop = False |
714 |
Anchors = [akLeft, akBottom] |
715 |
ParentShowHint = False |
716 |
ShowHint = True |
717 |
TabOrder = 1 |
718 |
end |
719 |
object CBAALimitGraph: TCheckBox |
720 |
Left = 12 |
721 |
Top = 42 |
722 |
Width = 128 |
723 |
Height = 17 |
724 |
Caption = 'Acides amin'#233's limitants' |
725 |
Checked = True |
726 |
State = cbChecked |
727 |
TabOrder = 8 |
728 |
end |
729 |
end |
730 |
object TSSimul: TTabSheet |
731 |
Caption = 'Simulation' |
732 |
ImageIndex = 4 |
733 |
DesignSize = ( |
734 |
784 |
735 |
482) |
736 |
object LBilan: TLabel |
737 |
Left = 12 |
738 |
Top = 100 |
739 |
Width = 80 |
740 |
Height = 13 |
741 |
Caption = 'Bilan synth'#233'tique' |
742 |
Transparent = True |
743 |
end |
744 |
object LResult: TLabel |
745 |
Left = 12 |
746 |
Top = 76 |
747 |
Width = 85 |
748 |
Height = 13 |
749 |
Caption = 'R'#233'sultats d'#233'taill'#233's' |
750 |
Transparent = True |
751 |
end |
752 |
object LRation2: TLabel |
753 |
Left = 12 |
754 |
Top = 44 |
755 |
Width = 100 |
756 |
Height = 13 |
757 |
Caption = 'Plan de rationnement' |
758 |
Transparent = True |
759 |
end |
760 |
object LSeqAli2: TLabel |
761 |
Left = 12 |
762 |
Top = 20 |
763 |
Width = 102 |
764 |
Height = 13 |
765 |
Caption = 'S'#233'quence alimentaire' |
766 |
Transparent = True |
767 |
end |
768 |
object SBSimul: TSpeedButton |
769 |
Left = 156 |
770 |
Top = 120 |
771 |
Width = 80 |
772 |
Height = 24 |
773 |
Caption = 'Simuler' |
774 |
NumGlyphs = 2 |
775 |
ParentShowHint = False |
776 |
ShowHint = True |
777 |
Spacing = 1 |
778 |
Transparent = False |
779 |
OnClick = SBSimulClick |
780 |
end |
781 |
object JvFEBilan: TJvFilenameEdit |
782 |
Left = 156 |
783 |
Top = 96 |
784 |
Width = 240 |
785 |
Height = 21 |
786 |
AddQuotes = False |
787 |
DialogKind = dkSave |
788 |
DefaultExt = '.csv' |
789 |
Filter = 'Fichier CSV|*.csv' |
790 |
DialogOptions = [ofHideReadOnly, ofNoChangeDir, ofPathMustExist] |
791 |
DialogTitle = |
792 |
'Indiquer le fichier CSV qui contiendra les r'#233'sultats des simulat' + |
793 |
'ions' |
794 |
DirectInput = False |
795 |
TabOrder = 3 |
796 |
end |
797 |
object JvFEResult: TJvFilenameEdit |
798 |
Left = 156 |
799 |
Top = 72 |
800 |
Width = 240 |
801 |
Height = 21 |
802 |
AddQuotes = False |
803 |
DialogKind = dkSave |
804 |
DefaultExt = '.csv' |
805 |
Filter = 'Fichier CSV|*.csv' |
806 |
DialogOptions = [ofHideReadOnly, ofNoChangeDir, ofPathMustExist] |
807 |
DialogTitle = |
808 |
'Indiquer le fichier CSV qui contiendra les r'#233'sultats des simulat' + |
809 |
'ions' |
810 |
DirectInput = False |
811 |
TabOrder = 2 |
812 |
end |
813 |
object MSimul: TMemo |
814 |
Left = 12 |
815 |
Top = 152 |
816 |
Width = 760 |
817 |
Height = 322 |
818 |
Anchors = [akLeft, akTop, akRight, akBottom] |
819 |
Color = clBtnFace |
820 |
ReadOnly = True |
821 |
ScrollBars = ssVertical |
822 |
TabOrder = 4 |
823 |
end |
824 |
object CBRation2: TComboBox |
825 |
Left = 156 |
826 |
Top = 40 |
827 |
Width = 240 |
828 |
Height = 21 |
829 |
Style = csDropDownList |
830 |
ItemHeight = 0 |
831 |
Sorted = True |
832 |
TabOrder = 1 |
833 |
end |
834 |
object CBSeqAli2: TComboBox |
835 |
Left = 156 |
836 |
Top = 16 |
837 |
Width = 240 |
838 |
Height = 21 |
839 |
Style = csDropDownList |
840 |
ItemHeight = 0 |
841 |
Sorted = True |
842 |
TabOrder = 0 |
843 |
end |
844 |
object GroupBoxFin: TGroupBox |
845 |
Left = 416 |
846 |
Top = 0 |
847 |
Width = 176 |
848 |
Height = 72 |
849 |
Caption = 'Etat final' |
850 |
TabOrder = 5 |
851 |
object JvValidateEditDuree: TJvValidateEdit |
852 |
Left = 120 |
853 |
Top = 16 |
854 |
Width = 40 |
855 |
Height = 21 |
856 |
CriticalPoints.MaxValueIncluded = False |
857 |
CriticalPoints.MinValueIncluded = False |
858 |
EditText = '100' |
859 |
TabOrder = 0 |
860 |
end |
861 |
object JvValidateEditPVFin: TJvValidateEdit |
862 |
Left = 120 |
863 |
Top = 40 |
864 |
Width = 40 |
865 |
Height = 21 |
866 |
CriticalPoints.MaxValueIncluded = False |
867 |
CriticalPoints.MinValueIncluded = False |
868 |
DisplayFormat = dfFloatFixed |
869 |
DecimalPlaces = 1 |
870 |
EditText = '120.0' |
871 |
TabOrder = 1 |
872 |
end |
873 |
object RadioButtonPVFin: TRadioButton |
874 |
Left = 32 |
875 |
Top = 42 |
876 |
Width = 80 |
877 |
Height = 17 |
878 |
Caption = 'Poids vif (kg)' |
879 |
TabOrder = 2 |
880 |
end |
881 |
object RadioButtonDuree: TRadioButton |
882 |
Left = 32 |
883 |
Top = 18 |
884 |
Width = 80 |
885 |
Height = 17 |
886 |
Caption = 'Dur'#233'e (j)' |
887 |
Checked = True |
888 |
TabOrder = 3 |
889 |
TabStop = True |
890 |
end |
891 |
object CheckBoxProfil: TCheckBox |
892 |
Left = 8 |
893 |
Top = 32 |
894 |
Width = 17 |
895 |
Height = 17 |
896 |
Hint = 'Utiliser l'#39#233'tat final du profil animal' |
897 |
ParentShowHint = False |
898 |
ShowHint = True |
899 |
TabOrder = 4 |
900 |
OnClick = CheckBoxProfilClick |
901 |
end |
902 |
end |
903 |
object CBAALimitSimul: TCheckBox |
904 |
Left = 12 |
905 |
Top = 122 |
906 |
Width = 128 |
907 |
Height = 17 |
908 |
Caption = 'Acides amin'#233's limitants' |
909 |
Checked = True |
910 |
State = cbChecked |
911 |
TabOrder = 6 |
912 |
end |
913 |
end |
914 |
object TSExport: TTabSheet |
915 |
Caption = 'Exportation' |
916 |
ImageIndex = 5 |
917 |
ExplicitLeft = 0 |
918 |
ExplicitTop = 0 |
919 |
ExplicitWidth = 0 |
920 |
ExplicitHeight = 0 |
921 |
DesignSize = ( |
922 |
784 |
923 |
482) |
924 |
object LExport: TLabel |
925 |
Left = 12 |
926 |
Top = 12 |
927 |
Width = 81 |
928 |
Height = 13 |
929 |
Caption = 'Fichier '#224' exporter' |
930 |
Transparent = True |
931 |
end |
932 |
object SBExport: TSpeedButton |
933 |
Left = 156 |
934 |
Top = 32 |
935 |
Width = 80 |
936 |
Height = 24 |
937 |
Caption = 'Exporter' |
938 |
ParentShowHint = False |
939 |
ShowHint = True |
940 |
Spacing = 1 |
941 |
Transparent = False |
942 |
OnClick = SBExportClick |
943 |
end |
944 |
object JvFEExport: TJvFilenameEdit |
945 |
Left = 156 |
946 |
Top = 8 |
947 |
Width = 240 |
948 |
Height = 21 |
949 |
AddQuotes = False |
950 |
DialogKind = dkSave |
951 |
DefaultExt = '.csv' |
952 |
Filter = 'Fichier CSV|*.csv' |
953 |
DialogOptions = [ofHideReadOnly, ofNoChangeDir, ofPathMustExist] |
954 |
DialogTitle = 'Indiquer le fichier CSV '#224' exporter' |
955 |
DirectInput = False |
956 |
TabOrder = 0 |
957 |
end |
958 |
object MExport: TMemo |
959 |
Left = 12 |
960 |
Top = 64 |
961 |
Width = 760 |
962 |
Height = 410 |
963 |
Anchors = [akLeft, akTop, akRight, akBottom] |
964 |
Color = clBtnFace |
965 |
ReadOnly = True |
966 |
ScrollBars = ssVertical |
967 |
TabOrder = 1 |
968 |
end |
969 |
end |
970 |
end |
971 |
object JvCsvDSImport: TJvCsvDataSet |
972 |
ReadOnly = True |
973 |
ValidateHeaderRow = False |
974 |
Separator = ';' |
975 |
SavesChanges = False |
976 |
AutoBackupCount = 0 |
977 |
StoreDefs = True |
978 |
Left = 488 |
979 |
Top = 16 |
980 |
end |
981 |
object JvCsvDSResult: TJvCsvDataSet |
982 |
CsvFieldDef = |
983 |
'PROFIL:$25;AGE:%;PV:&;SEQALI:$25;RATION:$25;NUMALI1:%;NUMALI2:%;' + |
984 |
'PCTALI1:&;PCTALI2:&;DISTRIB:&;INGERE:&;INGERE_ADLIB:&;MS:&;P:&;L' + |
985 |
':&;PD:&;LD:&;GMQ:&;IC:&;P2:&;TMP:&;CARCASSE:&;EN:&;N_ING:&;LYS_I' + |
986 |
'NG:&;MET_ING:&;CYS_ING:&;TRP_ING:&;THR_ING:&;PHE_ING:&;TYR_ING:&' + |
987 |
';LEU_ING:&;ILE_ING:&;VAL_ING:&;HIS_ING:&;ARG_ING:&;N_DIG:&;LYS_D' + |
988 |
'IG:&;MET_DIG:&;CYS_DIG:&;TRP_DIG:&;THR_DIG:&;PHE_DIG:&;TYR_DIG:&' + |
989 |
';LEU_DIG:&;ILE_DIG:&;VAL_DIG:&;HIS_DIG:&;ARG_DIG:&;N_BES:&;LYS_B' + |
990 |
'ES:&;MET_BES:&;CYS_BES:&;TRP_BES:&;THR_BES:&;PHE_BES:&;TYR_BES:&' + |
991 |
';LEU_BES:&;ILE_BES:&;VAL_BES:&;HIS_BES:&;ARG_BES:&;N_GAS:&;N_FEC' + |
992 |
':&;N_URI:&;N_RET:&;P_GAS:&;P_FEC:&;P_URI:&;P_RET:&;CA_GAS:&;CA_E' + |
993 |
'XC:&;CA_RET:&;K_GAS:&;K_EXC:&;K_RET:&;CU_GAS:&;CU_EXC:&;CU_RET:&' + |
994 |
';ZN_GAS:&;ZN_EXC:&;ZN_RET:&' |
995 |
Separator = ';' |
996 |
AutoBackupCount = 0 |
997 |
Left = 552 |
998 |
Top = 16 |
999 |
end |
1000 |
object JvCsvDSBilan: TJvCsvDataSet |
1001 |
CsvFieldDef = |
1002 |
'PROFIL:$25;SEQALI:$25;RATION:$25;MODEFIN:$10;AGEINIT:%;AGEFIN:%;' + |
1003 |
'PVINIT:&;PVFIN:&;PINIT:&;PFIN:&;LINIT:&;LFIN:&;INGERE:&;DISTRIB:' + |
1004 |
'&;COUT:&;CARCASSE:&' |
1005 |
Separator = ';' |
1006 |
AutoBackupCount = 0 |
1007 |
Left = 584 |
1008 |
Top = 16 |
1009 |
end |
1010 |
object JvCsvDSObserv: TJvCsvDataSet |
1011 |
ReadOnly = True |
1012 |
ValidateHeaderRow = False |
1013 |
Separator = ';' |
1014 |
SavesChanges = False |
1015 |
AutoBackupCount = 0 |
1016 |
StoreDefs = True |
1017 |
Left = 520 |
1018 |
Top = 16 |
1019 |
end |
1020 |
object ASQLite3DBInraPorc: TASQLite3DB |
1021 |
TimeOut = 0 |
1022 |
Database = 'InraPorc.sqb' |
1023 |
DefaultExt = '.sqb' |
1024 |
DriverDLL = 'SQLite3.dll' |
1025 |
Connected = False |
1026 |
MustExist = False |
1027 |
ExecuteInlineSQL = False |
1028 |
Left = 616 |
1029 |
Top = 16 |
1030 |
end |
1031 |
object ASQLite3TableObserv: TASQLite3Table |
1032 |
AutoCommit = False |
1033 |
SQLiteDateFormat = True |
1034 |
Connection = ASQLite3DBInraPorc |
1035 |
MaxResults = 0 |
1036 |
StartResult = 0 |
1037 |
TypeLess = False |
1038 |
SQLCursor = True |
1039 |
ReadOnly = False |
1040 |
UniDirectional = False |
1041 |
TableName = 'ObservProfilP' |
1042 |
PrimaryAutoInc = False |
1043 |
Left = 648 |
1044 |
Top = 16 |
1045 |
end |
1046 |
object JvCsvDSExport: TJvCsvDataSet |
1047 |
CsvFieldDef = |
1048 |
'NOM:$25;SEXE:%;AGEINIT:%;PVINIT:&;MODEFIN:%;DUREE:%;PVFIN:&;CARC' + |
1049 |
'ASSE:&;UNITE:%;EQUATION:%;A:&;B:&;PDMOY:&;BGOMPERTZ:&;ENTRETIEN:' + |
1050 |
'&;PVMR2:&' |
1051 |
Separator = ';' |
1052 |
AutoBackupCount = 0 |
1053 |
Left = 680 |
1054 |
Top = 16 |
1055 |
end |
1056 |
object XPManifestStyle: TXPManifest |
1057 |
Left = 712 |
1058 |
Top = 16 |
1059 |
end |
1060 |
end |