unid_novo_recibo.dfm

System for issue quitter of rental immobile.

object Form_Novo_Recibo: TForm_Novo_Recibo
  Left = 485
  Top = 262
  BorderStyle = bsDialog
  Caption = '.: Emite Novo Recibo :.'
  ClientHeight = 366
  ClientWidth = 592
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poOwnerFormCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object LAB_Data_Nasc: TLabel
    Left = 386
    Top = 64
    Width = 54
    Height = 13
    Caption = 'Data Nasc:'
    FocusControl = DTP_Data_Nasc
  end
  object LAB_Sexo: TLabel
    Left = 486
    Top = 64
    Width = 27
    Height = 13
    Caption = 'Sexo:'
    FocusControl = CBB_Sexo
  end
  object LAB_Estado: TLabel
    Left = 386
    Top = 208
    Width = 36
    Height = 13
    Caption = 'Estado:'
    FocusControl = CBB_Estado
  end
  object LAB_Data_Ref2: TLabel
    Left = 386
    Top = 256
    Width = 71
    Height = 13
    Caption = 'Data Ref - Fim:'
    FocusControl = DTP_Data_Ref2
  end
  object LAB_Data_Ref1: TLabel
    Left = 276
    Top = 256
    Width = 82
    Height = 13
    Caption = 'Data Ref - In'#237'cio:'
    FocusControl = DTP_Data_Ref1
  end
  object LAB_Data_Emissao: TLabel
    Left = 156
    Top = 256
    Width = 68
    Height = 13
    AutoSize = False
    Caption = 'Data Emiss'#227'o:'
    FocusControl = DTP_Data_Emissao
  end
  object LED_Numero_CPF: TLabeledEdit
    Left = 16
    Top = 80
    Width = 150
    Height = 21
    Hint = 'Informe apenas n'#250'meros, com zeros '#224' esquerda, se houver!'
    CharCase = ecUpperCase
    EditLabel.Width = 110
    EditLabel.Height = 13
    EditLabel.Caption = 'N'#250'mero do CPF/CNPJ:'
    MaxLength = 14
    ParentShowHint = False
    ShowHint = True
    TabOrder = 2
    OnKeyPress = SoNumero
  end
  object LED_Numero_RG: TLabeledEdit
    Left = 176
    Top = 80
    Width = 200
    Height = 21
    CharCase = ecUpperCase
    EditLabel.Width = 166
    EditLabel.Height = 13
    EditLabel.Caption = 'N'#250'mero do RG/Inscri'#231#227'o Estadual:'
    MaxLength = 20
    TabOrder = 3
  end
  object LED_Nome: TLabeledEdit
    Left = 16
    Top = 32
    Width = 460
    Height = 21
    CharCase = ecUpperCase
    EditLabel.Width = 93
    EditLabel.Height = 13
    EditLabel.Caption = 'Nome do Locat'#225'rio:'
    MaxLength = 60
    TabOrder = 0
  end
  object LED_End_Logradouro: TLabeledEdit
    Left = 136
    Top = 128
    Width = 300
    Height = 21
    CharCase = ecUpperCase
    EditLabel.Width = 57
    EditLabel.Height = 13
    EditLabel.Caption = 'Logradouro:'
    MaxLength = 30
    TabOrder = 7
  end
  object LED_End_Numero: TLabeledEdit
    Left = 446
    Top = 128
    Width = 60
    Height = 21
    CharCase = ecUpperCase
    EditLabel.Width = 40
    EditLabel.Height = 13
    EditLabel.Caption = 'N'#250'mero:'
    MaxLength = 10
    TabOrder = 8
  end
  object LED_End_Complemento: TLabeledEdit
    Left = 16
    Top = 176
    Width = 200
    Height = 21
    CharCase = ecUpperCase
    EditLabel.Width = 67
    EditLabel.Height = 13
    EditLabel.Caption = 'Complemento:'
    MaxLength = 20
    TabOrder = 9
  end
  object LED_End_Bairro: TLabeledEdit
    Left = 226
    Top = 176
    Width = 210
    Height = 21
    CharCase = ecUpperCase
    EditLabel.Width = 30
    EditLabel.Height = 13
    EditLabel.Caption = 'Bairro:'
    MaxLength = 20
    TabOrder = 10
  end
  object LED_End_CEP: TLabeledEdit
    Left = 16
    Top = 128
    Width = 110
    Height = 21
    Hint = 'Informe apenas n'#250'meros!'
    CharCase = ecUpperCase
    EditLabel.Width = 24
    EditLabel.Height = 13
    EditLabel.Caption = 'CEP:'
    MaxLength = 8
    ParentShowHint = False
    ShowHint = True
    TabOrder = 6
    OnKeyPress = SoNumero
  end
  object LED_End_Cidade: TLabeledEdit
    Left = 16
    Top = 224
    Width = 360
    Height = 21
    CharCase = ecUpperCase
    EditLabel.Width = 36
    EditLabel.Height = 13
    EditLabel.Caption = 'Cidade:'
    MaxLength = 30
    TabOrder = 11
  end
  object LED_Rec_Valor: TLabeledEdit
    Left = 16
    Top = 272
    Width = 130
    Height = 21
    EditLabel.Width = 50
    EditLabel.Height = 13
    EditLabel.Caption = 'Valor - R$:'
    TabOrder = 13
  end
  object DTP_Data_Nasc: TDateTimePicker
    Left = 386
    Top = 80
    Width = 90
    Height = 21
    Date = 0.845243229159677700
    Time = 0.845243229159677700
    TabOrder = 4
  end
  object DTP_Data_Ref1: TDateTimePicker
    Left = 276
    Top = 272
    Width = 100
    Height = 21
    Date = 39917.845243229160000000
    Time = 39917.845243229160000000
    TabOrder = 15
  end
  object DTP_Data_Ref2: TDateTimePicker
    Left = 386
    Top = 272
    Width = 100
    Height = 21
    Date = 39917.845243229160000000
    Time = 39917.845243229160000000
    TabOrder = 16
  end
  object DTP_Data_Emissao: TDateTimePicker
    Left = 156
    Top = 272
    Width = 110
    Height = 21
    Date = 39917.845243229160000000
    Time = 39917.845243229160000000
    TabOrder = 14
  end
  object CBB_Sexo: TComboBox
    Left = 486
    Top = 80
    Width = 80
    Height = 21
    Style = csDropDownList
    ItemHeight = 13
    ItemIndex = 0
    TabOrder = 5
    Text = 'Masculino'
    Items.Strings = (
      'Masculino'
      'Feminino')
  end
  object CBB_Estado: TComboBox
    Left = 386
    Top = 224
    Width = 50
    Height = 21
    Style = csDropDownList
    ItemHeight = 13
    ItemIndex = 6
    TabOrder = 12
    Text = 'DF'
    Items.Strings = (
      'AC'
      'AL'
      'AM'
      'AP'
      'BA'
      'CE'
      'DF'
      'ES'
      'GO'
      'MA'
      'MG'
      'MS'
      'MT'
      'PA'
      'PB'
      'PE'
      'PI'
      'PR'
      'RJ'
      'RN'
      'RO'
      'RR'
      'RS'
      'SC'
      'SE'
      'SP'
      'TO')
  end
  object BIT_Cancela: TBitBtn
    Left = 376
    Top = 320
    Width = 90
    Height = 25
    Caption = 'Cancelar'
    TabOrder = 17
    Kind = bkCancel
  end
  object BIT_Salva: TBitBtn
    Left = 476
    Top = 320
    Width = 90
    Height = 25
    Caption = 'Salvar'
    TabOrder = 18
    OnClick = BIT_SalvaClick
    Kind = bkOK
  end
  object LED_Rec_Numero: TLabeledEdit
    Left = 486
    Top = 32
    Width = 80
    Height = 21
    Color = clAqua
    EditLabel.Width = 77
    EditLabel.Height = 13
    EditLabel.Caption = 'N'#250'mero Recibo:'
    MaxLength = 6
    TabOrder = 1
  end
end