object fmMain: TfmMain
  Left = 0
  Top = 0
  Caption = 'PlanScan'
  ClientHeight = 336
  ClientWidth = 635
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object CacheQuery1: TCacheQuery
    Left = 344
    Top = 192
    Width = 32
    Height = 32
    ControlData = {
      000001004F0300004F0300000000000001010C5175657279204C6F6F6B757000
      00000000FFFFFFFF}
  end
  object pcMain: TPageControl
    Left = 0
    Top = 0
    Width = 635
    Height = 336
    ActivePage = tsDnaCodes
    Align = alClient
    TabOrder = 1
    object tsDnaCodes: TTabSheet
      Caption = 'DnaCodes'
      object pnlZoekKnoppen: TPanel
        Left = 0
        Top = 0
        Width = 627
        Height = 41
        Align = alTop
        BevelEdges = []
        BevelOuter = bvNone
        TabOrder = 0
        object btnZoekViaToelevering: TButton
          Left = 135
          Top = 9
          Width = 75
          Height = 25
          Caption = 'Toelevering'
          TabOrder = 0
          OnClick = btnZoekViaToeleveringClick
        end
        object edtZoekInput: TEdit
          Left = 8
          Top = 10
          Width = 121
          Height = 21
          TabOrder = 1
        end
        object btnZoekViaPallet: TButton
          Left = 216
          Top = 9
          Width = 75
          Height = 25
          Caption = 'Pallet'
          TabOrder = 2
          OnClick = btnZoekViaPalletClick
        end
        object btnZoekViaDnaCode: TButton
          Left = 297
          Top = 9
          Width = 75
          Height = 25
          Caption = 'DnaCode'
          TabOrder = 3
          OnClick = btnZoekViaDnaCodeClick
        end
      end
      object pnlActies: TPanel
        Left = 500
        Top = 41
        Width = 127
        Height = 267
        Align = alRight
        BevelEdges = []
        BevelOuter = bvNone
        TabOrder = 1
        object btnMaatwerketiket: TButton
          Left = 6
          Top = 6
          Width = 115
          Height = 25
          Caption = 'Maatwerketiket'
          TabOrder = 0
          OnClick = btnMaatwerketiketClick
        end
        object btnKlantEtiket: TButton
          Left = 6
          Top = 37
          Width = 115
          Height = 25
          Caption = 'Klantetiket'
          TabOrder = 1
          OnClick = btnKlantEtiketClick
        end
        object btnProboxetiket: TButton
          Left = 6
          Top = 68
          Width = 115
          Height = 25
          Caption = 'Proboxetiket'
          TabOrder = 2
          Visible = False
          OnClick = btnProboxetiketClick
        end
      end
      object dbgDnaCodes: TDBGrid
        Left = 0
        Top = 41
        Width = 500
        Height = 267
        Align = alClient
        DataSource = dsDnaCodes
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgMultiSelect, dgTitleClick, dgTitleHotTrack]
        TabOrder = 2
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'Tahoma'
        TitleFont.Style = []
        Columns = <
          item
            Expanded = False
            FieldName = 'cdsDnaCodesDnaCode'
            Title.Caption = 'DnaCode'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'cdsDnaCodesPallet'
            Title.Caption = 'Pallet'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'cdsDnaCodesToelevering'
            Title.Caption = 'Toelevering'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'cdsDnaCodesStatus'
            Title.Caption = 'Status'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'cdsDnaCodesBatch'
            Title.Caption = 'Batch'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'cdsDnaCodesScantijdstip'
            Title.Caption = 'Scantijdstip'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'cdsDnaCodesInitialen'
            Title.Caption = 'Initialen'
            Visible = True
          end>
      end
    end
    object tsGebruikers: TTabSheet
      Caption = 'Gebruikers'
      ImageIndex = 1
      OnShow = tsGebruikersShow
      ExplicitLeft = 0
      ExplicitTop = 0
      ExplicitWidth = 0
      ExplicitHeight = 0
      object Panel1: TPanel
        Left = 500
        Top = 0
        Width = 127
        Height = 308
        Align = alRight
        BevelEdges = []
        BevelOuter = bvNone
        TabOrder = 0
        object btnGebruikerAfmelden: TButton
          Left = 6
          Top = 6
          Width = 115
          Height = 25
          Caption = 'Afmelden'
          TabOrder = 0
          OnClick = btnGebruikerAfmeldenClick
        end
      end
      object dbgGebruikers: TDBGrid
        Left = 0
        Top = 0
        Width = 500
        Height = 308
        Align = alClient
        DataSource = dsGebruikers
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgMultiSelect, dgTitleClick, dgTitleHotTrack]
        TabOrder = 1
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'Tahoma'
        TitleFont.Style = []
        Columns = <
          item
            Expanded = False
            FieldName = 'cdsGebruikersInitialen'
            Title.Caption = 'Initialen'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'cdsGebruikersComputernaam'
            Title.Caption = 'Computernaam'
            Width = 150
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'cdsGebruikersAangemeldSinds'
            Title.Caption = 'Aangemeld sinds'
            Width = 112
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'cdsGebruikersLaatsteActiviteit'
            Title.Caption = 'Laatste activiteit'
            Width = 155
            Visible = True
          end>
      end
    end
  end
  object dsDnaCodes: TDataSource
    DataSet = cdsDnaCodes
    Left = 32
    Top = 192
  end
  object cdsDnaCodes: TClientDataSet
    Active = True
    Aggregates = <>
    FieldDefs = <
      item
        Name = 'cdsDnaCodesDnaCode'
        DataType = ftString
        Size = 10
      end
      item
        Name = 'cdsDnaCodesPallet'
        DataType = ftString
        Size = 10
      end
      item
        Name = 'cdsDnaCodesToelevering'
        DataType = ftString
        Size = 10
      end
      item
        Name = 'cdsDnaCodesStatus'
        DataType = ftString
        Size = 10
      end
      item
        Name = 'cdsDnaCodesBatch'
        DataType = ftString
        Size = 6
      end
      item
        Name = 'cdsDnaCodesScantijdstip'
        DataType = ftString
        Size = 20
      end
      item
        Name = 'cdsDnaCodesInitialen'
        DataType = ftString
        Size = 3
      end>
    IndexDefs = <>
    Params = <>
    StoreDefs = True
    Left = 32
    Top = 240
    Data = {
      320100009619E0BD010000001800000007000000000003000000320112636473
      446E61436F646573446E61436F64650100490000000100055749445448020002
      000A0011636473446E61436F64657350616C6C65740100490000000100055749
      445448020002000A0016636473446E61436F646573546F656C65766572696E67
      0100490000000100055749445448020002000A0011636473446E61436F646573
      5374617475730100490000000100055749445448020002000A0010636473446E
      61436F6465734261746368010049000000010005574944544802000200060017
      636473446E61436F6465735363616E74696A6473746970010049000000010005
      574944544802000200140014636473446E61436F646573496E697469616C656E
      01004900000001000557494454480200020003000000}
  end
  object cdsGebruikers: TClientDataSet
    Aggregates = <>
    FieldDefs = <
      item
        Name = 'cdsGebruikersInitialen'
        DataType = ftString
        Size = 10
      end
      item
        Name = 'cdsGebruikersComputernaam'
        DataType = ftString
        Size = 30
      end
      item
        Name = 'cdsGebruikersAangemeldSinds'
        DataType = ftString
        Size = 20
      end
      item
        Name = 'cdsGebruikersLaatsteActiviteit'
        DataType = ftString
        Size = 20
      end
      item
        Name = 'cdsGebruikersLoginCode'
        DataType = ftString
        Size = 20
      end>
    IndexDefs = <>
    Params = <>
    StoreDefs = True
    Left = 120
    Top = 240
  end
  object dsGebruikers: TDataSource
    DataSet = cdsGebruikers
    Left = 120
    Top = 192
  end
end