home *** CD-ROM | disk | FTP | other *** search
/ Mundo do CD-ROM 11 / CDROM11.iso / entrete / qmagico / _setup.1 / Magicos.exe / 0 / RCDATA / TCRIACAO / TCRIACAO.txt
Encoding:
Text File  |  1997-05-25  |  4.2 KB  |  241 lines
  1. object Criacao: TCriacao
  2.   Left = 231
  3.   Top = 157
  4.   BorderStyle = bsDialog
  5.   Caption = 'Cria∩┐╜∩┐╜o de Arquivo'
  6.   ClientHeight = 185
  7.   ClientWidth = 382
  8.   Color = cl3DLight
  9.   Font.Color = clWindowText
  10.   Font.Height = -11
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = []
  13.   Position = poScreenCenter
  14.   PixelsPerInch = 96
  15.   TextHeight = 13
  16.   object Bevel1: TBevel
  17.     Left = 8
  18.     Top = 8
  19.     Width = 281
  20.     Height = 161
  21.     Shape = bsFrame
  22.   end
  23.   object Label1: TLabel
  24.     Left = 24
  25.     Top = 40
  26.     Width = 27
  27.     Height = 14
  28.     Caption = 'Nome'
  29.     Color = cl3DLight
  30.     Font.Color = clBlack
  31.     Font.Height = -11
  32.     Font.Name = 'Arial'
  33.     Font.Style = []
  34.     ParentColor = False
  35.     ParentFont = False
  36.   end
  37.   object Label2: TLabel
  38.     Left = 184
  39.     Top = 112
  40.     Width = 94
  41.     Height = 14
  42.     Caption = 'Ano de Nascimento'
  43.     Color = cl3DLight
  44.     Font.Color = clBlack
  45.     Font.Height = -11
  46.     Font.Name = 'Arial'
  47.     Font.Style = []
  48.     ParentColor = False
  49.     ParentFont = False
  50.   end
  51.   object Label3: TLabel
  52.     Left = 24
  53.     Top = 112
  54.     Width = 94
  55.     Height = 14
  56.     Caption = 'M∩┐╜s do Nascimento'
  57.     Color = cl3DLight
  58.     Font.Color = clBlack
  59.     Font.Height = -11
  60.     Font.Name = 'Arial'
  61.     Font.Style = []
  62.     ParentColor = False
  63.     ParentFont = False
  64.   end
  65.   object Label4: TLabel
  66.     Left = 24
  67.     Top = 72
  68.     Width = 89
  69.     Height = 14
  70.     Caption = 'Dia do Nascimento'
  71.     Color = cl3DLight
  72.     Font.Color = clBlack
  73.     Font.Height = -11
  74.     Font.Name = 'Arial'
  75.     Font.Style = []
  76.     ParentColor = False
  77.     ParentFont = False
  78.   end
  79.   object OKBtn: TButton
  80.     Left = 300
  81.     Top = 8
  82.     Width = 75
  83.     Height = 25
  84.     Caption = 'OK'
  85.     Default = True
  86.     ModalResult = 1
  87.     TabOrder = 4
  88.     OnClick = OKBtnClick
  89.   end
  90.   object CancelBtn: TButton
  91.     Left = 300
  92.     Top = 38
  93.     Width = 75
  94.     Height = 25
  95.     Cancel = True
  96.     Caption = 'Cancel'
  97.     ModalResult = 2
  98.     TabOrder = 5
  99.     OnClick = CancelBtnClick
  100.   end
  101.   object Edit1: TEdit
  102.     Left = 64
  103.     Top = 32
  104.     Width = 209
  105.     Height = 21
  106.     Ctl3D = True
  107.     MaxLength = 15
  108.     ParentCtl3D = False
  109.     ParentShowHint = False
  110.     ShowHint = False
  111.     TabOrder = 0
  112.     Text = 'NovoNome'
  113.     OnEnter = Edit1Enter
  114.     OnExit = Edit1Exit
  115.   end
  116.   object Edit2: TEdit
  117.     Left = 200
  118.     Top = 136
  119.     Width = 65
  120.     Height = 21
  121.     MaxLength = 4
  122.     TabOrder = 3
  123.     Text = '1990'
  124.     OnExit = Edit2Exit
  125.   end
  126.   object ListBox1: TListBox
  127.     Left = 120
  128.     Top = 64
  129.     Width = 49
  130.     Height = 33
  131.     ItemHeight = 13
  132.     Items.Strings = (
  133.       '1'
  134.       '2'
  135.       '3'
  136.       '4'
  137.       '5'
  138.       '6'
  139.       '7'
  140.       '8'
  141.       '9'
  142.       '10'
  143.       '11'
  144.       '12'
  145.       '13'
  146.       '14'
  147.       '15'
  148.       '16'
  149.       '17'
  150.       '18'
  151.       '19'
  152.       '20'
  153.       '21'
  154.       '22'
  155.       '23'
  156.       '24'
  157.       '25'
  158.       '26'
  159.       '27'
  160.       '28'
  161.       '29'
  162.       '30'
  163.       '31')
  164.     TabOrder = 1
  165.   end
  166.   object ListBox2: TListBox
  167.     Left = 24
  168.     Top = 128
  169.     Width = 89
  170.     Height = 33
  171.     ItemHeight = 13
  172.     Items.Strings = (
  173.       'janeiro'
  174.       'fevereiro'
  175.       'mar∩┐╜o'
  176.       'abril'
  177.       'maio'
  178.       'junho'
  179.       'julho'
  180.       'agosto'
  181.       'setembro'
  182.       'outubro'
  183.       'novembro'
  184.       'dezembro')
  185.     TabOrder = 2
  186.   end
  187.   object Panel1: TPanel
  188.     Left = 8
  189.     Top = 56
  190.     Width = 361
  191.     Height = 105
  192.     BevelWidth = 6
  193.     BorderWidth = 1
  194.     BorderStyle = bsSingle
  195.     Color = clTeal
  196.     Font.Color = clWhite
  197.     Font.Height = -12
  198.     Font.Name = 'VAG Rounded Th'
  199.     Font.Style = [fsBold]
  200.     ParentFont = False
  201.     TabOrder = 6
  202.     Visible = False
  203.     object Label5: TLabel
  204.       Left = 72
  205.       Top = 17
  206.       Width = 212
  207.       Height = 14
  208.       Caption = 'J∩┐╜ EXISTE UM ARQUIVO COM ESTE NOME !'
  209.       Visible = False
  210.     end
  211.     object Label6: TLabel
  212.       Left = 112
  213.       Top = 40
  214.       Width = 109
  215.       Height = 14
  216.       Caption = 'DESEJA CONTINUAR ?'
  217.       Visible = False
  218.     end
  219.     object Button1: TButton
  220.       Left = 104
  221.       Top = 64
  222.       Width = 49
  223.       Height = 25
  224.       Caption = 'SIM'
  225.       TabOrder = 0
  226.       Visible = False
  227.       OnClick = Button1Click
  228.     end
  229.     object Button2: TButton
  230.       Left = 200
  231.       Top = 64
  232.       Width = 49
  233.       Height = 25
  234.       Caption = 'N∩┐╜O'
  235.       TabOrder = 1
  236.       Visible = False
  237.       OnClick = Button2Click
  238.     end
  239.   end
  240. end
  241.