inherited fmHernoemPalletScherm: TfmHernoemPalletScherm
  PixelsPerInch = 96
  TextHeight = 19
  inherited pnlDrieKnoppen: TPanel
    inherited btnLinksOnder: TButton
      Action = nil
    end
  end
  object pnlHoofd: TPanel [1]
    Left = 0
    Top = 57
    Width = 480
    Height = 451
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 3
    object lblPallet: TLabel
      Left = 107
      Top = 10
      Width = 118
      Height = 19
      AutoSize = False
    end
    object lblAantal: TLabel
      Left = 98
      Top = 20
      Width = 118
      Height = 19
      AutoSize = False
    end
  end
  object pcHernoemPallet: TPageControl [3]
    Left = 0
    Top = 57
    Width = 480
    Height = 451
    ActivePage = tsOudeCode
    Align = alClient
    Style = tsFlatButtons
    TabOrder = 2
    object tsOudeCode: TTabSheet
      Caption = 'tsOudeCode'
      TabVisible = False
      object lblOudeCode: TLabel
        Left = 13
        Top = 158
        Width = 446
        Height = 85
        Alignment = taCenter
        AutoSize = False
        Caption = 'Scan oude pallet- of DNA-code'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -32
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
        WordWrap = True
      end
      object edtOudeCode: TEdit
        Left = 64
        Top = 249
        Width = 345
        Height = 47
        CharCase = ecUpperCase
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -32
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        OnKeyUp = edtOudeCodeKeyUp
      end
    end
    object tsResultaat: TTabSheet
      Caption = 'tsResultaat'
      ImageIndex = 1
      TabVisible = False
      object sgToeleveringData: TStringGrid
        Left = 4
        Top = 18
        Width = 379
        Height = 399
        ColCount = 1
        DefaultColWidth = 93
        DefaultRowHeight = 30
        DrawingStyle = gdsGradient
        FixedCols = 0
        RowCount = 2
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -24
        Font.Name = 'Tahoma'
        Font.Style = []
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSelect]
        ParentFont = False
        ScrollBars = ssNone
        TabOrder = 0
        ColWidths = (
          376)
      end
      object btnLaatst: TButton
        Left = 389
        Top = 332
        Width = 69
        Height = 69
        ImageIndex = 5
        Images = ImagesScherm.ilAlgemeen64
        TabOrder = 1
        OnClick = btnLaatstClick
      end
      object btnVolgende: TButton
        Left = 389
        Top = 234
        Width = 69
        Height = 69
        ImageIndex = 4
        Images = ImagesScherm.ilAlgemeen64
        TabOrder = 2
        OnClick = btnVolgendeClick
      end
      object btnVorige: TButton
        Left = 389
        Top = 133
        Width = 69
        Height = 69
        ImageIndex = 3
        Images = ImagesScherm.ilAlgemeen64
        TabOrder = 3
        OnClick = btnVorigeClick
      end
      object btnEerst: TButton
        Left = 389
        Top = 32
        Width = 69
        Height = 69
        ImageIndex = 2
        Images = ImagesScherm.ilAlgemeen64
        TabOrder = 4
        OnClick = btnEerstClick
      end
    end
    object tsNieuweCode: TTabSheet
      Caption = 'tsNieuweCode'
      ImageIndex = 2
      TabVisible = False
      object lblNieuweCode: TLabel
        Left = 13
        Top = 158
        Width = 446
        Height = 85
        Alignment = taCenter
        AutoSize = False
        Caption = 'Scan nieuwe pallet- of DNA-code'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -32
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
        WordWrap = True
      end
      object edtNieuweCode: TEdit
        Left = 64
        Top = 249
        Width = 345
        Height = 47
        CharCase = ecUpperCase
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -32
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        OnKeyUp = edtNieuweCodeKeyUp
      end
    end
  end
  inherited alAlgemeen: TActionList
    inherited actVolgende: TAction
      OnExecute = actVolgendeExecute
    end
    inherited actHome: TAction
      OnExecute = actHomeExecute
    end
  end
end