InraPorc

object FGraphAli: TFGraphAli

  Left = 165

  Top = 200

  HelpContext = 2700

  Caption = 'Contribution of feed ingredients to the chemical composition'

  ClientHeight = 354

  ClientWidth = 544

  Color = clBtnFace

  Font.Charset = DEFAULT_CHARSET

  Font.Color = clWindowText

  Font.Height = -11

  Font.Name = 'MS Sans Serif'

  Font.Style = []

  OldCreateOrder = False

  Position = poMainFormCenter

  Scaled = False

  OnCreate = FormCreate

  OnShow = FormShow

  PixelsPerInch = 96

  TextHeight = 13

  object GBConfig: TGroupBox

    Left = 0

    Top = 0

    Width = 544

    Height = 48

    Align = alTop

    Caption = 'Select a graph'

    TabOrder = 0

    object CBTSFibres: TComboBox

      Left = 192

      Top = 16

      Width = 160

      Height = 21

      Style = csDropDownList

      ItemHeight = 13

      ItemIndex = 0

      TabOrder = 5

      Text = 'Crude fiber'

      Visible = False

      OnChange = CBTSFibresChange

      Items.Strings = (

        'Crude fiber'

        'NDF'

        'ADF'

        'ADL'

        'Total dietary fiber')

    end

    object CBTSMineraux: TComboBox

      Left = 192

      Top = 16

      Width = 160

      Height = 21

      Style = csDropDownList

      ItemHeight = 13

      ItemIndex = 0

      TabOrder = 4

      Text = 'Calcium (Ca)'

      Visible = False

      OnChange = CBTSMinerauxChange

      Items.Strings = (

        'Calcium (Ca)'

        'Phosphorus (P)'

        'Sodium (Na)'

        'Potassium (K)'

        'Magnesium (Mg)'

        'Chlorine (Cl)'

        'Sulfur (S)'

        'Copper (Cu)'

        'Zinc (Zn)'

        'Manganese (Mn)'

        'Iron (Fe)'

        'Selenium (Se)'

        'Cobalt (Co)'

        'Molybdene (Mo)'

        'Iodine (I)'

        'Digestible phosphorus'

        'Phytic acid phosphorus'

        'Phytase activity')

    end

    object CBTSAG: TComboBox

      Left = 192

      Top = 16

      Width = 160

      Height = 21

      Style = csDropDownList

      ItemHeight = 13

      ItemIndex = 0

      TabOrder = 7

      Text = 'C6:0 + C8:0 + C10:0'

      Visible = False

      OnChange = CBTSAGChange

      Items.Strings = (

        'C6:0 + C8:0 + C10:0'

        'C12:0'

        'C14:0'

        'C16:0'

        'C16:1'

        'C18:0'

        'C18:1'

        'C18:2'

        'C18:3'

        'C18:4'

        'C20:0'

        'C20:1'

        'C20:4'

        'C20:5'

        'C22:0'

        'C22:1'

        'C22:5'

        'C22:6'

        'C24:0')

    end

    object CBOnglet: TComboBox

      Left = 16

      Top = 16

      Width = 160

      Height = 21

      Style = csDropDownList

      ItemHeight = 13

      ItemIndex = 0

      TabOrder = 0

      Text = 'Elementary composition'

      OnChange = CBOngletChange

      Items.Strings = (

        'Elementary composition'

        'Amino acids'

        'Fatty acids'

        'Minerals'

        'Fiber')

    end

    object RBCrois: TRadioButton

      Left = 368

      Top = 12

      Width = 80

      Height = 16

      Caption = 'Growing pig'

      Checked = True

      TabOrder = 1

      TabStop = True

      OnClick = RBTypeClick

    end

    object RBTruie: TRadioButton

      Left = 368

      Top = 28

      Width = 80

      Height = 16

      Caption = 'Sow'

      TabOrder = 2

      OnClick = RBTypeClick

    end

    object CBTSAA: TComboBox

      Left = 192

      Top = 16

      Width = 160

      Height = 21

      Style = csDropDownList

      ItemHeight = 13

      ItemIndex = 1

      TabOrder = 3

      Text = 'Lysine'

      Visible = False

      OnChange = CBTSAAChange

      Items.Strings = (

        'Crude protein'

        'Lysine'

        'Methionine'

        'Cystine'

        'Tryptophan'

        'Threonine'

        'Phenylalanine'

        'Tyrosine'

        'Leucine'

        'Isoleucine'

        'Valine'

        'Histidine'

        'Arginine'

        'Digestible crude protein'

        'Digestible lysine'

        'Digestible methionine'

        'Digestible cystine'

        'Digestible tryptophan'

        'Digestible threonine'

        'Digestible phenylalanine'

        'Digestible tyrosine'

        'Digestible leucine'

        'Digestible isoleucine'

        'Digestible valine'

        'Digestible histidine'

        'Digestible arginine')

    end

    object CBTSElem: TComboBox

      Left = 192

      Top = 16

      Width = 160

      Height = 21

      Style = csDropDownList

      ItemHeight = 13

      ItemIndex = 0

      TabOrder = 6

      Text = 'As-fed'

      OnChange = CBTSElemChange

      Items.Strings = (

        'As-fed'

        'Dry matter'

        'Ash'

        'Organic matter'

        'Crude fat'

        'Crude protein'

        'Starch'

        'Sugars'

        'Digestible organic matter'

        'Digestible crude fat'

        'Digestible crude protein'

        'Gross energy'

        'Digestible energy'

        'Metabolizable energy'

        'Net energy')

    end

  end

  object Graph: TChart

    Left = 0

    Top = 48

    Width = 544

    Height = 306

    AllowPanning = pmNone

    Foot.Alignment = taLeftJustify

    Foot.Font.Color = clBlack

    Foot.Font.Style = []

    Foot.Text.Strings = (

      'Feed')

    LeftWall.Color = clGray

    Legend.ColorWidth = 10

    Legend.Font.Charset = ANSI_CHARSET

    Legend.LegendStyle = lsValues

    Legend.Symbol.Width = 10

    Legend.TextStyle = ltsRightPercent

    Legend.Visible = False

    MarginBottom = 1

    MarginLeft = 1

    MarginRight = 1

    MarginTop = 1

    SubTitle.Font.Color = clBlack

    SubTitle.Text.Strings = (

      'Total')

    Title.Font.Height = -16

    Title.Font.Style = [fsBold]

    Title.Text.Strings = (

      'Title')

    AxisVisible = False

    BottomAxis.Title.Caption = 'X'

    BottomAxis.Title.Font.Style = [fsBold]

    DepthAxis.Title.Font.Style = [fsBold]

    LeftAxis.Title.Caption = 'Y'

    LeftAxis.Title.Font.Style = [fsBold]

    RightAxis.Title.Font.Style = [fsBold]

    TopAxis.Title.Font.Style = [fsBold]

    View3DOptions.Elevation = 315

    View3DOptions.Orthogonal = False

    View3DOptions.Perspective = 0

    View3DOptions.Rotation = 360

    View3DWalls = False

    Zoom.Allow = False

    Align = alClient

    BevelOuter = bvNone

    PopupMenu = PM

    TabOrder = 1

    PrintMargins = (

      5

      5

      5

      5)

    object Series1: TPieSeries

      Marks.Arrow.Color = clBlack

      Marks.Arrow.Visible = True

      Marks.Callout.Brush.Color = clBlack

      Marks.Callout.Arrow.Color = clBlack

      Marks.Callout.Arrow.Visible = True

      Marks.Brush.Color = clWhite

      Marks.Brush.Style = bsClear

      Marks.Frame.Visible = False

      Marks.Style = smsLabelPercent

      Marks.Visible = True

      PercentFormat = '(##0.0 %)'

      Title = 'Composition'

      ValueFormat = '#,##0'

      XValues.Order = loAscending

      YValues.Name = 'Pie-chart'

      YValues.Order = loNone

      Circled = True

      Gradient.Direction = gdRadial

      OtherSlice.Legend.Visible = False

      OtherSlice.Style = poBelowPercent

      OtherSlice.Value = 2.000000000000000000

      PieValues.Name = 'Pie-chart'

      PieValues.Order = loNone

    end

  end

  object PM: TPopupMenu

    Top = 48

    object MI3D: TMenuItem

      Caption = '2D / 3D'

      OnClick = MI3DClick

    end

    object MIPreview: TMenuItem

      Caption = 'Print preview'

      OnClick = MIPreviewClick

    end

    object MIPrint: TMenuItem

      Caption = 'Print...'

      OnClick = MIPrintClick

    end

  end

  object PD: TPrintDialog

    Left = 32

    Top = 48

  end

end