inherited frmCadVeiculo: TfrmCadVeiculo
  Left = 181
  Top = 62
  Caption = 'frmCadVeiculo'
  ClientHeight = 538
  ClientWidth = 705
  OldCreateOrder = True
  ExplicitWidth = 711
  ExplicitHeight = 567
  PixelsPerInch = 96
  TextHeight = 16
  inherited Paginas: TPageControl
    Width = 705
    Height = 500
    TabOrder = 1
    ExplicitWidth = 705
    ExplicitHeight = 500
    inherited Acesso: TTabSheet
      ExplicitLeft = 4
      ExplicitTop = 6
      ExplicitWidth = 697
      ExplicitHeight = 490
      inherited Panel2: TPanel
        Left = 606
        Height = 453
        ExplicitLeft = 606
        ExplicitHeight = 453
      end
      inherited Panel3: TPanel
        Top = 453
        Width = 697
        TabOrder = 2
        ExplicitTop = 453
        ExplicitWidth = 697
      end
      inherited pnGrade: TPanel
        Width = 606
        Height = 453
        TabOrder = 0
        ExplicitWidth = 606
        ExplicitHeight = 453
        inherited grdPesquisa: TIB_Grid
          Width = 606
          Height = 437
          ExplicitWidth = 606
          ExplicitHeight = 437
        end
        inherited pnlOpcoesPesquisa: TPanel
          Width = 606
          ExplicitWidth = 606
        end
      end
    end
    inherited Manutencao: TTabSheet
      ExplicitLeft = 4
      ExplicitTop = 6
      ExplicitWidth = 697
      ExplicitHeight = 490
      inherited Panel6: TPanel
        Top = 454
        Width = 697
        TabOrder = 15
        ExplicitTop = 454
        ExplicitWidth = 697
        inherited Linhabotao: TShape
          Width = 695
          ExplicitWidth = 695
        end
        inherited Panel7: TPanel
          Left = 369
          TabOrder = 0
          ExplicitLeft = 369
          inherited BtAnterior: TBitBtn
            TabOrder = 1
          end
          inherited BtCancelar: TBitBtn
            TabOrder = 2
          end
        end
        inherited btnVoltar: TBitBtn
          TabOrder = 1
        end
        inherited btnEditar2: TBitBtn
          TabOrder = 3
        end
      end
      object edtPlaca: TIB_Edit
        Left = 11
        Top = 15
        Width = 136
        Height = 28
        AutoLabel.Caption = 'Placa'
        AutoLabel.Kind = albTop
        DataField = 'PLACA'
        DataSource = DsPrincipal
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -17
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
        ParentBackground = False
        TabOrder = 0
      end
      object edtRenavam: TIB_Edit
        Left = 11
        Top = 63
        Width = 183
        Height = 24
        AutoLabel.Caption = 'Renavam'
        AutoLabel.Kind = albTop
        DataField = 'RENAVAM'
        DataSource = DsPrincipal
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
        ParentBackground = False
        TabOrder = 1
      end
      object edtChassi: TIB_Edit
        Left = 205
        Top = 63
        Width = 203
        Height = 24
        AutoLabel.Caption = 'Chassi'
        AutoLabel.Kind = albTop
        DataField = 'CHASSI'
        DataSource = DsPrincipal
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
        ParentBackground = False
        TabOrder = 2
      end
      object edtAnoFab: TIB_Edit
        Left = 11
        Top = 159
        Width = 120
        Height = 24
        AutoLabel.Caption = 'Ano Fabrica'#231#227'o'
        AutoLabel.Kind = albTop
        DataField = 'ANO_FABRICACAO'
        DataSource = DsPrincipal
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
        ParentBackground = False
        TabOrder = 7
      end
      object edtAnoModelo: TIB_Edit
        Left = 150
        Top = 159
        Width = 120
        Height = 24
        AutoLabel.Caption = 'Ano Modelo'
        AutoLabel.Kind = albTop
        DataField = 'ANO_MODELO'
        DataSource = DsPrincipal
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
        ParentBackground = False
        TabOrder = 8
      end
      object edtMarca: TIB_Edit
        Left = 205
        Top = 108
        Width = 203
        Height = 24
        AutoLabel.Caption = 'Marca'
        AutoLabel.Kind = albTop
        DataField = 'MARCA'
        DataSource = DsPrincipal
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
        ParentBackground = False
        TabOrder = 4
      end
      object edtModelo: TIB_Edit
        Left = 417
        Top = 108
        Width = 177
        Height = 24
        AutoLabel.Caption = 'Modelo'
        AutoLabel.Kind = albTop
        DataField = 'MODELO'
        DataSource = DsPrincipal
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
        ParentBackground = False
        TabOrder = 5
      end
      object edtCor: TIB_Edit
        Left = 11
        Top = 207
        Width = 121
        Height = 24
        AutoLabel.Caption = 'Cor'
        AutoLabel.Kind = albTop
        DataField = 'COR'
        DataSource = DsPrincipal
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
        ParentBackground = False
        TabOrder = 13
      end
      object edtCapacidade: TIB_Edit
        Left = 150
        Top = 205
        Width = 121
        Height = 24
        AutoLabel.Caption = 'Capacidade (kg)'
        AutoLabel.Kind = albTop
        DataField = 'CAPACIDADE'
        DataSource = DsPrincipal
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
        ParentBackground = False
        TabOrder = 10
      end
      object edtTipoVeiculo: TIB_LookupCombo
        Left = 417
        Top = 63
        Width = 179
        Height = 21
        AutoLabel.Caption = 'Tipo'
        AutoLabel.Kind = albTop
        DataSource = dsrTipoVeiculo
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
        ParentBackground = False
        TabOrder = 3
        DisplayField = 'DESCRICAO'
        IndicateTitles = True
        SeekNearest = True
        ShowButton = True
      end
      object edtCombustivel: TIB_LookupCombo
        Left = 11
        Top = 110
        Width = 184
        Height = 21
        AutoLabel.Caption = 'Combust'#237'vel'
        AutoLabel.Kind = albTop
        DataSource = dsrCombustivel
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
        ParentBackground = False
        TabOrder = 6
        DisplayField = 'DESCRICAO'
        IndicateTitles = True
        SeekNearest = True
        ShowButton = True
      end
      object edtCategoria: TIB_LookupCombo
        Left = 283
        Top = 159
        Width = 289
        Height = 21
        AutoLabel.Caption = 'Categoria'
        AutoLabel.Kind = albTop
        DataSource = dsrCategoria
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
        ParentBackground = False
        TabOrder = 9
        DisplayField = 'DESCRICAO'
        IndicateTitles = True
        SeekNearest = True
        ShowButton = True
      end
      object pgcOutros: TPageControl
        Left = 8
        Top = 240
        Width = 673
        Height = 217
        ActivePage = tabProprietario
        TabOrder = 14
        object tabProprietario: TTabSheet
          Caption = 'Proprier'#225'rio do Ve'#237'culo'
          object Label3: TLabel
            Left = 8
            Top = 17
            Width = 24
            Height = 16
            Caption = 'Cpf'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Height = -13
            Font.Name = 'Verdana'
            Font.Style = [fsBold]
            ParentFont = False
          end
          object edtNomeProp: TIB_Edit
            Left = 216
            Top = 34
            Width = 433
            Height = 24
            TabStop = False
            AutoLabel.Caption = 'Nome'
            AutoLabel.Kind = albTop
            DataField = 'NOME'
            DataSource = dsrProprietario
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Height = -13
            Font.Name = 'Verdana'
            Font.Style = []
            ParentFont = False
            BorderStyle = bsNone
            ParentBackground = False
            TabOrder = 2
          end
          object edtTele1: TIB_Edit
            Left = 6
            Top = 92
            Width = 151
            Height = 24
            TabStop = False
            AutoLabel.Caption = 'Tele1'
            AutoLabel.Kind = albTop
            DataField = 'TELE1'
            DataSource = dsrProprietario
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Height = -13
            Font.Name = 'Verdana'
            Font.Style = []
            ParentFont = False
            BorderStyle = bsNone
            ParentBackground = False
            TabOrder = 5
          end
          object edtTele2: TIB_Edit
            Left = 173
            Top = 88
            Width = 151
            Height = 24
            TabStop = False
            AutoLabel.Caption = 'Tele2'
            AutoLabel.Kind = albTop
            DataField = 'TELE2'
            DataSource = dsrProprietario
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Height = -13
            Font.Name = 'Verdana'
            Font.Style = []
            ParentFont = False
            BorderStyle = bsNone
            ParentBackground = False
            TabOrder = 3
          end
          object edtCidade: TIB_Edit
            Left = 338
            Top = 88
            Width = 216
            Height = 24
            TabStop = False
            AutoLabel.Caption = 'Cidade'
            AutoLabel.Kind = albTop
            DataField = 'ENDERECO_CIDADE'
            DataSource = dsrProprietario
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Height = -13
            Font.Name = 'Verdana'
            Font.Style = []
            ParentFont = False
            BorderStyle = bsNone
            ParentBackground = False
            TabOrder = 4
          end
          object btnProprietario: TBitBtn
            Tag = 2
            Left = 145
            Top = 34
            Width = 23
            Height = 23
            Hint = 'Pesquisar Propriet'#225'rio'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Height = -13
            Font.Name = 'Verdana'
            Font.Style = []
            Glyph.Data = {
              36050000424D3605000000000000360400002800000010000000100000000100
              08000000000000010000320B0000320B000000010000000100005A6B7300AD7B
              73004A637B00EFBD8400B58C8C00A5948C00C6948C00B59C8C00BD9C8C00F7BD
              8C00BD949400C6949400CE949400C69C9400CEAD9400F7CE9400C6A59C00CEA5
              9C00D6A59C00C6AD9C00CEAD9C00D6AD9C00F7CE9C00F7D69C004A7BA500CEAD
              A500D6B5A500DEBDA500F7D6A500DEBDAD00DEC6AD00E7C6AD00FFDEAD00FFE7
              AD00CEB5B500F7DEB500F7E7B500FFE7B500FFEFB500D6BDBD00DED6BD00E7DE
              BD00FFE7BD006B9CC600EFDEC600FFEFC600FFF7C600F7E7CE00FFF7CE00F7EF
              D600F7F7D600FFF7D600FFFFD6002184DE00F7F7DE00FFFFDE001884E700188C
              E700FFFFE700188CEF00218CEF00B5D6EF00F7F7EF00FFF7EF00FFFFEF00FFFF
              F700FF00FF004AB5FF0052B5FF0052BDFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0042020A424242
              424242424242424242422B39180B42424242424242424242424243443C180B42
              4242424242424242424242444438180B42424242424242424242424244433918
              0A424242424242424242424242444335004201101A114242424242424242453D
              05072F343434291942424242424242221A2D34343437403E0442424242424206
              231C303437404146284242424242421B210F30373A414140310D42424242421F
              20032434373A3A37321342424242421D25030F2D37373737311042424242420D
              2D2D1C162430333429424242424242421E463F0F0316252E0842424242424242
              4227312D21252314424242424242424242420E141B1B42424242}
            ParentFont = False
            ParentShowHint = False
            ShowHint = True
            TabOrder = 0
            TabStop = False
            OnClick = btnProprietarioClick
          end
          object edtCpf: TMaskEdit
            Left = 7
            Top = 34
            Width = 139
            Height = 24
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Height = -13
            Font.Name = 'Verdana'
            Font.Style = []
            ParentFont = False
            TabOrder = 1
            Text = 'edtCpf'
            OnExit = edtCpfExit
          end
          object btn2: TBitBtn
            Tag = 2
            Left = 167
            Top = 34
            Width = 23
            Height = 23
            Hint = 'Cadastrar Novo Propriet'#225'rio'
            Glyph.Data = {
              36050000424D3605000000000000360400002800000010000000100000000100
              08000000000000010000130B0000130B000000010000000100002184290039B5
              520063A563006BAD840094DE8C00FF00FF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00050505050505
              0505050505050505050505050505050503000003050505050505050505050505
              0204010005050505050505050505050502040100050505050505050505050505
              0204010005050505050505050505050502040100050505050505050300000000
              0004010000000000030505020101010101010101010101010005050204040404
              0404010404040404000505030202020202040100000000000305050505050505
              0204010005050505050505050505050502040100050505050505050505050505
              0204010005050505050505050505050502040100050505050505050505050505
              0302020305050505050505050505050505050505050505050505}
            ParentShowHint = False
            ShowHint = True
            TabOrder = 6
            TabStop = False
            OnClick = btn2Click
          end
        end
        object tabMotoristas: TTabSheet
          Caption = 'Hist'#243'rico de Motoristas'
          ImageIndex = 1
          object IB_Grid2: TIB_Grid
            Left = 0
            Top = 4
            Width = 657
            Height = 162
            CustomGlyphsSupplied = []
            DataSource = dsrMotorista
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'Verdana'
            Font.Style = []
            ParentFont = False
            ParentBackground = False
            ReadOnly = True
            TabOrder = 0
            DefaultRowHeight = 18
            RowSelect = True
            ColMoving = False
            CurrentRowFont.Charset = DEFAULT_CHARSET
            CurrentRowFont.Color = clWindowText
            CurrentRowFont.Height = -13
            CurrentRowFont.Name = 'MS Sans Serif'
            CurrentRowFont.Style = []
            OrderingColor = 15132390
            OrderingFont.Charset = DEFAULT_CHARSET
            OrderingFont.Color = clBlue
            OrderingFont.Height = -11
            OrderingFont.Name = 'Verdana'
            OrderingFont.Style = []
            FixedFont.Charset = DEFAULT_CHARSET
            FixedFont.Color = clBlack
            FixedFont.Height = -11
            FixedFont.Name = 'Verdana'
            FixedFont.Style = [fsBold]
          end
        end
      end
      object edtTara: TIB_Edit
        Left = 283
        Top = 205
        Width = 121
        Height = 24
        AutoLabel.Caption = 'Tara'
        AutoLabel.Kind = albTop
        DataField = 'VEICULO.TARA'
        DataSource = DsPrincipal
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
        ParentBackground = False
        TabOrder = 11
      end
      object IB_Edit1: TIB_Edit
        Left = 417
        Top = 205
        Width = 155
        Height = 24
        AutoLabel.Caption = 'RNTRC'
        AutoLabel.Kind = albTop
        DataField = 'VEICULO.RNTRC'
        DataSource = DsPrincipal
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
        ParentBackground = False
        TabOrder = 12
      end
    end
  end
  inherited Panel1: TPanel
    Width = 705
    TabOrder = 0
    ExplicitWidth = 705
    inherited Label2: TLabel
      Width = 80
      Caption = 'Ve'#237'culos'
      ExplicitWidth = 80
    end
    inherited Shape1: TShape
      Width = 705
      ExplicitWidth = 705
    end
    inherited imgAcao: TImage
      Left = 345
      ExplicitLeft = 345
    end
  end
  inherited TbPrincipal: TIB_Query
    FieldsCharCase.Strings = (
      'PLACA=UPPER'
      'RENAVAM=UPPER'
      'CAPACIDADE=UPPER'
      'COD_CATEGORIA_VEICULO=UPPER'
      'COD_TIPO_VEICULO=UPPER'
      'COD_TIPO_COMBUSTIVEL=UPPER'
      'CHASSI=UPPER'
      'ANO_FABRICACAO=UPPER'
      'ANO_MODELO=UPPER'
      'MARCA=UPPER'
      'MODELO=UPPER'
      'COR=UPPER'
      'ESPECIE=UPPER'
      'NOME=UPPER')
    FieldsDisplayFormat.Strings = (
      'CAPACIDADE=,0.00')
    FieldsDisplayLabel.Strings = (
      'PLACA=Placa'
      'RENAVAM=Renavam'
      'CAPACIDADE=Capacidade'
      'NOME=Propriet'#225'rio'
      'COD_CATEGORIA_VEICULO=Cpf'
      'CPF_PROPRIETARIO=Cpf')
    FieldsDisplayWidth.Strings = (
      'PLACA=83'
      'NOME=260'
      'CPF_PROPRIETARIO=101'
      'RENAVAM=84')
    FieldsEditMask.Strings = (
      'PLACA=lll-9999;0')
    FieldsIndex.Strings = (
      'VEICULO.PLACA'
      'VEICULO.CPF_PROPRIETARIO'
      'VEICULO.COD_CATEGORIA_VEICULO'
      'VEICULO.COD_TIPO_VEICULO'
      'VEICULO.COD_TIPO_COMBUSTIVEL'
      'VEICULO.MARCA'
      'VEICULO.MODELO'
      'VEICULO.ANO_FABRICACAO'
      'PROPRIETARIO_VEICULO.NOME'
      'VEICULO.RENAVAM'
      'VEICULO.CHASSI'
      'VEICULO.ANO_MODELO'
      'VEICULO.COR'
      'VEICULO.CAPACIDADE'
      'VEICULO.ESPECIE')
    FieldsVisible.Strings = (
      'PLACA=TRUE'
      'COD_CATEGORIA_VEICULO=FALSE'
      'COD_TIPO_VEICULO=FALSE'
      'COD_TIPO_COMBUSTIVEL=FALSE'
      'RENAVAM=TRUE'
      'CHASSI=FALSE'
      'ANO_FABRICACAO=FALSE'
      'ANO_MODELO=FALSE'
      'MARCA=FALSE'
      'MODELO=FALSE'
      'COR=FALSE'
      'CAPACIDADE=TRUE'
      'ESPECIE=FALSE'
      'NOME=TRUE'
      'TARA=FALSE'
      'RNTRC=FALSE')
    SQL.Strings = (
      'SELECT VEICULO.*'
      '     , PROPRIETARIO_VEICULO.NOME'
      'FROM VEICULO'
      
        '   left join PROPRIETARIO_VEICULO on PROPRIETARIO_VEICULO.cpf = ' +
        'VEICULO.CPF_PROPRIETARIO')
    DeleteSQL.Strings = (
      'DELETE FROM VEICULO'
      'WHERE'
      '   PLACA = :OLD_PLACA')
    EditSQL.Strings = (
      'UPDATE VEICULO SET'
      '   PLACA = :PLACA, /*PK*/'
      '   CPF_PROPRIETARIO = :CPF_PROPRIETARIO,'
      '   COD_CATEGORIA_VEICULO = :COD_CATEGORIA_VEICULO,'
      '   COD_TIPO_VEICULO = :COD_TIPO_VEICULO,'
      '   COD_TIPO_COMBUSTIVEL = :COD_TIPO_COMBUSTIVEL,'
      '   MARCA = :MARCA,'
      '   MODELO = :MODELO,'
      '   ANO_FABRICACAO = :ANO_FABRICACAO,'
      '   RENAVAM = :RENAVAM,'
      '   CHASSI = :CHASSI,'
      '   ANO_MODELO = :ANO_MODELO,'
      '   COR = :COR,'
      '   CAPACIDADE = :CAPACIDADE,'
      '   ESPECIE = :ESPECIE,'
      '   TARA = :TARA,'
      '   RNTRC = :RNTRC'
      'WHERE'
      '   PLACA = :OLD_PLACA')
    InsertSQL.Strings = (
      'INSERT INTO VEICULO('
      '   PLACA, /*PK*/'
      '   CPF_PROPRIETARIO,'
      '   COD_CATEGORIA_VEICULO,'
      '   COD_TIPO_VEICULO,'
      '   COD_TIPO_COMBUSTIVEL,'
      '   MARCA,'
      '   MODELO,'
      '   ANO_FABRICACAO,'
      '   RENAVAM,'
      '   CHASSI,'
      '   ANO_MODELO,'
      '   COR,'
      '   CAPACIDADE,'
      '   ESPECIE,'
      '   TARA,'
      '   RNTRC)'
      'VALUES ('
      '   :PLACA,'
      '   :CPF_PROPRIETARIO,'
      '   :COD_CATEGORIA_VEICULO,'
      '   :COD_TIPO_VEICULO,'
      '   :COD_TIPO_COMBUSTIVEL,'
      '   :MARCA,'
      '   :MODELO,'
      '   :ANO_FABRICACAO,'
      '   :RENAVAM,'
      '   :CHASSI,'
      '   :ANO_MODELO,'
      '   :COR,'
      '   :CAPACIDADE,'
      '   :ESPECIE,'
      '   :TARA,'
      '   :RNTRC)')
    KeyLinks.Strings = (
      'VEICULO.PLACA')
    OrderingItemNo = 1
    OrderingItems.Strings = (
      'PLACA=VEICULO.PLACA;VEICULO.PLACA DESC'
      
        'CPF_PROPRIETARIO=VEICULO.CPF_PROPRIETARIO;VEICULO.CPF_PROPRIETAR' +
        'IO DESC'
      'NOME=PROPRIETARIO_VEICULO.NOME;PROPRIETARIO_VEICULO.NOME DESC'
      'RENAVAM=VEICULO.RENAVAM;VEICULO.RENAVAM DESC'
      'CAPACIDADE=VEICULO.CAPACIDADE;VEICULO.CAPACIDADE DESC')
    OrderingLinks.Strings = (
      'PLACA=1'
      'CPF_PROPRIETARIO=2'
      'NOME=3'
      'RENAVAM=4'
      'CAPACIDADE=5')
    SearchingLinks.Strings = (
      'PLACA=PLACA'
      'CPF_PROPRIETARIO=CPF_PROPRIETARIO'
      'NOME=NOME'
      'RENAVAM=RENAVAM'
      'CAPACIDADE=CAPACIDADE')
  end
  inherited ImagensPadrao: TImageList
    Bitmap = {
      [encoded data, 8768 characters]
      000000000000}
  end
  inherited uc_Controle_Acesso: TUCControls
    GroupName = 'Cadastro de Ve'#237'culos'
    Left = 4
  end
  object qrCombustivel: TIB_Query
    FieldsCharCase.Strings = (
      'DESCRICAO=UPPER')
    FieldsDisplayLabel.Strings = (
      'DESCRICAO=Descri'#231#227'o')
    FieldsVisible.Strings = (
      'CODIGO=FALSE'
      'DESCRICAO=TRUE')
    IB_Connection = Dados.IB_Conexao
    SQL.Strings = (
      'SELECT TIPO_COMBUSTIVEL.CODIGO'
      '     , TIPO_COMBUSTIVEL.DESCRICAO'
      'FROM TIPO_COMBUSTIVEL')
    KeyLinks.Strings = (
      'TIPO_COMBUSTIVEL.CODIGO')
    OrderingItemNo = 1
    OrderingItems.Strings = (
      'DESCRICAO=DESCRICAO;DESCRICAO DESC')
    OrderingLinks.Strings = (
      'DESCRICAO=1')
    SearchingLinks.Strings = (
      'DESCRICAO=DESCRICAO')
    Left = 320
  end
  object qrTipoVeiculo: TIB_Query
    FieldsDisplayLabel.Strings = (
      'CODIGO=C'#243'digo'
      'DESCRICAO=Descri'#231#227'o')
    FieldsDisplayWidth.Strings = (
      'DESCRICAO=267')
    FieldsVisible.Strings = (
      'CODIGO=FALSE')
    IB_Connection = Dados.IB_Conexao
    SQL.Strings = (
      'SELECT TIPO_VEICULO.CODIGO'
      '     , TIPO_VEICULO.DESCRICAO'
      'FROM TIPO_VEICULO')
    KeyLinks.Strings = (
      'TIPO_VEICULO.CODIGO')
    OrderingItemNo = 1
    OrderingItems.Strings = (
      'DESCRICAO=DESCRICAO;DESCRICAO DESC')
    OrderingLinks.Strings = (
      'DESCRICAO=1')
    SearchingLinks.Strings = (
      'DESCRICAO=DESCRICAO')
    Left = 292
  end
  object qrCategoria: TIB_Query
    FieldsCharCase.Strings = (
      'DESCRICAO=UPPER')
    FieldsDisplayLabel.Strings = (
      'DESCRICAO=Descri'#231#227'o')
    FieldsVisible.Strings = (
      'CODIGO=FALSE')
    IB_Connection = Dados.IB_Conexao
    SQL.Strings = (
      'SELECT CATEGORIA_VEICULO.CODIGO'
      '     , CATEGORIA_VEICULO.DESCRICAO'
      'FROM CATEGORIA_VEICULO')
    KeyLinks.Strings = (
      'CATEGORIA_VEICULO.CODIGO')
    OrderingItemNo = 1
    OrderingItems.Strings = (
      'DESCRICAO=DESCRICAO;DESCRICAO DESC')
    OrderingLinks.Strings = (
      'DESCRICAO=1')
    SearchingLinks.Strings = (
      'DESCRICAO=DESCRICAO')
    Left = 348
  end
  object dsrCombustivel: TIB_DataSource
    Dataset = qrCombustivel
    Left = 320
    Top = 28
  end
  object dsrCategoria: TIB_DataSource
    Dataset = qrCategoria
    Left = 348
    Top = 28
  end
  object dsrTipoVeiculo: TIB_DataSource
    Dataset = qrTipoVeiculo
    Left = 292
    Top = 28
  end
  object qrProprietario: TIB_Query
    FieldsCharCase.Strings = (
      'NOME=UPPER'
      'CPF=UPPER'
      'DATA_NASC=UPPER'
      'TELE1=UPPER'
      'TELE2=UPPER'
      'TELE3=UPPER'
      'ENDERECO_CIDADE=UPPER')
    FieldsDisplayLabel.Strings = (
      'NOME=Nome'
      'CPF=Cpf'
      'DATA_NASC= Data Nasc'
      'TELE1=Tele1'
      'TELE2=Tele2'
      'TELE3=Tele3'
      'ENDERECO_CIDADE=Cidade')
    FieldsEditMask.Strings = (
      'TELE1=(99)9999-9999;0'
      'TELE2=(99)9999-9999;0')
    FieldsVisible.Strings = (
      'NOME=TRUE'
      'CPF=TRUE'
      'DATA_NASC=TRUE'
      'TELE1=TRUE'
      'TELE2=TRUE'
      'TELE3=TRUE'
      'ENDERECO_CIDADE=TRUE')
    IB_Connection = Dados.IB_Conexao
    SQL.Strings = (
      'SELECT NOME'
      '     , CPF'
      '     , DATA_NASC'
      '     , TELE1'
      '     , TELE2'
      '     , TELE3'
      '     , ENDERECO_CIDADE'
      'FROM PROPRIETARIO_VEICULO')
    KeyLinks.Strings = (
      'PROPRIETARIO_VEICULO.CPF')
    OrderingItemNo = 1
    OrderingItems.Strings = (
      'NOME=NOME;NOME DESC'
      'CPF=CPF;CPF DESC'
      'DATA_NASC=DATA_NASC;DATA_NASC DESC'
      'TELE1=TELE1;TELE1 DESC'
      'TELE2=TELE2;TELE2 DESC'
      'TELE3=TELE3;TELE3 DESC'
      'ENDERECO_CIDADE=ENDERECO_CIDADE;ENDERECO_CIDADE DESC')
    OrderingLinks.Strings = (
      'NOME=1'
      'CPF=2'
      'DATA_NASC=3'
      'TELE1=4'
      'TELE2=5'
      'TELE3=6'
      'ENDERECO_CIDADE=7')
    SearchingLinks.Strings = (
      'NOME=NOME'
      'CPF=CPF'
      'DATA_NASC=DATA_NASC'
      'TELE1=TELE1'
      'TELE2=TELE2'
      'TELE3=TELE3'
      'ENDERECO_CIDADE=ENDERECO_CIDADE')
    Left = 386
    Top = 1
  end
  object dsrProprietario: TIB_DataSource
    Dataset = qrProprietario
    Left = 385
    Top = 29
  end
  object qrMotorista: TIB_Query
    FieldsCharCase.Strings = (
      'NOME=UPPER'
      'CPF=UPPER'
      'DATA_VIAGEM=UPPER'
      'DESCRICAO=UPPER')
    FieldsDisplayLabel.Strings = (
      'NOME=Motorista'
      'CPF=Cpf'
      'DATA_VIAGEM=Data '
      'DESCRICAO=Rota')
    FieldsDisplayWidth.Strings = (
      'NOME=225'
      'DESCRICAO=196'
      'DATA_VIAGEM=95')
    FieldsVisible.Strings = (
      'NOME=TRUE'
      'CPF=TRUE'
      'DATA_VIAGEM=TRUE'
      'DESCRICAO=TRUE')
    IB_Connection = Dados.IB_Conexao
    SQL.Strings = (
      'select '
      '       MOTORISTA.NOME'
      '     , MOTORISTA.CPF'
      ''
      '     , MANIFESTO.DATA_VIAGEM'
      '     , ROTA.DESCRICAO'
      ''
      'from MANIFESTO'
      
        '   inner join MOTORISTA on MOTORISTA.CPF = MANIFESTO.CPF_MOTORIS' +
        'TA'
      '   inner join rota on rota.COD_ROTA = MANIFESTO.COD_ROTA'
      ''
      ''
      'where manifesto.PLACA_VEICULO1 = :placa'
      '    or manifesto.PLACA_VEICULO2 = :placa'
      ''
      ''
      'order by MANIFESTO.DATA_VIAGEM desc')
    Left = 426
    Top = 1
    ParamValues = (
      'PLACA=')
  end
  object dsrMotorista: TIB_DataSource
    Dataset = qrMotorista
    Left = 425
    Top = 29
  end
end
