object frmMonitorFabricacion: TfrmMonitorFabricacion
  Left = 0
  Top = 0
  Caption = 'Monitor de Fabricaci'#243'n en Tiempo Real'
  ClientHeight = 650
  ClientWidth = 1000
  Color = 15921906
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = 'Segoe UI'
  Font.Style = []
  Position = poScreenCenter
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  TextHeight = 15
  object pnlTop: TPanel
    Left = 0
    Top = 0
    Width = 1000
    Height = 60
    Align = alTop
    BevelOuter = bvNone
    Color = 2894892
    ParentBackground = False
    TabOrder = 0
    object lblTitle: TLabel
      Left = 20
      Top = 16
      Width = 373
      Height = 25
      Caption = 'MONITOR DE FABRICACI'#211'N EN PLANTA'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -19
      Font.Name = 'Segoe UI'
      Font.Style = [fsBold]
      ParentFont = False
    end
  end
  object pnlFiltros: TPanel
    Left = 0
    Top = 60
    Width = 1000
    Height = 50
    Align = alTop
    BevelOuter = bvNone
    Color = clWhite
    ParentBackground = False
    TabOrder = 1
    object lblFecha: TLabel
      Left = 20
      Top = 16
      Width = 34
      Height = 15
      Caption = 'Fecha:'
    end
    object lblObrador: TLabel
      Left = 200
      Top = 16
      Width = 46
      Height = 15
      Caption = 'Obrador:'
    end
    object btnRefrescar: TSpeedButton
      Left = 520
      Top = 10
      Width = 100
      Height = 30
      Caption = 'Actualizar'
      OnClick = btnRefrescarClick
    end
    object dtpFecha: TDateTimePicker
      Left = 60
      Top = 13
      Width = 120
      Height = 23
      Date = 45539.000000000000000000
      Time = 0.500000000000000000
      TabOrder = 0
      OnChange = dtpFechaChange
    end
    object cbbObrador: TComboBox
      Left = 255
      Top = 13
      Width = 240
      Height = 23
      TabOrder = 1
      OnChange = cbbObradorChange
    end
    object chkAutoRefresh: TCheckBox
      Left = 640
      Top = 16
      Width = 190
      Height = 19
      Caption = 'Auto-refresco (cada 10s)'
      Checked = True
      State = cbChecked
      TabOrder = 2
      OnClick = chkAutoRefreshClick
    end
  end
  object pnlKPIs: TPanel
    Left = 0
    Top = 110
    Width = 1000
    Height = 85
    Align = alTop
    BevelOuter = bvNone
    Color = 15921906
    ParentBackground = False
    TabOrder = 2
    object pnlKpiTotal: TPanel
      Left = 20
      Top = 10
      Width = 220
      Height = 65
      BevelOuter = bvNone
      Color = clWhite
      ParentBackground = False
      TabOrder = 0
      object lblKpiTotalNum: TLabel
        Left = 16
        Top = 8
        Width = 18
        Height = 32
        Caption = '0'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = 2894892
        Font.Height = -24
        Font.Name = 'Segoe UI'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object lblKpiTotalTit: TLabel
        Left = 16
        Top = 42
        Width = 73
        Height = 15
        Caption = 'Total '#211'rdenes'
        Font.Color = clGray
        ParentFont = False
      end
    end
    object pnlKpiPend: TPanel
      Left = 260
      Top = 10
      Width = 220
      Height = 65
      BevelOuter = bvNone
      Color = clWhite
      ParentBackground = False
      TabOrder = 1
      object lblKpiPendNum: TLabel
        Left = 16
        Top = 8
        Width = 18
        Height = 32
        Caption = '0'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = 26112
        Font.Height = -24
        Font.Name = 'Segoe UI'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object lblKpiPendTit: TLabel
        Left = 16
        Top = 42
        Width = 109
        Height = 15
        Caption = 'Pendientes / Pesaje'
        Font.Color = clGray
        ParentFont = False
      end
    end
    object pnlKpiAmasando: TPanel
      Left = 500
      Top = 10
      Width = 220
      Height = 65
      BevelOuter = bvNone
      Color = clWhite
      ParentBackground = False
      TabOrder = 2
      object lblKpiAmasandoNum: TLabel
        Left = 16
        Top = 8
        Width = 18
        Height = 32
        Caption = '0'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = 11141120
        Font.Height = -24
        Font.Name = 'Segoe UI'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object lblKpiAmasandoTit: TLabel
        Left = 16
        Top = 42
        Width = 71
        Height = 15
        Caption = 'En Amasado'
        Font.Color = clGray
        ParentFont = False
      end
    end
    object pnlKpiFin: TPanel
      Left = 740
      Top = 10
      Width = 235
      Height = 65
      BevelOuter = bvNone
      Color = clWhite
      ParentBackground = False
      TabOrder = 3
      object lblKpiFinNum: TLabel
        Left = 16
        Top = 8
        Width = 18
        Height = 32
        Caption = '0'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = 17536
        Font.Height = -24
        Font.Name = 'Segoe UI'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object lblKpiFinTit: TLabel
        Left = 16
        Top = 42
        Width = 59
        Height = 15
        Caption = 'Finalizadas'
        Font.Color = clGray
        ParentFont = False
      end
    end
  end
  object pnlGrid: TPanel
    Left = 0
    Top = 195
    Width = 1000
    Height = 455
    Align = alClient
    BevelOuter = bvNone
    BorderWidth = 15
    TabOrder = 3
    object dbgMonitor: TDBGrid
      Left = 15
      Top = 15
      Width = 970
      Height = 425
      Align = alClient
      DataSource = dsMonitor
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgTitleClick]
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = 'Segoe UI'
      TitleFont.Style = []
      OnDblClick = dbgMonitorDblClick
      OnDrawColumnCell = dbgMonitorDrawColumnCell
      Columns = <
        item
          Expanded = False
          FieldName = 'id'
          Title.Caption = 'N'#186' OF'
          Width = 55
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'obrador_nombre'
          Title.Caption = 'Obrador'
          Width = 140
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'receta_nombre'
          Title.Caption = 'Receta / Producto'
          Width = 240
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'numero_masas'
          Title.Alignment = taCenter
          Title.Caption = 'Masas'
          Width = 50
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'multiplicador'
          Title.Alignment = taCenter
          Title.Caption = 'Factor'
          Width = 50
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'estado_nombre'
          Title.Alignment = taCenter
          Title.Caption = 'Estado Actual'
          Width = 110
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'hora_inicio'
          Title.Caption = 'H. Inicio'
          Width = 65
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'hora_fin'
          Title.Caption = 'H. Fin'
          Width = 65
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'temp_masa_final'
          Title.Caption = 'Temp Masa'
          Width = 75
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'consumos_count'
          Title.Alignment = taCenter
          Title.Caption = 'Lotes Pesados'
          Width = 85
          Visible = True
        end>
    end
  end
  object dsMonitor: TDataSource
    DataSet = qryMonitor
    Left = 416
    Top = 320
  end
  object qryMonitor: TFDQuery
    Left = 496
    Top = 320
  end
  object tmrAutoRefresh: TTimer
    Interval = 10000
    OnTimer = tmrAutoRefreshTimer
    Left = 680
    Top = 240
  end
end
