home *** CD-ROM | disk | FTP | other *** search
/ Techno Guide - Aspettando Windows 98 / TechnoGuide.iso / applicaz / snotetab / notetab.exe / 0 / RCDATA / TFRMFONTDIALOG / TFRMFONTDIALOG.txt < prev   
Text File  |  1998-01-25  |  6KB  |  287 lines
  1. object frmFontDialog: TfrmFontDialog
  2.   Left = 252
  3.   Top = 98
  4.   Hint = '|Font'
  5.   HorzScrollBar.Visible = False
  6.   VertScrollBar.Visible = False
  7.   BorderIcons = [biSystemMenu]
  8.   AutoScroll = False
  9.   Caption = 'Font'
  10.   ClientHeight = 253
  11.   ClientWidth = 385
  12.   Font.Color = clBlack
  13.   Font.Height = -11
  14.   Font.Name = 'MS Sans Serif'
  15.   Font.Style = []
  16.   FormStyle = fsStayOnTop
  17.   Icon.Data = {<image000.ico>}
  18.   Position = poScreenCenter
  19.   Scaled = False
  20.   OnClose = FormClose
  21.   OnDestroy = FormDestroy
  22.   PixelsPerInch = 96
  23.   TextHeight = 13
  24.   object Label1: TLabel
  25.     Left = 264
  26.     Top = 92
  27.     Width = 97
  28.     Height = 13
  29.     AutoSize = False
  30.     Caption = 'Font Preview:'
  31.   end
  32.   object lbledt_lbxFont: TEnhLabel
  33.     Left = 8
  34.     Top = 8
  35.     Width = 24
  36.     Height = 13
  37.     Caption = '&Font:'
  38.     FocusControl = edt_lbxFont
  39.   end
  40.   object lbledt_lbxSize: TEnhLabel
  41.     Left = 192
  42.     Top = 8
  43.     Width = 23
  44.     Height = 13
  45.     Caption = '&Size:'
  46.     FocusControl = edt_lbxSize
  47.   end
  48.   object btnOk: TBitBtn
  49.     Left = 296
  50.     Top = 190
  51.     Width = 81
  52.     Height = 25
  53.     Hint = '|Accept selected font and close dialog box'
  54.     Caption = 'OK'
  55.     Default = True
  56.     Enabled = False
  57.     ModalResult = 1
  58.     TabOrder = 5
  59.     OnClick = btnOkClick
  60.     NumGlyphs = 2
  61.     Spacing = -1
  62.   end
  63.   object btnCancel: TBitBtn
  64.     Left = 296
  65.     Top = 218
  66.     Width = 81
  67.     Height = 25
  68.     Hint = '|Cancel font  dialog box'
  69.     Cancel = True
  70.     Caption = 'Cancel'
  71.     ModalResult = 2
  72.     TabOrder = 6
  73.     OnClick = btnCancelClick
  74.     NumGlyphs = 2
  75.     Spacing = -1
  76.   end
  77.   object edtFontPreview: TLblMemo
  78.     Left = 264
  79.     Top = 112
  80.     Width = 113
  81.     Height = 57
  82.     Hint = '|Shows currently selected font'
  83.     TabStop = False
  84.     Font.Color = clWindow
  85.     Font.Height = -13
  86.     Font.Name = 'MS Sans Serif'
  87.     Font.Style = []
  88.     Lines.Strings = (
  89.       'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
  90.       'abcdefghijklmnopqrstuvwxyz'
  91.       '1234567890'
  92.       'Preview Font and Size')
  93.     ParentFont = False
  94.     PopupMenu = ef_InputBoxMenu
  95.     ReadOnly = True
  96.     TabOrder = 7
  97.     WordWrap = False
  98.     OverwriteMode = False
  99.     UndoWhenEsc = False
  100.     WindowsUndo = False
  101.     TabUnits = luInches
  102.     LabelRelLeft = 0
  103.     LabelRelTop = 0
  104.   end
  105.   object lbxFont: TInputListBox
  106.     Left = 8
  107.     Top = 56
  108.     Width = 169
  109.     Height = 185
  110.     Hint = '|Available fonts'
  111.     ItemHeight = 13
  112.     Sorted = True
  113.     TabOrder = 1
  114.     AllowToggle = False
  115.     CaseSensitive = False
  116.     CustomColor = clBlack
  117.     DestroyObjects = False
  118.     ReadOnly = False
  119.     ScrollWidth = 0
  120.     UndoWhenEsc = False
  121.     TabUnits = luInches
  122.     OnChange = FontNameChanged
  123.     AddNewToList = False
  124.     AutoCheckInput = False
  125.     LimitToList = True
  126.     ResetFocus = True
  127.     Editor = edt_lbxFont
  128.     EditorMargin = 6
  129.     ShowEditor = True
  130.   end
  131.   object edt_lbxFont: TLblEdit
  132.     Left = 8
  133.     Top = 29
  134.     Width = 169
  135.     Height = 21
  136.     PopupMenu = ef_InputBoxMenu
  137.     TabOrder = 0
  138.     OverwriteMode = False
  139.     UndoWhenEsc = False
  140.     WordWrap = False
  141.     LabelPos = lpTop
  142.     LabelComponent = lbledt_lbxFont
  143.     LabelRelLeft = 0
  144.     LabelRelTop = -21
  145.   end
  146.   object lbxSize: TInputListBox
  147.     Left = 192
  148.     Top = 56
  149.     Width = 57
  150.     Height = 185
  151.     Hint = 
  152.       '|Available sizes for current font (True Type fonts can be any si' +
  153.       'ze)'
  154.     ItemHeight = 13
  155.     TabOrder = 3
  156.     AllowToggle = False
  157.     CaseSensitive = False
  158.     CustomColor = clBlack
  159.     DestroyObjects = False
  160.     ReadOnly = False
  161.     ScrollWidth = 0
  162.     UndoWhenEsc = False
  163.     TabUnits = luInches
  164.     OnChange = SizeChanged
  165.     AddNewToList = False
  166.     LimitToList = False
  167.     ResetFocus = False
  168.     Editor = edt_lbxSize
  169.     EditorMargin = 6
  170.     ShowEditor = True
  171.     OnEdited = SizeChanged
  172.   end
  173.   object edt_lbxSize: TLblEdit
  174.     Left = 192
  175.     Top = 29
  176.     Width = 57
  177.     Height = 21
  178.     Hint = '|Enter a font size (True Type fonts can be any size)'
  179.     PopupMenu = ef_InputBoxMenu
  180.     TabOrder = 2
  181.     OnKeyPress = edtSizeKeyPress
  182.     OverwriteMode = False
  183.     UndoWhenEsc = False
  184.     WordWrap = False
  185.     LabelPos = lpTop
  186.     LabelComponent = lbledt_lbxSize
  187.     LabelRelLeft = 0
  188.     LabelRelTop = -21
  189.   end
  190.   object gbxStyle: TGroupBox
  191.     Left = 264
  192.     Top = 20
  193.     Width = 113
  194.     Height = 61
  195.     Caption = 'Style'
  196.     TabOrder = 4
  197.     object cbxBold: TCheckBox
  198.       Left = 8
  199.       Top = 16
  200.       Width = 73
  201.       Height = 17
  202.       Hint = '|Set bold style'
  203.       Caption = '&Bold'
  204.       TabOrder = 0
  205.       OnClick = cbxBoldClick
  206.     end
  207.     object cbxItalic: TCheckBox
  208.       Left = 8
  209.       Top = 36
  210.       Width = 73
  211.       Height = 17
  212.       Hint = '|Set italic style'
  213.       Caption = '&Italic'
  214.       TabOrder = 1
  215.       OnClick = cbxItalicClick
  216.     end
  217.   end
  218.   object InputBoxMaster1: TInputBoxMaster
  219.     InputBoxMenu = ef_InputBoxMenu
  220.     OverwriteMode = False
  221.     UseContextMenu = True
  222.     Left = 24
  223.     Top = 176
  224.   end
  225.   object ef_InputBoxMenu: TInputBoxMenu
  226.     Left = 24
  227.     Top = 208
  228.     object ef_InputBoxMenu_Undo: TMenuItem
  229.       Caption = '&Undo'
  230.       Hint = 'Undo changes to input text'
  231.       ShortCut = 0
  232.     end
  233.     object ef_InputBoxMenu_Overwrite: TMenuItem
  234.       Tag = 1
  235.       Caption = '&Overwrite Mode'
  236.       Hint = 'Toggle Insert/Overwrite mode'
  237.       ShortCut = 0
  238.     end
  239.     object ef_InputBoxMenu_Break1: TMenuItem
  240.       Tag = 2
  241.       Caption = '-'
  242.       ShortCut = 0
  243.     end
  244.     object ef_InputBoxMenu_Cut: TMenuItem
  245.       Tag = 3
  246.       Caption = 'Cu&t'
  247.       Hint = 'Cut selected text to clipboard'
  248.       ShortCut = 0
  249.     end
  250.     object ef_InputBoxMenu_Copy: TMenuItem
  251.       Tag = 4
  252.       Caption = '&Copy'
  253.       Hint = 'Copy selected text to clipboard'
  254.       ShortCut = 0
  255.     end
  256.     object ef_InputBoxMenu_Paste: TMenuItem
  257.       Tag = 5
  258.       Caption = '&Paste'
  259.       Hint = 'Paste text from clipboard to input box'
  260.       ShortCut = 0
  261.     end
  262.     object ef_InputBoxMenu_Delete: TMenuItem
  263.       Tag = 6
  264.       Caption = '&Delete'
  265.       Hint = 'Delete selected text'
  266.       ShortCut = 0
  267.     end
  268.     object ef_InputBoxMenu_Clear: TMenuItem
  269.       Tag = 7
  270.       Caption = 'C&lear All'
  271.       Hint = 'Clear all text from input box'
  272.       ShortCut = 0
  273.     end
  274.     object ef_InputBoxMenu_Break2: TMenuItem
  275.       Tag = 8
  276.       Caption = '-'
  277.       ShortCut = 0
  278.     end
  279.     object ef_InputBoxMenu_SelectAll: TMenuItem
  280.       Tag = 9
  281.       Caption = 'Select &All'
  282.       Hint = 'Select all text in input box'
  283.       ShortCut = 0
  284.     end
  285.   end
  286. end
  287.