object flotes: Tflotes
  Left = 0
  Top = 0
  BorderIcons = []
  Caption = 'Seleccion de lotes'
  ClientHeight = 553
  ClientWidth = 915
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 634
    Top = 0
    Width = 281
    Height = 352
    Align = alRight
    Caption = 'Panel1'
    TabOrder = 0
    object ltotal: TLabel
      Left = 208
      Top = 309
      Width = 46
      Height = 24
      Caption = 'ltotal'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -20
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
    end
    object lresto: TLabel
      Left = 127
      Top = 309
      Width = 50
      Height = 24
      Caption = 'lresto'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -20
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
    end
    object Label1: TLabel
      Left = 127
      Top = 287
      Width = 62
      Height = 19
      Caption = 'Resto Kg'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 206
      Top = 287
      Width = 64
      Height = 19
      Caption = 'Total Kg.'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
    end
    object TouchKeyboard1: TTouchKeyboard
      Left = 1
      Top = 1
      Width = 279
      Height = 280
      Align = alTop
      GradientEnd = clSilver
      GradientStart = clGray
      Layout = 'NumPad'
    end
    object ecajas: TEdit
      Left = 6
      Top = 287
      Width = 99
      Height = 41
      Alignment = taCenter
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -27
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      Text = 'ecajas'
      OnEnter = ecajasEnter
    end
  end
  object DBGrid2: TDBGrid
    Left = 0
    Top = 0
    Width = 634
    Height = 352
    Align = alClient
    DataSource = dm.dsqlotessalidas
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -27
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -27
    TitleFont.Name = 'Tahoma'
    TitleFont.Style = []
    OnDrawColumnCell = DBGrid2DrawColumnCell
    Columns = <
      item
        Expanded = False
        FieldName = 'lote'
        Width = 99
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'fecha'
        Title.Caption = 'Dia'
        Width = 74
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'mprima'
        Title.Caption = 'Variedad'
        Width = 140
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'origen'
        Title.Caption = 'Origen'
        Width = 163
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'merma'
        Title.Caption = 'Kg. Disp.'
        Width = 115
        Visible = True
      end>
  end
  object Panel2: TPanel
    Left = 0
    Top = 352
    Width = 915
    Height = 201
    Align = alBottom
    Caption = 'Panel2'
    TabOrder = 2
    object DBGrid1: TDBGrid
      Left = 1
      Top = 1
      Width = 728
      Height = 199
      Align = alClient
      DataSource = dm.dslotes_pesadas
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -27
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -27
      TitleFont.Name = 'Tahoma'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'lote'
          Title.Caption = 'Lote'
          Width = 154
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'cajas'
          Title.Caption = 'Cajas'
          Width = 101
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'pesoneto_teorico'
          Title.Caption = 'PN Teorico'
          Width = 144
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'pesoneto_real'
          Title.Caption = 'PN Real'
          Width = 154
          Visible = True
        end>
    end
    object Panel3: TPanel
      Left = 729
      Top = 1
      Width = 185
      Height = 199
      Align = alRight
      TabOrder = 1
      object btaceptar: TButton
        Left = 1
        Top = 68
        Width = 183
        Height = 65
        Align = alBottom
        Caption = 'Aceptar'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -27
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        Visible = False
        OnClick = btaceptarClick
      end
      object Button1: TButton
        Left = 103
        Top = 2
        Width = 58
        Height = 58
        Margins.Left = 0
        Margins.Top = 0
        Margins.Right = 0
        Margins.Bottom = 0
        Caption = '-'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -53
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 1
        OnClick = Button1Click
      end
      object btanadir: TButton
        Left = 27
        Top = 2
        Width = 58
        Height = 58
        Margins.Left = 0
        Margins.Top = 0
        Margins.Right = 0
        Margins.Bottom = 0
        Caption = '+'
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -53
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 2
        OnClick = btanadirClick
      end
      object Button2: TButton
        Left = 1
        Top = 133
        Width = 183
        Height = 65
        Align = alBottom
        Caption = 'Cancelar'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -27
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
        TabOrder = 3
        OnClick = Button2Click
      end
    end
  end
end