InraPorc

object FResBesGestE: TFResBesGestE

  Left = 200

  Top = 200

  HelpContext = 4860

  Caption = 'Requirements during gestation (herd)'

  ClientHeight = 400

  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

  OnClose = FormClose

  OnCreate = FormCreate

  OnShow = FormShow

  PixelsPerInch = 96

  TextHeight = 13

  object PC: TPageControl

    Left = 0

    Top = 0

    Width = 544

    Height = 94

    ActivePage = TSAli

    Align = alTop

    HotTrack = True

    MultiLine = True

    TabOrder = 0

    TabStop = False

    OnChange = PCChange

    object TSAli: TTabSheet

      Caption = 'Feed'

      ImageIndex = 2

    end

    object TabNRJ: TTabSheet

      Caption = 'Energy'

      ImageIndex = -1

      ExplicitLeft = 0

      ExplicitTop = 0

      ExplicitWidth = 0

      ExplicitHeight = 0

      object GBNRJY: TGroupBox

        Left = 180

        Top = 0

        Width = 176

        Height = 66

        Caption = 'Y-axis'

        TabOrder = 0

        object CBNRJ3: TComboBox

          Left = 16

          Top = 16

          Width = 144

          Height = 21

          Style = csDropDownList

          ItemHeight = 0

          ItemIndex = 1

          TabOrder = 0

          Text = 'Metabolizable energy'

          OnChange = CBNRJ3Change

          Items.Strings = (

            'Digestible energy'

            'Metabolizable energy'

            'Net energy')

        end

        object CBNRJ4: TComboBox

          Left = 16

          Top = 40

          Width = 144

          Height = 21

          Style = csDropDownList

          ItemHeight = 0

          TabOrder = 1

          OnChange = CBNRJ4Change

        end

      end

    end

    object TabAA: TTabSheet

      Caption = 'Amino acids'

      ImageIndex = 8

      ExplicitLeft = 0

      ExplicitTop = 0

      ExplicitWidth = 0

      ExplicitHeight = 0

      object GBAAY: TGroupBox

        Left = 180

        Top = 0

        Width = 176

        Height = 66

        Caption = 'Y-axis'

        TabOrder = 0

        object CBAA3: TComboBox

          Left = 16

          Top = 16

          Width = 144

          Height = 21

          Style = csDropDownList

          ItemHeight = 0

          ItemIndex = 0

          TabOrder = 0

          Text = 'Lysine'

          OnChange = CBAA3Change

          Items.Strings = (

            'Lysine'

            'Methionine'

            'Methionine + Cystine'

            'Tryptophan'

            'Threonine'

            'Phenylalanine'

            'Phenylalanine + Tyrosine'

            'Leucine'

            'Isoleucine'

            'Valine'

            'Histidine'

            'Arginine')

        end

        object CBAA4: TComboBox

          Left = 16

          Top = 40

          Width = 144

          Height = 21

          Style = csDropDownList

          ItemHeight = 0

          TabOrder = 1

          OnChange = CBAA4Change

        end

      end

    end

    object TSMin: TTabSheet

      Caption = 'Minerals'

      ImageIndex = 3

      ExplicitLeft = 0

      ExplicitTop = 0

      ExplicitWidth = 0

      ExplicitHeight = 0

      object GBMinY: TGroupBox

        Left = 180

        Top = 0

        Width = 176

        Height = 66

        Caption = 'Y-axis'

        TabOrder = 0

        object CBMin3: TComboBox

          Left = 16

          Top = 16

          Width = 144

          Height = 21

          Style = csDropDownList

          ItemHeight = 0

          ItemIndex = 0

          TabOrder = 0

          Text = 'Digestible phosphorus'

          OnChange = CBMin3Change

          Items.Strings = (

            'Digestible phosphorus'

            'Total calcium')

        end

        object CBMin4: TComboBox

          Left = 16

          Top = 40

          Width = 144

          Height = 21

          Style = csDropDownList

          ItemHeight = 0

          TabOrder = 1

          OnChange = CBMin4Change

        end

      end

    end

  end

  object Graph: TChart

    Left = 0

    Top = 94

    Width = 544

    Height = 306

    Foot.Alignment = taLeftJustify

    Foot.Font.Color = clBlack

    Foot.Font.Style = []

    Foot.Text.Strings = (

      'Simulation')

    Legend.Inverted = True

    Legend.LegendStyle = lsSeries

    MarginBottom = 1

    MarginLeft = 1

    MarginRight = 1

    MarginTop = 1

    PrintProportional = False

    SubTitle.Font.Color = clBlack

    SubTitle.Text.Strings = (

      'Total')

    Title.Font.Height = -16

    Title.Font.Style = [fsBold]

    Title.Text.Strings = (

      'Title')

    BottomAxis.Grid.Visible = False

    BottomAxis.Title.Caption = 'X'

    BottomAxis.Title.Font.Style = [fsBold]

    LeftAxis.Automatic = False

    LeftAxis.AutomaticMaximum = False

    LeftAxis.AutomaticMinimum = False

    LeftAxis.Title.Caption = 'Y'

    LeftAxis.Title.Font.Style = [fsBold]

    View3D = False

    Align = alClient

    BevelOuter = bvNone

    PopupMenu = PM

    TabOrder = 1

    PrintMargins = (

      5

      5

      5

      5)

  end

  object LBAA: TListBox

    Left = 160

    Top = 176

    Width = 120

    Height = 56

    ItemHeight = 13

    Items.Strings = (

      'Maintenance'

      'Litter'

      'Reserves'

      'Excess')

    TabOrder = 2

    Visible = False

  end

  object LBNRJ: TListBox

    Left = 32

    Top = 176

    Width = 120

    Height = 69

    ItemHeight = 13

    Items.Strings = (

      'Maintenance'

      'Activity'

      'Thermoregulation'

      'Litter'

      'Reserves')

    TabOrder = 3

    Visible = False

  end

  object PM: TPopupMenu

    Top = 96

    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 = 96

  end

end