home *** CD-ROM | disk | FTP | other *** search
/ QBasic & Borland Pascal & C / Delphi5.iso / Delphi.5 / Samples / sourceD5 / browutil.exe / BROWSER / TEXTEDIT.DFM / TEXTEDIT.txt < prev   
Encoding:
Text File  |  1999-04-20  |  2.0 KB  |  94 lines
  1. object FrmTextEdit: TFrmTextEdit
  2.   Left = 183
  3.   Top = 177
  4.   Width = 460
  5.   Height = 280
  6.   Caption = 'Editor'
  7.   Color = clBtnFace
  8.   Font.Charset = DEFAULT_CHARSET
  9.   Font.Color = clWindowText
  10.   Font.Height = -11
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = []
  13.   FormStyle = fsMDIChild
  14.   Icon.Data = {<image000.ico>}
  15.   OldCreateOrder = True
  16.   Position = poDefault
  17.   Visible = True
  18.   OnActivate = FormActivate
  19.   OnClose = FormClose
  20.   OnDestroy = FormDestroy
  21.   PixelsPerInch = 96
  22.   TextHeight = 13
  23.   object RichEdit1: TRichEdit
  24.     Left = 0
  25.     Top = 0
  26.     Width = 452
  27.     Height = 253
  28.     Align = alClient
  29.     Lines.Strings = (
  30.       'RichEdit1')
  31.     PlainText = True
  32.     PopupMenu = PopupMenu1
  33.     TabOrder = 0
  34.   end
  35.   object PopupMenu1: TPopupMenu
  36.     Left = 192
  37.     Top = 48
  38.     object Print1: TMenuItem
  39.       Caption = 'Print'
  40.       OnClick = Print1Click
  41.     end
  42.     object FindText1: TMenuItem
  43.       Caption = 'Find Text'
  44.       ShortCut = 16454
  45.       OnClick = FindText1Click
  46.     end
  47.     object N1: TMenuItem
  48.       Caption = '-'
  49.     end
  50.     object Upper1: TMenuItem
  51.       Caption = 'Upper'
  52.       OnClick = Upper1Click
  53.     end
  54.     object Lower1: TMenuItem
  55.       Caption = 'Lower'
  56.     end
  57.     object UpperLower1: TMenuItem
  58.       Caption = 'Upper-Lower'
  59.     end
  60.     object N2: TMenuItem
  61.       Caption = '-'
  62.     end
  63.     object Font1: TMenuItem
  64.       Caption = '&Font'
  65.       OnClick = Font1Click
  66.     end
  67.   end
  68.   object FindDialog1: TFindDialog
  69.     OnFind = FindDialog1Find
  70.     Left = 200
  71.     Top = 176
  72.   end
  73.   object SaveDialog1: TSaveDialog
  74.     DefaultExt = 'TXT'
  75.     Filter = 'Text Doctument (*.txt)|*.txt|All Files (*.*)|*.*'
  76.     Title = 'Save As File'
  77.     Left = 336
  78.     Top = 96
  79.   end
  80.   object FontDialog1: TFontDialog
  81.     Font.Charset = DEFAULT_CHARSET
  82.     Font.Color = clWindowText
  83.     Font.Height = -11
  84.     Font.Name = 'MS Sans Serif'
  85.     Font.Style = []
  86.     MinFontSize = 0
  87.     MaxFontSize = 0
  88.     Options = [fdEffects, fdApplyButton]
  89.     OnApply = FontDialog1Apply
  90.     Left = 56
  91.     Top = 96
  92.   end
  93. end
  94.