root / Ludo / UFLudo.dfm
Historique | Voir | Annoter | Télécharger (27,852 ko)
1 | 3 | avalancogn | 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 |