home *** CD-ROM | disk | FTP | other *** search
/ Mundo do CD-ROM 11 / CDROM11.iso / entrete / qmagico / _setup.1 / Magicos.exe / 0 / RCDATA / TFORMDI / TFORMDI.txt
Encoding:
Text File  |  1997-05-25  |  2.2 KB  |  100 lines
  1. object FORMDI: TFORMDI
  2.   Left = 200
  3.   Top = 117
  4.   Width = 600
  5.   Height = 440
  6.   BorderIcons = [biSystemMenu, biMinimize, biMaximize, biHelp]
  7.   Caption = 'MAPA DO QUADRADO M∩┐╜GICO'
  8.   Ctl3D = False
  9.   Color = clAppWorkSpace
  10.   Font.Color = clWindowText
  11.   Font.Height = -11
  12.   Font.Name = 'MS Sans Serif'
  13.   Font.Style = []
  14.   FormStyle = fsMDIForm
  15.   KeyPreview = True
  16.   Menu = MainMenu1
  17.   Position = poScreenCenter
  18.   ShowHint = True
  19.   Visible = True
  20.   OnActivate = FormActivate
  21.   PixelsPerInch = 96
  22.   TextHeight = 13
  23.   object Button1: TButton
  24.     Left = 208
  25.     Top = 272
  26.     Width = 185
  27.     Height = 25
  28.     Caption = 'FA∩┐╜A SEU MAPA'
  29.     Font.Color = clBlack
  30.     Font.Height = -11
  31.     Font.Name = 'VAG Rounded Th'
  32.     Font.Style = [fsBold]
  33.     ParentFont = False
  34.     TabOrder = 0
  35.     OnClick = Button1Click
  36.   end
  37.   object MainMenu1: TMainMenu
  38.     Left = 16
  39.     object Arquivo1: TMenuItem
  40.       Caption = '&Arquivo'
  41.       GroupIndex = 1
  42.       ShortCut = 0
  43.       object Abrir1: TMenuItem
  44.         Caption = 'A&brir'
  45.         ShortCut = 16449
  46.         OnClick = Abrir1Click
  47.       end
  48.       object Novo1: TMenuItem
  49.         Caption = '&Novo'
  50.         ShortCut = 16462
  51.         OnClick = Novo1Click
  52.       end
  53.       object Sair1: TMenuItem
  54.         Caption = '&Sair'
  55.         ShortCut = 16472
  56.         OnClick = Sair1Click
  57.       end
  58.     end
  59.     object Ajuda1: TMenuItem
  60.       Caption = 'Aju&da'
  61.       GroupIndex = 10
  62.       ShortCut = 0
  63.       object HELP1: TMenuItem
  64.         Caption = '&Help'
  65.         ShortCut = 112
  66.         OnClick = HELP1Click
  67.       end
  68.       object Sobre1: TMenuItem
  69.         Caption = '&Sobre'
  70.         ShortCut = 0
  71.         OnClick = Sobre1Click
  72.       end
  73.       object N1: TMenuItem
  74.         Caption = '-'
  75.         ShortCut = 0
  76.       end
  77.       object Avisoimportante1: TMenuItem
  78.         Caption = 'A&viso importante'
  79.         ShortCut = 0
  80.         OnClick = Avisoimportante1Click
  81.       end
  82.       object N2: TMenuItem
  83.         Caption = '-'
  84.         ShortCut = 0
  85.       end
  86.       object Registro1: TMenuItem
  87.         Caption = '&Registro'
  88.         ShortCut = 0
  89.         OnClick = Registro1Click
  90.       end
  91.     end
  92.   end
  93.   object FileOpenDialog: TOpenDialog
  94.     FileEditStyle = fsEdit
  95.     Filter = 'Arquivos M∩┐╜gicos|*.num'
  96.     Options = [ofFileMustExist]
  97.     Left = 96
  98.   end
  99. end
  100.