root / UFGraph3D.dfm @ 5
Historique | Voir | Annoter | Télécharger (24,123 ko)
1 | 3 | avalancogn | object FGraph3D: TFGraph3D |
---|---|---|---|
2 | Left = 0 |
||
3 | Top = 120 |
||
4 | HelpContext = 5390 |
||
5 | Caption = 'Energy response curve' |
||
6 | ClientHeight = 560 |
||
7 | ClientWidth = 792 |
||
8 | Color = clBtnFace |
||
9 | Font.Charset = DEFAULT_CHARSET |
||
10 | Font.Color = clWindowText |
||
11 | Font.Height = -11 |
||
12 | Font.Name = 'MS Sans Serif' |
||
13 | Font.Style = [] |
||
14 | OldCreateOrder = False |
||
15 | Position = poMainFormCenter |
||
16 | OnClose = FormClose |
||
17 | OnCreate = FormCreate |
||
18 | OnShow = FormShow |
||
19 | PixelsPerInch = 96 |
||
20 | TextHeight = 13 |
||
21 | object Panel2D: TPanel |
||
22 | Left = 200 |
||
23 | Top = 0 |
||
24 | Width = 592 |
||
25 | Height = 560 |
||
26 | Align = alClient |
||
27 | BevelOuter = bvNone |
||
28 | TabOrder = 1 |
||
29 | Visible = False |
||
30 | object TrackBarJour: TTrackBar |
||
31 | Left = 0 |
||
32 | Top = 528 |
||
33 | Width = 592 |
||
34 | Height = 32 |
||
35 | Hint = 'Day-by-day progression of the simulation' |
||
36 | Align = alBottom |
||
37 | Max = 100 |
||
38 | Min = 1 |
||
39 | ParentShowHint = False |
||
40 | PageSize = 7 |
||
41 | Frequency = 7 |
||
42 | Position = 1 |
||
43 | SelEnd = 1 |
||
44 | SelStart = 1 |
||
45 | ShowHint = True |
||
46 | TabOrder = 0 |
||
47 | OnChange = TrackBarJourChange |
||
48 | end |
||
49 | object Chart2D: TChart |
||
50 | Left = 0 |
||
51 | Top = 0 |
||
52 | Width = 592 |
||
53 | Height = 528 |
||
54 | Legend.Visible = False |
||
55 | Title.Text.Strings = ( |
||
56 | 'TChart') |
||
57 | Title.Visible = False |
||
58 | BottomAxis.Automatic = False |
||
59 | BottomAxis.AutomaticMaximum = False |
||
60 | BottomAxis.AutomaticMinimum = False |
||
61 | BottomAxis.ExactDateTime = False |
||
62 | BottomAxis.Increment = 1.000000000000000000 |
||
63 | BottomAxis.Maximum = 6.000000000000000000 |
||
64 | BottomAxis.Minimum = 1.000000000000000000 |
||
65 | BottomAxis.Title.Caption = 'NE intake (multiples of maintenance)' |
||
66 | BottomAxis.Title.Font.Style = [fsBold] |
||
67 | LeftAxis.Automatic = False |
||
68 | LeftAxis.AutomaticMaximum = False |
||
69 | LeftAxis.AutomaticMinimum = False |
||
70 | LeftAxis.ExactDateTime = False |
||
71 | LeftAxis.Increment = 25.000000000000000000 |
||
72 | LeftAxis.Maximum = 200.000000000000000000 |
||
73 | LeftAxis.MinorTickCount = 4 |
||
74 | LeftAxis.Title.Caption = 'Protein deposition (g/d)' |
||
75 | LeftAxis.Title.Font.Color = clRed |
||
76 | LeftAxis.Title.Font.Style = [fsBold] |
||
77 | RightAxis.Automatic = False |
||
78 | RightAxis.AutomaticMaximum = False |
||
79 | RightAxis.AutomaticMinimum = False |
||
80 | RightAxis.ExactDateTime = False |
||
81 | RightAxis.Grid.Visible = False |
||
82 | RightAxis.Increment = 100.000000000000000000 |
||
83 | RightAxis.Maximum = 600.000000000000000000 |
||
84 | RightAxis.Title.Angle = 90 |
||
85 | RightAxis.Title.Caption = 'Lipid deposition (g/d)' |
||
86 | RightAxis.Title.Font.Color = clBlue |
||
87 | RightAxis.Title.Font.Style = [fsBold] |
||
88 | TopAxis.Automatic = False |
||
89 | TopAxis.AutomaticMaximum = False |
||
90 | TopAxis.AutomaticMinimum = False |
||
91 | TopAxis.ExactDateTime = False |
||
92 | TopAxis.Grid.Visible = False |
||
93 | TopAxis.Increment = 0.500000000000000000 |
||
94 | TopAxis.MinorTickCount = 4 |
||
95 | TopAxis.Title.Caption = 'Feed intake (kg/d)' |
||
96 | TopAxis.Title.Font.Style = [fsBold] |
||
97 | View3D = False |
||
98 | Align = alClient |
||
99 | BevelOuter = bvNone |
||
100 | TabOrder = 1 |
||
101 | PrintMargins = ( |
||
102 | 15 |
||
103 | 6 |
||
104 | 15 |
||
105 | 6) |
||
106 | object LabelLimitPD2D: TLabel |
||
107 | Left = 0 |
||
108 | Top = 515 |
||
109 | Width = 592 |
||
110 | Height = 13 |
||
111 | Align = alBottom |
||
112 | Alignment = taCenter |
||
113 | AutoSize = False |
||
114 | Caption = 'An amino acid limits protein deposition' |
||
115 | Font.Charset = DEFAULT_CHARSET |
||
116 | Font.Color = clRed |
||
117 | Font.Height = -11 |
||
118 | Font.Name = 'MS Sans Serif' |
||
119 | Font.Style = [] |
||
120 | ParentFont = False |
||
121 | Visible = False |
||
122 | ExplicitLeft = 64 |
||
123 | ExplicitTop = 64 |
||
124 | ExplicitWidth = 178 |
||
125 | end |
||
126 | object SeriesCourbePD: TLineSeries |
||
127 | HorizAxis = aBothHorizAxis |
||
128 | Marks.Arrow.Visible = True |
||
129 | Marks.Callout.Brush.Color = clBlack |
||
130 | Marks.Callout.Arrow.Visible = True |
||
131 | Marks.Visible = False |
||
132 | LinePen.Color = clRed |
||
133 | LinePen.Width = 2 |
||
134 | Pointer.InflateMargins = True |
||
135 | Pointer.Style = psRectangle |
||
136 | Pointer.Visible = False |
||
137 | XValues.Name = 'X' |
||
138 | XValues.Order = loAscending |
||
139 | YValues.Name = 'Y' |
||
140 | YValues.Order = loNone |
||
141 | end |
||
142 | object SeriesLimitePD: TLineSeries |
||
143 | HorizAxis = aBothHorizAxis |
||
144 | Marks.Arrow.Visible = True |
||
145 | Marks.Callout.Brush.Color = clBlack |
||
146 | Marks.Callout.Arrow.Visible = True |
||
147 | Marks.Visible = False |
||
148 | SeriesColor = clRed |
||
149 | LinePen.Color = clRed |
||
150 | LinePen.Visible = False |
||
151 | Pointer.HorizSize = 3 |
||
152 | Pointer.InflateMargins = True |
||
153 | Pointer.Pen.Visible = False |
||
154 | Pointer.Style = psRectangle |
||
155 | Pointer.VertSize = 1 |
||
156 | Pointer.Visible = True |
||
157 | XValues.Name = 'X' |
||
158 | XValues.Order = loAscending |
||
159 | YValues.Name = 'Y' |
||
160 | YValues.Order = loNone |
||
161 | end |
||
162 | object SeriesPointPD: TLineSeries |
||
163 | HorizAxis = aBothHorizAxis |
||
164 | Marks.Arrow.Visible = True |
||
165 | Marks.Callout.Brush.Color = clBlack |
||
166 | Marks.Callout.Arrow.Visible = True |
||
167 | Marks.Visible = False |
||
168 | SeriesColor = clRed |
||
169 | LinePen.Color = clRed |
||
170 | LinePen.Visible = False |
||
171 | Pointer.HorizSize = 5 |
||
172 | Pointer.InflateMargins = True |
||
173 | Pointer.Style = psCircle |
||
174 | Pointer.VertSize = 5 |
||
175 | Pointer.Visible = True |
||
176 | XValues.Name = 'X' |
||
177 | XValues.Order = loAscending |
||
178 | YValues.Name = 'Y' |
||
179 | YValues.Order = loNone |
||
180 | end |
||
181 | object SeriesDroitePD: TLineSeries |
||
182 | HorizAxis = aBothHorizAxis |
||
183 | Marks.Arrow.Visible = True |
||
184 | Marks.Callout.Brush.Color = clBlack |
||
185 | Marks.Callout.Arrow.Visible = True |
||
186 | Marks.Visible = False |
||
187 | SeriesColor = clBlack |
||
188 | Pointer.HorizSize = 3 |
||
189 | Pointer.InflateMargins = True |
||
190 | Pointer.Style = psCircle |
||
191 | Pointer.VertSize = 3 |
||
192 | Pointer.Visible = False |
||
193 | XValues.Name = 'X' |
||
194 | XValues.Order = loAscending |
||
195 | YValues.Name = 'Y' |
||
196 | YValues.Order = loNone |
||
197 | end |
||
198 | object SeriesPointPDAdLib: TLineSeries |
||
199 | HorizAxis = aBothHorizAxis |
||
200 | Marks.Arrow.Visible = True |
||
201 | Marks.Callout.Brush.Color = clBlack |
||
202 | Marks.Callout.Arrow.Visible = True |
||
203 | Marks.Style = smsSeriesTitle |
||
204 | Marks.Visible = True |
||
205 | SeriesColor = clBlack |
||
206 | Title = 'Ad libitum' |
||
207 | LinePen.Color = clRed |
||
208 | LinePen.Visible = False |
||
209 | Pointer.HorizSize = 5 |
||
210 | Pointer.InflateMargins = True |
||
211 | Pointer.Style = psCircle |
||
212 | Pointer.VertSize = 5 |
||
213 | Pointer.Visible = True |
||
214 | XValues.Name = 'X' |
||
215 | XValues.Order = loAscending |
||
216 | YValues.Name = 'Y' |
||
217 | YValues.Order = loNone |
||
218 | end |
||
219 | object SeriesPointLD: TLineSeries |
||
220 | HorizAxis = aBothHorizAxis |
||
221 | Marks.Arrow.Visible = True |
||
222 | Marks.Callout.Brush.Color = clBlack |
||
223 | Marks.Callout.Arrow.Visible = True |
||
224 | Marks.Visible = False |
||
225 | SeriesColor = clBlue |
||
226 | VertAxis = aRightAxis |
||
227 | LinePen.Color = clBlue |
||
228 | LinePen.Visible = False |
||
229 | Pointer.HorizSize = 5 |
||
230 | Pointer.InflateMargins = True |
||
231 | Pointer.Style = psCircle |
||
232 | Pointer.VertSize = 5 |
||
233 | Pointer.Visible = True |
||
234 | XValues.Name = 'X' |
||
235 | XValues.Order = loAscending |
||
236 | YValues.Name = 'Y' |
||
237 | YValues.Order = loNone |
||
238 | end |
||
239 | object SeriesDroiteLD: TLineSeries |
||
240 | HorizAxis = aBothHorizAxis |
||
241 | Marks.Arrow.Visible = True |
||
242 | Marks.Callout.Brush.Color = clBlack |
||
243 | Marks.Callout.Arrow.Visible = True |
||
244 | Marks.Visible = False |
||
245 | SeriesColor = clBlack |
||
246 | VertAxis = aRightAxis |
||
247 | Pointer.HorizSize = 3 |
||
248 | Pointer.InflateMargins = True |
||
249 | Pointer.Style = psCircle |
||
250 | Pointer.VertSize = 3 |
||
251 | Pointer.Visible = False |
||
252 | XValues.Name = 'X' |
||
253 | XValues.Order = loAscending |
||
254 | YValues.Name = 'Y' |
||
255 | YValues.Order = loNone |
||
256 | end |
||
257 | object SeriesCourbeLD: TLineSeries |
||
258 | HorizAxis = aBothHorizAxis |
||
259 | Marks.Arrow.Visible = True |
||
260 | Marks.Callout.Brush.Color = clBlack |
||
261 | Marks.Callout.Arrow.Visible = True |
||
262 | Marks.Visible = False |
||
263 | SeriesColor = clBlue |
||
264 | VertAxis = aRightAxis |
||
265 | LinePen.Color = clBlue |
||
266 | LinePen.Width = 2 |
||
267 | Pointer.InflateMargins = True |
||
268 | Pointer.Style = psRectangle |
||
269 | Pointer.Visible = False |
||
270 | XValues.Name = 'X' |
||
271 | XValues.Order = loAscending |
||
272 | YValues.Name = 'Y' |
||
273 | YValues.Order = loNone |
||
274 | end |
||
275 | object SeriesPointLDAdLib: TLineSeries |
||
276 | HorizAxis = aBothHorizAxis |
||
277 | Marks.Arrow.Visible = True |
||
278 | Marks.Callout.Brush.Color = clBlack |
||
279 | Marks.Callout.Arrow.Visible = True |
||
280 | Marks.Style = smsSeriesTitle |
||
281 | Marks.Visible = True |
||
282 | SeriesColor = clBlack |
||
283 | Title = 'Ad libitum' |
||
284 | VertAxis = aRightAxis |
||
285 | LinePen.Color = clBlue |
||
286 | LinePen.Visible = False |
||
287 | Pointer.HorizSize = 5 |
||
288 | Pointer.InflateMargins = True |
||
289 | Pointer.Style = psCircle |
||
290 | Pointer.VertSize = 5 |
||
291 | Pointer.Visible = True |
||
292 | XValues.Name = 'X' |
||
293 | XValues.Order = loAscending |
||
294 | YValues.Name = 'Y' |
||
295 | YValues.Order = loNone |
||
296 | end |
||
297 | end |
||
298 | end |
||
299 | object PanelData: TPanel |
||
300 | Left = 0 |
||
301 | Top = 0 |
||
302 | Width = 200 |
||
303 | Height = 560 |
||
304 | Align = alLeft |
||
305 | BevelOuter = bvNone |
||
306 | TabOrder = 0 |
||
307 | object GroupBoxResult: TGroupBox |
||
308 | Left = 0 |
||
309 | Top = 288 |
||
310 | Width = 192 |
||
311 | Height = 224 |
||
312 | Caption = 'Results' |
||
313 | TabOrder = 6 |
||
314 | Visible = False |
||
315 | object StringGridResult: TStringGrid |
||
316 | Left = 8 |
||
317 | Top = 16 |
||
318 | Width = 176 |
||
319 | Height = 199 |
||
320 | TabStop = False |
||
321 | ColCount = 2 |
||
322 | Ctl3D = False |
||
323 | DefaultRowHeight = 17 |
||
324 | FixedCols = 0 |
||
325 | RowCount = 11 |
||
326 | FixedRows = 0 |
||
327 | Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine] |
||
328 | ParentCtl3D = False |
||
329 | ParentShowHint = False |
||
330 | ScrollBars = ssNone |
||
331 | ShowHint = True |
||
332 | TabOrder = 0 |
||
333 | OnDrawCell = StringGridResultDrawCell |
||
334 | OnMouseMove = StringGridResultMouseMove |
||
335 | ColWidths = ( |
||
336 | 109 |
||
337 | 64) |
||
338 | end |
||
339 | end |
||
340 | object GroupBoxAdLib: TGroupBox |
||
341 | Left = 0 |
||
342 | Top = 0 |
||
343 | Width = 192 |
||
344 | Height = 120 |
||
345 | Caption = 'Ad libitum intake' |
||
346 | TabOrder = 0 |
||
347 | object LabelA: TLabel |
||
348 | Left = 64 |
||
349 | Top = 68 |
||
350 | Width = 8 |
||
351 | Height = 13 |
||
352 | Hint = 'Parameter a of the equation' |
||
353 | Alignment = taRightJustify |
||
354 | AutoSize = False |
||
355 | Caption = 'a' |
||
356 | ParentShowHint = False |
||
357 | ShowHint = True |
||
358 | end |
||
359 | object LabelUnite: TLabel |
||
360 | Left = 8 |
||
361 | Top = 20 |
||
362 | Width = 19 |
||
363 | Height = 13 |
||
364 | Caption = 'Unit' |
||
365 | end |
||
366 | object LabelEquation: TLabel |
||
367 | Left = 8 |
||
368 | Top = 44 |
||
369 | Width = 42 |
||
370 | Height = 13 |
||
371 | Caption = 'Equation' |
||
372 | end |
||
373 | object LabelB: TLabel |
||
374 | Left = 64 |
||
375 | Top = 92 |
||
376 | Width = 8 |
||
377 | Height = 13 |
||
378 | Hint = 'Parameter b of the equation' |
||
379 | Alignment = taRightJustify |
||
380 | AutoSize = False |
||
381 | Caption = 'b' |
||
382 | ParentShowHint = False |
||
383 | ShowHint = True |
||
384 | end |
||
385 | object SuperSpinA: TPBSuperSpin |
||
386 | Left = 120 |
||
387 | Top = 64 |
||
388 | Width = 64 |
||
389 | Height = 22 |
||
390 | Cursor = crDefault |
||
391 | Alignment = taRightJustify |
||
392 | Decimals = 0 |
||
393 | NumberFormat = Standard |
||
394 | OnChange = SuperSpinAChange |
||
395 | TabOrder = 2 |
||
396 | Increment = 1.000000000000000000 |
||
397 | RoundValues = False |
||
398 | Wrap = False |
||
399 | end |
||
400 | object SuperSpinB: TPBSuperSpin |
||
401 | Left = 120 |
||
402 | Top = 88 |
||
403 | Width = 64 |
||
404 | Height = 22 |
||
405 | Cursor = crDefault |
||
406 | Alignment = taRightJustify |
||
407 | Decimals = 0 |
||
408 | NumberFormat = Standard |
||
409 | OnChange = SuperSpinBChange |
||
410 | TabOrder = 3 |
||
411 | Increment = 1.000000000000000000 |
||
412 | RoundValues = False |
||
413 | Wrap = False |
||
414 | end |
||
415 | object EditUnit: TEdit |
||
416 | Left = 64 |
||
417 | Top = 16 |
||
418 | Width = 120 |
||
419 | Height = 21 |
||
420 | Enabled = False |
||
421 | TabOrder = 0 |
||
422 | end |
||
423 | object EditEquation: TEdit |
||
424 | Left = 64 |
||
425 | Top = 40 |
||
426 | Width = 120 |
||
427 | Height = 21 |
||
428 | Enabled = False |
||
429 | TabOrder = 1 |
||
430 | end |
||
431 | end |
||
432 | object GroupBoxPotential: TGroupBox |
||
433 | Left = 0 |
||
434 | Top = 120 |
||
435 | Width = 192 |
||
436 | Height = 120 |
||
437 | Caption = 'Growth potential' |
||
438 | TabOrder = 1 |
||
439 | object LabelEntretien: TLabel |
||
440 | Left = 8 |
||
441 | Top = 68 |
||
442 | Width = 62 |
||
443 | Height = 13 |
||
444 | Hint = 'Maintenance correction factor' |
||
445 | Caption = 'Maintenance' |
||
446 | ParentShowHint = False |
||
447 | ShowHint = True |
||
448 | end |
||
449 | object LabelPrecocite: TLabel |
||
450 | Left = 8 |
||
451 | Top = 44 |
||
452 | Width = 64 |
||
453 | Height = 13 |
||
454 | Hint = |
||
455 | 'Maturation coefficient (shape parameter of the Gompertz function' + |
||
456 | ')' |
||
457 | Caption = 'Precocity (/d)' |
||
458 | ParentShowHint = False |
||
459 | ShowHint = True |
||
460 | end |
||
461 | object LabelPDMoy: TLabel |
||
462 | Left = 8 |
||
463 | Top = 20 |
||
464 | Width = 71 |
||
465 | Height = 13 |
||
466 | Hint = 'Average protein deposition (g/d)' |
||
467 | Caption = 'Mean PD (g/d)' |
||
468 | ParentShowHint = False |
||
469 | ShowHint = True |
||
470 | end |
||
471 | object LabelPVPDmax: TLabel |
||
472 | Left = 8 |
||
473 | Top = 92 |
||
474 | Width = 76 |
||
475 | Height = 13 |
||
476 | Hint = 'Body weight (kg) to reach PDmax' |
||
477 | Caption = 'BW PDmax (kg)' |
||
478 | ParentShowHint = False |
||
479 | ShowHint = True |
||
480 | end |
||
481 | object SuperSpinPDMoy: TPBSuperSpin |
||
482 | Left = 120 |
||
483 | Top = 16 |
||
484 | Width = 64 |
||
485 | Height = 22 |
||
486 | Cursor = crDefault |
||
487 | Hint = 'Average protein deposition (g/d)' |
||
488 | Alignment = taRightJustify |
||
489 | Decimals = 2 |
||
490 | MaxValue = 260.000000000000000000 |
||
491 | MinValue = 50.000000000000000000 |
||
492 | NumberFormat = Standard |
||
493 | OnChange = SuperSpinPDMoyChange |
||
494 | ParentShowHint = False |
||
495 | ShowHint = True |
||
496 | TabOrder = 0 |
||
497 | Increment = 0.100000000000000000 |
||
498 | RoundValues = False |
||
499 | Wrap = False |
||
500 | end |
||
501 | object SuperSpinPrecocite: TPBSuperSpin |
||
502 | Left = 120 |
||
503 | Top = 40 |
||
504 | Width = 64 |
||
505 | Height = 22 |
||
506 | Cursor = crDefault |
||
507 | Hint = |
||
508 | 'Maturation coefficient (shape parameter of the Gompertz function' + |
||
509 | ')' |
||
510 | Alignment = taRightJustify |
||
511 | Decimals = 5 |
||
512 | MaxValue = 0.040000000000000000 |
||
513 | MinValue = 0.001000000000000000 |
||
514 | NumberFormat = Standard |
||
515 | OnChange = SuperSpinPrecociteChange |
||
516 | ParentShowHint = False |
||
517 | ShowHint = True |
||
518 | TabOrder = 1 |
||
519 | Increment = 0.000100000000000000 |
||
520 | RoundValues = False |
||
521 | Wrap = False |
||
522 | end |
||
523 | object SuperSpinEntretien: TPBSuperSpin |
||
524 | Left = 120 |
||
525 | Top = 64 |
||
526 | Width = 64 |
||
527 | Height = 22 |
||
528 | Cursor = crDefault |
||
529 | Hint = 'Maintenance correction factor' |
||
530 | Alignment = taRightJustify |
||
531 | Decimals = 3 |
||
532 | MaxValue = 1.300000000000000000 |
||
533 | MinValue = 0.700000000000000000 |
||
534 | NumberFormat = Standard |
||
535 | OnChange = SuperSpinEntretienChange |
||
536 | ParentShowHint = False |
||
537 | ShowHint = True |
||
538 | TabOrder = 2 |
||
539 | Increment = 0.010000000000000000 |
||
540 | RoundValues = False |
||
541 | Wrap = False |
||
542 | end |
||
543 | object SuperSpinPVPDmax: TPBSuperSpin |
||
544 | Left = 120 |
||
545 | Top = 88 |
||
546 | Width = 64 |
||
547 | Height = 22 |
||
548 | Cursor = crDefault |
||
549 | Hint = 'Body weight (kg) to reach PDmax' |
||
550 | Alignment = taRightJustify |
||
551 | Decimals = 0 |
||
552 | MaxValue = 5000.000000000000000000 |
||
553 | MinValue = 20.000000000000000000 |
||
554 | NumberFormat = Standard |
||
555 | OnChange = SuperSpinPVPDmaxChange |
||
556 | ParentShowHint = False |
||
557 | ShowHint = True |
||
558 | TabOrder = 3 |
||
559 | Increment = 1.000000000000000000 |
||
560 | RoundValues = False |
||
561 | Wrap = False |
||
562 | end |
||
563 | end |
||
564 | object GroupBoxType: TGroupBox |
||
565 | Left = 0 |
||
566 | Top = 240 |
||
567 | Width = 192 |
||
568 | Height = 48 |
||
569 | Caption = 'Graph type' |
||
570 | TabOrder = 2 |
||
571 | object RadioButton2D: TRadioButton |
||
572 | Left = 48 |
||
573 | Top = 18 |
||
574 | Width = 32 |
||
575 | Height = 17 |
||
576 | Alignment = taLeftJustify |
||
577 | Caption = '2D' |
||
578 | TabOrder = 0 |
||
579 | OnClick = RadioButton2DClick |
||
580 | end |
||
581 | object RadioButton3D: TRadioButton |
||
582 | Left = 96 |
||
583 | Top = 18 |
||
584 | Width = 32 |
||
585 | Height = 17 |
||
586 | Caption = '3D' |
||
587 | Checked = True |
||
588 | TabOrder = 1 |
||
589 | TabStop = True |
||
590 | OnClick = RadioButton3DClick |
||
591 | end |
||
592 | end |
||
593 | object GroupBoxX: TGroupBox |
||
594 | Left = 0 |
||
595 | Top = 288 |
||
596 | Width = 192 |
||
597 | Height = 48 |
||
598 | Caption = 'X-axis' |
||
599 | TabOrder = 3 |
||
600 | object ComboBoxX: TComboBox |
||
601 | Left = 16 |
||
602 | Top = 16 |
||
603 | Width = 160 |
||
604 | Height = 21 |
||
605 | Style = csDropDownList |
||
606 | ItemHeight = 13 |
||
607 | ItemIndex = 0 |
||
608 | TabOrder = 0 |
||
609 | Text = 'Duration (d)' |
||
610 | OnChange = ComboBoxXChange |
||
611 | Items.Strings = ( |
||
612 | 'Duration (d)' |
||
613 | 'Age (d)' |
||
614 | 'Body weight (kg)') |
||
615 | end |
||
616 | end |
||
617 | object GroupBoxY: TGroupBox |
||
618 | Left = 0 |
||
619 | Top = 336 |
||
620 | Width = 192 |
||
621 | Height = 48 |
||
622 | Caption = 'Y-axis' |
||
623 | TabOrder = 4 |
||
624 | object ComboBoxY: TComboBox |
||
625 | Left = 16 |
||
626 | Top = 16 |
||
627 | Width = 160 |
||
628 | Height = 21 |
||
629 | Style = csDropDownList |
||
630 | ItemHeight = 13 |
||
631 | ItemIndex = 0 |
||
632 | TabOrder = 0 |
||
633 | Text = 'Protein deposition (g/d)' |
||
634 | OnChange = ComboBoxYChange |
||
635 | Items.Strings = ( |
||
636 | 'Protein deposition (g/d)' |
||
637 | 'Lipid deposition (g/d)') |
||
638 | end |
||
639 | end |
||
640 | object GroupBoxZ: TGroupBox |
||
641 | Left = 0 |
||
642 | Top = 384 |
||
643 | Width = 192 |
||
644 | Height = 48 |
||
645 | Caption = 'Feed intake' |
||
646 | TabOrder = 5 |
||
647 | object ComboBoxZ: TComboBox |
||
648 | Left = 16 |
||
649 | Top = 16 |
||
650 | Width = 160 |
||
651 | Height = 21 |
||
652 | Style = csDropDownList |
||
653 | ItemHeight = 13 |
||
654 | ItemIndex = 0 |
||
655 | TabOrder = 0 |
||
656 | Text = 'Feed intake (kg/d)' |
||
657 | OnChange = ComboBoxZChange |
||
658 | Items.Strings = ( |
||
659 | 'Feed intake (kg/d)' |
||
660 | 'NE intake (x maintenance)') |
||
661 | end |
||
662 | end |
||
663 | end |
||
664 | object Panel3D: TPanel |
||
665 | Left = 200 |
||
666 | Top = 0 |
||
667 | Width = 592 |
||
668 | Height = 560 |
||
669 | Align = alClient |
||
670 | BevelOuter = bvNone |
||
671 | TabOrder = 2 |
||
672 | DesignSize = ( |
||
673 | 592 |
||
674 | 560) |
||
675 | object Chart3D: TChart |
||
676 | Left = -2 |
||
677 | Top = 18 |
||
678 | Width = 568 |
||
679 | Height = 512 |
||
680 | BottomWall.Transparent = True |
||
681 | LeftWall.Transparent = True |
||
682 | Legend.Alignment = laBottom |
||
683 | MarginBottom = 5 |
||
684 | MarginLeft = 5 |
||
685 | MarginRight = 5 |
||
686 | MarginTop = 5 |
||
687 | Title.Text.Strings = ( |
||
688 | 'TChart') |
||
689 | Title.Visible = False |
||
690 | BottomAxis.ExactDateTime = False |
||
691 | BottomAxis.Increment = 10.000000000000000000 |
||
692 | BottomAxis.Title.Font.Style = [fsBold] |
||
693 | Chart3DPercent = 100 |
||
694 | DepthAxis.Automatic = False |
||
695 | DepthAxis.AutomaticMaximum = False |
||
696 | DepthAxis.AutomaticMinimum = False |
||
697 | DepthAxis.ExactDateTime = False |
||
698 | DepthAxis.Increment = 1.000000000000000000 |
||
699 | DepthAxis.Maximum = 99.000000000000000000 |
||
700 | DepthAxis.Minimum = 1.000000000000000000 |
||
701 | DepthAxis.Title.Font.Style = [fsBold] |
||
702 | DepthAxis.Visible = True |
||
703 | LeftAxis.Automatic = False |
||
704 | LeftAxis.AutomaticMinimum = False |
||
705 | LeftAxis.ExactDateTime = False |
||
706 | LeftAxis.Increment = 50.000000000000000000 |
||
707 | LeftAxis.Title.Font.Style = [fsBold] |
||
708 | RightAxis.Title.Font.Style = [fsBold] |
||
709 | TopAxis.Title.Font.Style = [fsBold] |
||
710 | View3DOptions.OrthoAngle = 30 |
||
711 | View3DOptions.Orthogonal = False |
||
712 | View3DOptions.Perspective = 0 |
||
713 | View3DOptions.Rotation = 320 |
||
714 | View3DOptions.Zoom = 70 |
||
715 | View3DOptions.ZoomText = False |
||
716 | BevelOuter = bvNone |
||
717 | TabOrder = 0 |
||
718 | Anchors = [akLeft, akTop, akRight, akBottom] |
||
719 | PrintMargins = ( |
||
720 | 10 |
||
721 | 10 |
||
722 | 10 |
||
723 | 10) |
||
724 | object LabelLimitPD3D: TLabel |
||
725 | Left = 0 |
||
726 | Top = 499 |
||
727 | Width = 568 |
||
728 | Height = 13 |
||
729 | Align = alBottom |
||
730 | Alignment = taCenter |
||
731 | AutoSize = False |
||
732 | Caption = 'An amino acid limits protein deposition' |
||
733 | Font.Charset = DEFAULT_CHARSET |
||
734 | Font.Color = clRed |
||
735 | Font.Height = -11 |
||
736 | Font.Name = 'MS Sans Serif' |
||
737 | Font.Style = [] |
||
738 | ParentFont = False |
||
739 | Visible = False |
||
740 | ExplicitLeft = 64 |
||
741 | ExplicitTop = 64 |
||
742 | ExplicitWidth = 178 |
||
743 | end |
||
744 | object SeriesSurface: TSurfaceSeries |
||
745 | FastBrush = True |
||
746 | Marks.Arrow.Visible = True |
||
747 | Marks.Callout.Brush.Color = clBlack |
||
748 | Marks.Callout.Arrow.Visible = True |
||
749 | Marks.Visible = False |
||
750 | SeriesColor = 12615680 |
||
751 | ShowInLegend = False |
||
752 | Title = 'Surface' |
||
753 | Brush.Color = 12615680 |
||
754 | EndColor = 10109259 |
||
755 | IrregularGrid = True |
||
756 | MidColor = 7548915 |
||
757 | SideBrush.Color = clWhite |
||
758 | SideBrush.Style = bsClear |
||
759 | SmoothPalette = True |
||
760 | StartColor = 2152289 |
||
761 | XValues.Name = 'X' |
||
762 | XValues.Order = loNone |
||
763 | YValues.Name = 'Y' |
||
764 | YValues.Order = loNone |
||
765 | ZValues.Name = 'Z' |
||
766 | ZValues.Order = loNone |
||
767 | end |
||
768 | object SeriesAdLib: TPoint3DSeries |
||
769 | Marks.Arrow.Visible = True |
||
770 | Marks.Callout.Brush.Color = clBlack |
||
771 | Marks.Callout.Arrow.Visible = True |
||
772 | Marks.Visible = False |
||
773 | SeriesColor = clBlack |
||
774 | Title = 'Ad libitum' |
||
775 | LinePen.Width = 3 |
||
776 | Pointer.HorizSize = 5 |
||
777 | Pointer.InflateMargins = True |
||
778 | Pointer.Pen.Visible = False |
||
779 | Pointer.Style = psCircle |
||
780 | Pointer.VertSize = 5 |
||
781 | Pointer.Visible = False |
||
782 | XValues.Name = 'X' |
||
783 | XValues.Order = loNone |
||
784 | YValues.Name = 'Y' |
||
785 | YValues.Order = loNone |
||
786 | ZValues.Name = 'Z' |
||
787 | ZValues.Order = loNone |
||
788 | end |
||
789 | object SeriesRation: TPoint3DSeries |
||
790 | Marks.Arrow.Visible = True |
||
791 | Marks.Callout.Brush.Color = clBlack |
||
792 | Marks.Callout.Arrow.Visible = True |
||
793 | Marks.Visible = False |
||
794 | Title = 'Feed rationing plan' |
||
795 | LinePen.Color = clRed |
||
796 | LinePen.Width = 3 |
||
797 | Pointer.HorizSize = 5 |
||
798 | Pointer.InflateMargins = True |
||
799 | Pointer.Pen.Visible = False |
||
800 | Pointer.Style = psCircle |
||
801 | Pointer.VertSize = 5 |
||
802 | Pointer.Visible = False |
||
803 | XValues.Name = 'X' |
||
804 | XValues.Order = loNone |
||
805 | YValues.Name = 'Y' |
||
806 | YValues.Order = loNone |
||
807 | ZValues.Name = 'Z' |
||
808 | ZValues.Order = loNone |
||
809 | end |
||
810 | end |
||
811 | object SliderRotation: TJvxSlider |
||
812 | Left = 24 |
||
813 | Top = 536 |
||
814 | Width = 544 |
||
815 | Height = 24 |
||
816 | Hint = 'Rotation' |
||
817 | MinValue = 270 |
||
818 | MaxValue = 360 |
||
819 | ParentShowHint = False |
||
820 | ShowHint = True |
||
821 | TabOrder = 1 |
||
822 | TabStop = False |
||
823 | Value = 270 |
||
824 | Anchors = [akLeft, akRight, akBottom] |
||
825 | OnChange = SliderRotationChange |
||
826 | end |
||
827 | object SliderElevation: TJvxSlider |
||
828 | Left = 568 |
||
829 | Top = 24 |
||
830 | Width = 24 |
||
831 | Height = 512 |
||
832 | Hint = 'Elevation' |
||
833 | MinValue = 270 |
||
834 | MaxValue = 360 |
||
835 | Orientation = soVertical |
||
836 | ParentShowHint = False |
||
837 | ShowHint = True |
||
838 | TabOrder = 2 |
||
839 | TabStop = False |
||
840 | Value = 270 |
||
841 | Anchors = [akTop, akRight, akBottom] |
||
842 | OnChange = SliderElevationChange |
||
843 | end |
||
844 | object SliderPerspective: TJvxSlider |
||
845 | Left = 32 |
||
846 | Top = 0 |
||
847 | Width = 200 |
||
848 | Height = 24 |
||
849 | Hint = 'Perspective' |
||
850 | ParentShowHint = False |
||
851 | ShowHint = True |
||
852 | TabOrder = 3 |
||
853 | TabStop = False |
||
854 | OnChange = SliderPerspectiveChange |
||
855 | end |
||
856 | object SliderZoom: TJvxSlider |
||
857 | Left = 240 |
||
858 | Top = 0 |
||
859 | Width = 200 |
||
860 | Height = 24 |
||
861 | Hint = 'Zoom' |
||
862 | ParentShowHint = False |
||
863 | ShowHint = True |
||
864 | TabOrder = 4 |
||
865 | TabStop = False |
||
866 | OnChange = SliderZoomChange |
||
867 | end |
||
868 | end |
||
869 | end |