LOVATO-plugin/frmReklamaceMat.dfm

object formReklamaceMat: TformReklamaceMat
  Left = 0
  Top = 0
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = ' Reklamace - p'#345'esun MATERI'#193'LU'
  ClientHeight = 533
  ClientWidth = 792
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = 'Tahoma'
  Font.Style = []
  Position = poMainFormCenter
  OnClose = FormClose
  OnShow = FormShow
  TextHeight = 14
  object Label1: TLabel
    Left = 5
    Top = 5
    Width = 69
    Height = 16
    Caption = 'REKLAMACE'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
  end
  object Label2: TLabel
    Left = 5
    Top = 253
    Width = 53
    Height = 16
    Caption = 'P'#344'ESUNY'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
  end
  object btnOK: TButton
    Left = 586
    Top = 499
    Width = 75
    Height = 25
    Caption = 'OK'
    TabOrder = 0
    OnClick = btnOKClick
  end
  object btnStorno: TButton
    Left = 708
    Top = 499
    Width = 75
    Height = 25
    Caption = 'Storno'
    TabOrder = 1
    OnClick = btnStornoClick
  end
  object gridMat: TJvDBGrid
    Left = 3
    Top = 25
    Width = 781
    Height = 215
    DataSource = dsMat
    Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgTitleHotTrack]
    TabOrder = 2
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -12
    TitleFont.Name = 'Tahoma'
    TitleFont.Style = []
    OnDblClick = gridMatDblClick
    ScrollBars = ssVertical
    SelectColumnsDialogStrings.Caption = 'Select columns'
    SelectColumnsDialogStrings.OK = '&OK'
    SelectColumnsDialogStrings.NoSelectionWarning = 'At least one column must be visible!'
    EditControls = <>
    RowsHeight = 18
    TitleRowHeight = 18
    Columns = <
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'mSZ'
        Title.Alignment = taCenter
        Title.Caption = 'SK'
        Width = 40
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'mRegCis'
        Title.Alignment = taCenter
        Title.Caption = 'Reg. '#269#237'slo'
        Width = 115
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'mNazev'
        Title.Caption = 'N'#225'zev'
        Width = 535
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'mMnoz'
        Title.Alignment = taCenter
        Title.Caption = 'Mno'#382'stv'#237
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'mIdSS'
        Visible = False
      end>
  end
  object gridCil: TJvDBGrid
    Left = 5
    Top = 272
    Width = 779
    Height = 215
    DataSource = dsCil
    Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgTitleHotTrack]
    PopupMenu = pmCil
    TabOrder = 3
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -12
    TitleFont.Name = 'Tahoma'
    TitleFont.Style = []
    OnDblClick = gridCilDblClick
    ScrollBars = ssVertical
    SelectColumnsDialogStrings.Caption = 'Select columns'
    SelectColumnsDialogStrings.OK = '&OK'
    SelectColumnsDialogStrings.NoSelectionWarning = 'At least one column must be visible!'
    EditControls = <>
    RowsHeight = 18
    TitleRowHeight = 18
    Columns = <
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'cSZ'
        Title.Alignment = taCenter
        Title.Caption = 'SK'
        Width = 40
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'cRegCis'
        Title.Alignment = taCenter
        Title.Caption = 'Reg. '#269#237'slo'
        Width = 115
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'cNazev'
        Title.Caption = 'N'#225'zev'
        Width = 295
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'cMnoz'
        Title.Alignment = taCenter
        Title.Caption = 'Mno'#382'.'
        Width = 65
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'cSklad'
        Title.Alignment = taCenter
        Title.Caption = 'Sklad'
        Width = 110
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'cMnozPresun'
        Title.Alignment = taCenter
        Title.Caption = 'Mno'#382'.skl.'
        Width = 64
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'cMnozIT'
        Title.Alignment = taCenter
        Title.Caption = 'Mno'#382'. IT'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'cIdSSOld'
        Visible = False
      end
      item
        Expanded = False
        FieldName = 'cIdSSNew'
        Visible = False
      end
      item
        Expanded = False
        FieldName = 'cIdSklad'
        Visible = False
      end>
  end
  object tblMat: TFDMemTable
    FetchOptions.AssignedValues = [evMode]
    FetchOptions.Mode = fmAll
    ResourceOptions.AssignedValues = [rvSilentMode]
    ResourceOptions.SilentMode = True
    UpdateOptions.AssignedValues = [uvCheckRequired, uvAutoCommitUpdates]
    UpdateOptions.CheckRequired = False
    UpdateOptions.AutoCommitUpdates = True
    Left = 38
    Top = 110
    object mIdSS: TIntegerField
      FieldName = 'mIdSS'
    end
    object mSZ: TStringField
      FieldName = 'mSZ'
      Size = 3
    end
    object mRegCis: TStringField
      FieldName = 'mRegCis'
      Size = 30
    end
    object mNazev: TStringField
      FieldName = 'mNazev'
      Size = 100
    end
    object mMnoz: TFloatField
      FieldName = 'mMnoz'
      DisplayFormat = '#,##0.##'
    end
  end
  object tblCil: TFDMemTable
    FetchOptions.AssignedValues = [evMode]
    FetchOptions.Mode = fmAll
    ResourceOptions.AssignedValues = [rvSilentMode]
    ResourceOptions.SilentMode = True
    UpdateOptions.AssignedValues = [uvCheckRequired, uvAutoCommitUpdates]
    UpdateOptions.CheckRequired = False
    UpdateOptions.AutoCommitUpdates = True
    Left = 68
    Top = 321
    object cIdSSOld: TIntegerField
      FieldName = 'cIdSSOld'
      Required = True
    end
    object cIdSSNew: TIntegerField
      FieldName = 'cIdSSNew'
    end
    object cSZ: TStringField
      FieldName = 'cSZ'
      Required = True
      Size = 3
    end
    object cRegCis: TStringField
      FieldName = 'cRegCis'
      Required = True
      Size = 30
    end
    object cNazev: TStringField
      FieldName = 'cNazev'
      Required = True
      Size = 100
    end
    object cMnoz: TFloatField
      FieldName = 'cMnoz'
      Required = True
      DisplayFormat = '#,##0.##'
    end
    object cIdSklad: TStringField
      FieldName = 'cIdSklad'
      Size = 30
    end
    object cMnozPresun: TFloatField
      FieldName = 'cMnozPresun'
      DisplayFormat = '#,##0.##'
    end
    object cSklad: TStringField
      FieldName = 'cSklad'
      Size = 50
    end
    object tblCilcMnozIT: TFloatField
      FieldName = 'cMnozIT'
      DisplayFormat = '#,##0.##'
    end
  end
  object dsMat: TDataSource
    DataSet = tblMat
    Left = 82
    Top = 110
  end
  object dsCil: TDataSource
    DataSet = tblCil
    Left = 108
    Top = 319
  end
  object pmCil: TPopupMenu
    Left = 246
    Top = 347
    object pmDelCil: TMenuItem
      Caption = '&Smazat polo'#382'ku'
      OnClick = pmDelCilClick
    end
  end
end