LOVATO-plugin/frmKanbanObj.dfm

object formKanbanObj: TformKanbanObj
  Left = 0
  Top = 0
  BorderIcons = [biSystemMenu]
  Caption = 'Kanban objedn'#225'vka'
  ClientHeight = 626
  ClientWidth = 737
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  Position = poMainFormCenter
  OnClose = FormClose
  OnShow = FormShow
  TextHeight = 13
  object Label1: TLabel
    Left = 391
    Top = 19
    Width = 87
    Height = 16
    Caption = 'Po'#269'et polo'#382'ek :'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
  end
  object lblPocetPol: TLabel
    Left = 489
    Top = 4
    Width = 24
    Height = 45
    Caption = '0'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -37
    Font.Name = 'Tahoma'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label2: TLabel
    Left = 26
    Top = 24
    Width = 65
    Height = 16
    Caption = 'Dodavatel :'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
  end
  object lblDodavatel: TLabel
    Left = 102
    Top = 19
    Width = 7
    Height = 25
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -21
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
  end
  object Label3: TLabel
    Left = 26
    Top = 66
    Width = 75
    Height = 16
    Caption = 'Kanban box :'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
  end
  object lblWork: TLabel
    Left = 444
    Top = 606
    Width = 285
    Height = 13
    Alignment = taRightJustify
    AutoSize = False
    Caption = 'lblWork'
  end
  object btnStorno: TButton
    Left = 638
    Top = 565
    Width = 75
    Height = 25
    Caption = 'Zru'#353'it'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    OnClick = btnStornoClick
  end
  object btnOK: TButton
    Left = 490
    Top = 565
    Width = 75
    Height = 25
    Caption = 'OK'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    OnClick = btnOKClick
  end
  object btnGenObj: TButton
    Left = 558
    Top = 12
    Width = 155
    Height = 29
    Caption = 'Generuj v'#253'dejku obal'#367
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    OnClick = btnGenObjClick
  end
  object btnGenKoopOrVPr: TButton
    Left = 558
    Top = 8
    Width = 155
    Height = 29
    Caption = 'Generuj v'#253'dejku obal'#367
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
    TabOrder = 6
    OnClick = btnGenKoopOrVPrClick
  end
  object mLog: TMemo
    Left = 26
    Top = 538
    Width = 401
    Height = 75
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Tahoma'
    Font.Style = []
    Lines.Strings = (
      '')
    ParentFont = False
    ScrollBars = ssVertical
    TabOrder = 3
  end
  object edtBox: TEdit
    Left = 107
    Top = 63
    Width = 121
    Height = 24
    Alignment = taCenter
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Tahoma'
    Font.Style = []
    NumbersOnly = True
    ParentFont = False
    TabOrder = 4
    OnKeyUp = edtBoxKeyUp
  end
  object grdPolozky: TJvDBGrid
    Left = 25
    Top = 90
    Width = 687
    Height = 440
    DataSource = ds
    Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgTitleHotTrack]
    TabOrder = 5
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'Tahoma'
    TitleFont.Style = []
    OnKeyUp = grdPolozkyKeyUp
    ScrollBars = ssVertical
    SelectColumnsDialogStrings.Caption = 'Select columns'
    SelectColumnsDialogStrings.OK = '&OK'
    SelectColumnsDialogStrings.NoSelectionWarning = 'At least one column must be visible!'
    EditControls = <>
    RowsHeight = 17
    TitleRowHeight = 17
    Columns = <
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'IdKanbanBox'
        Title.Alignment = taCenter
        Title.Caption = #268#237'slo boxu'
        Width = 84
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'RegCis'
        Title.Alignment = taCenter
        Title.Caption = 'Reg. '#269#237'slo'
        Width = 126
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Nazev'
        Title.Caption = 'Popis'
        Width = 373
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'Mnozstvi'
        Title.Alignment = taCenter
        Title.Caption = 'Mno'#382'stv'#237
        Width = 73
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'IdPohybu'
        Visible = False
      end>
  end
  object ds: TDataSource
    DataSet = vTable
    Left = 282
    Top = 8
  end
  object vTable: TFDMemTable
    FetchOptions.AssignedValues = [evMode]
    FetchOptions.Mode = fmAll
    ResourceOptions.AssignedValues = [rvSilentMode]
    ResourceOptions.SilentMode = True
    UpdateOptions.AssignedValues = [uvCheckRequired, uvAutoCommitUpdates]
    UpdateOptions.CheckRequired = False
    UpdateOptions.AutoCommitUpdates = True
    Left = 328
    Top = 10
    object vTableIdPohybu: TIntegerField
      FieldName = 'IdPohybu'
    end
    object vTableIdKanbanBox: TIntegerField
      FieldName = 'IdKanbanBox'
      Required = True
    end
    object vTableRegCis: TStringField
      FieldName = 'RegCis'
      Required = True
      Size = 30
    end
    object vTableNazev: TStringField
      FieldName = 'Nazev'
      Required = True
      Size = 50
    end
    object vTableMnozstvi: TSmallintField
      FieldName = 'Mnozstvi'
      Required = True
      DisplayFormat = '#,##0'
    end
  end
end