home *** CD-ROM | disk | FTP | other *** search
/ Chip Hitware 6 A / CHIP_HITWARE6_A.iso / edukacja / AstroMart / _SETUP.1 / Astro5.exe / 0 / RCDATA / TTEXTVIEWER / TTEXTVIEWER.txt
Encoding:
Text File  |  1998-05-13  |  4.5 KB  |  186 lines
  1. object TextViewer: TTextViewer
  2.   Left = 198
  3.   Top = 130
  4.   AutoScroll = False
  5.   Caption = 'TextViewer'
  6.   ClientHeight = 347
  7.   ClientWidth = 552
  8.   Font.Color = clWindowText
  9.   Font.Height = -11
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = []
  12.   FormStyle = fsMDIChild
  13.   PopupMenu = ContextMenu
  14.   Position = poDefault
  15.   Visible = True
  16.   WindowState = wsMaximized
  17.   OnClose = FormClose
  18.   OnCreate = FormCreate
  19.   OnMouseDown = FormMouseDown
  20.   PixelsPerInch = 96
  21.   TextHeight = 13
  22.   object RichEdit: TGWRichEdit
  23.     Left = 0
  24.     Top = 29
  25.     Width = 552
  26.     Height = 318
  27.     TabStop = False
  28.     Align = alClient
  29.     Font.Color = clBlack
  30.     Font.Height = -15
  31.     Font.Name = 'MS Sans Serif'
  32.     Font.Style = []
  33.     HideSelection = False
  34.     ParentFont = False
  35.     ScrollBars = ssVertical
  36.     TabOrder = 0
  37.     OnSelectionChange = RichEditSelectionChange
  38.     Margins.Units = muMillimeters
  39.   end
  40.   object FormatPanel: TPanel
  41.     Left = 0
  42.     Top = 0
  43.     Width = 552
  44.     Height = 29
  45.     Align = alTop
  46.     TabOrder = 1
  47.     object FontBtn: TSpeedButton
  48.       Left = 254
  49.       Top = 2
  50.       Width = 25
  51.       Height = 25
  52.       Hint = 'Font'
  53.       Glyph.Data = {
  54.         76010000424D7601000000000000760000002800000020000000100000000100
  55.         04000000000000010000130B0000130B00000000000000000000000000000000
  56.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  57.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  58.         3333333333333333333333333333333333333333FFF33FFFFF33333300033000
  59.         00333337773377777333333330333300033333337FF33777F333333330733300
  60.         0333333377FFF777F33333333700000073333333777777773333333333033000
  61.         3333333337FF777F333333333307300033333333377F777F3333333333703007
  62.         33333333377F7773333333333330000333333333337777F33333333333300003
  63.         33333333337777F3333333333337007333333333337777333333333333330033
  64.         3333333333377333333333333333033333333333333733333333333333333333
  65.         3333333333333333333333333333333333333333333333333333}
  66.       NumGlyphs = 2
  67.       OnClick = FontBtnClick
  68.     end
  69.     object BoldBtn: TSpeedButton
  70.       Left = 286
  71.       Top = 2
  72.       Width = 25
  73.       Height = 25
  74.       Hint = 'Font'
  75.       AllowAllUp = True
  76.       GroupIndex = 1
  77.       Caption = 'b'
  78.       Font.Color = clBlack
  79.       Font.Height = -16
  80.       Font.Name = 'MS Sans Serif'
  81.       Font.Style = [fsBold]
  82.       NumGlyphs = 2
  83.       ParentFont = False
  84.       OnClick = BoldBtnClick
  85.     end
  86.     object ItalicBtn: TSpeedButton
  87.       Left = 310
  88.       Top = 2
  89.       Width = 25
  90.       Height = 25
  91.       Hint = 'Font'
  92.       AllowAllUp = True
  93.       GroupIndex = 2
  94.       Caption = 'i'
  95.       Font.Color = clBlack
  96.       Font.Height = -16
  97.       Font.Name = 'MS Sans Serif'
  98.       Font.Style = [fsItalic]
  99.       NumGlyphs = 2
  100.       ParentFont = False
  101.       OnClick = ItalicBtnClick
  102.     end
  103.     object UnderlineBtn: TSpeedButton
  104.       Left = 334
  105.       Top = 2
  106.       Width = 25
  107.       Height = 25
  108.       Hint = 'Font'
  109.       AllowAllUp = True
  110.       GroupIndex = 3
  111.       Caption = 'u'
  112.       Font.Color = clBlack
  113.       Font.Height = -16
  114.       Font.Name = 'MS Sans Serif'
  115.       Font.Style = [fsUnderline]
  116.       NumGlyphs = 2
  117.       ParentFont = False
  118.       OnClick = UnderlineBtnClick
  119.     end
  120.     object FontName: TComboBox
  121.       Left = 2
  122.       Top = 4
  123.       Width = 131
  124.       Height = 21
  125.       ItemHeight = 13
  126.       TabOrder = 0
  127.       OnChange = FontNameChange
  128.     end
  129.     object FontSize: TSpinEdit
  130.       Left = 200
  131.       Top = 4
  132.       Width = 49
  133.       Height = 22
  134.       MaxValue = 256
  135.       MinValue = 0
  136.       TabOrder = 1
  137.       Value = 11
  138.       OnChange = FontSizeChange
  139.     end
  140.     object CharSet: TComboBox
  141.       Left = 134
  142.       Top = 4
  143.       Width = 67
  144.       Height = 21
  145.       ItemHeight = 13
  146.       TabOrder = 2
  147.       OnChange = CharSetChange
  148.     end
  149.   end
  150.   object ContextMenu: TPopupMenu
  151.     OnPopup = FillContextMenu
  152.     Left = 120
  153.     Top = 152
  154.     object InfoPopup: TMenuItem
  155.       Caption = 'Info'
  156.       ShortCut = 0
  157.       OnClick = InfoPopupClick
  158.     end
  159.     object CopyPopup: TMenuItem
  160.       Caption = 'Copy'
  161.       ShortCut = 0
  162.       OnClick = CopyClick
  163.     end
  164.     object CopyallPopup: TMenuItem
  165.       Caption = 'Copy all'
  166.       ShortCut = 0
  167.       OnClick = CopyallClick
  168.     end
  169.     object PastePopup: TMenuItem
  170.       Caption = 'Paste'
  171.       ShortCut = 0
  172.       OnClick = PasteClick
  173.     end
  174.   end
  175.   object FontDialog1: TFontDialog
  176.     Font.Color = clWindowText
  177.     Font.Height = -11
  178.     Font.Name = 'MS Sans Serif'
  179.     Font.Style = []
  180.     MinFontSize = 0
  181.     MaxFontSize = 0
  182.     Left = 262
  183.     Top = 150
  184.   end
  185. end
  186.