object frmSettings: TfrmSettings Left = 518 Top = 203 ActiveControl = btnOK BorderIcons = [biSystemMenu, biHelp] BorderStyle = bsSingle Caption = 'Settings' ClientHeight = 387 ClientWidth = 334 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] Icon.Data = {} OldCreateOrder = True Position = poScreenCenter OnClose = FormClose OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object pnlPages: TPanel Left = 0 Top = 0 Width = 334 Height = 356 Align = alClient BevelOuter = bvNone BorderWidth = 4 ParentColor = True TabOrder = 0 object pgcSheets: TPageControl Left = 4 Top = 4 Width = 326 Height = 348 ActivePage = tbsWMFEMF Align = alClient TabOrder = 0 object tbsGeneral: TTabSheet Caption = ' General ' ImageIndex = -1 object Bevel3: TBevel Left = 8 Top = 23 Width = 300 Height = 9 Shape = bsTopLine end object lblFontAlterations: TLabel Left = 10 Top = 8 Width = 77 Height = 13 Caption = 'Font Alterations' end object lblCommands: TLabel Left = 10 Top = 92 Width = 52 Height = 13 Caption = 'Commands' end object Bevel4: TBevel Left = 8 Top = 107 Width = 300 Height = 9 Shape = bsTopLine end object ckbConfirmFontDelete: TCheckBox Left = 16 Top = 32 Width = 284 Height = 17 Hint = 'Confirms a font delete.' HelpContext = 8105 Caption = '&Confirm Font Delete' TabOrder = 0 OnClick = cmbEditorFontsChange end object ckbInstallToFontsFolder: TCheckBox Left = 16 Top = 57 Width = 284 Height = 17 Hint = 'Copies installed fonts to Fonts Folder.' HelpContext = 8110 Caption = '&Install fonts into Fonts Folder' TabOrder = 1 OnClick = cmbEditorFontsChange end object ckbPrintImmediately: TCheckBox Left = 16 Top = 116 Width = 284 Height = 17 Hint = 'Confirms a font delete.' HelpContext = 8115 Caption = #39'&Print'#39' speedbutton prints immediately' Checked = True State = cbChecked TabOrder = 2 OnClick = cmbEditorFontsChange end end object tbsLayout: TTabSheet Caption = ' Layout ' object Bevel1: TBevel Left = 8 Top = 23 Width = 300 Height = 9 Shape = bsTopLine end object lblEditor: TLabel Left = 10 Top = 8 Width = 28 Height = 13 Caption = 'Editor' end object lblEditorFont: TLabel Left = 16 Top = 36 Width = 22 Height = 13 Caption = '&Font' FocusControl = cmbEditorFonts Layout = tlCenter end object lblForegroundColor: TLabel Left = 16 Top = 70 Width = 120 Height = 13 Caption = 'Foreground Color (&texts)' FocusControl = colbtnTextColor Layout = tlCenter end object lblWindowColor: TLabel Left = 16 Top = 98 Width = 136 Height = 13 Caption = '&Background Color (windows)' FocusControl = colbtnWindowColor Layout = tlCenter end object lblVisualDesign: TLabel Left = 10 Top = 165 Width = 62 Height = 13 Caption = 'Visual Design' end object Bevel2: TBevel Left = 8 Top = 180 Width = 300 Height = 9 Shape = bsTopLine end object lblCompareInformal: TLabel Left = 16 Top = 128 Width = 114 Height = 13 Caption = '&Compare Informal Color' FocusControl = colbtnCompareInformal Layout = tlCenter end object cmbEditorFonts: TComboBox Left = 88 Top = 32 Width = 212 Height = 22 Hint = 'Selects font for use in windows.' HelpContext = 8205 Style = csOwnerDrawFixed ItemHeight = 16 TabOrder = 0 OnChange = cmbEditorFontsChange OnDrawItem = cmbEditorFontsDrawItem end object colbtnTextColor: TDFSColorButton Left = 252 Top = 66 Width = 48 Height = 21 Hint = 'Selects color of text (foreground).' HelpContext = 8210 TabOrder = 1 OtherBtnCaption = '&Other' OtherColor = clBtnFace PaletteColors.XSize = 4 PaletteColors.YSize = 5 PaletteColors.Colors = ( 16777215 255 65280 16711680 12572607 0 127 32512 8323072 15712159 12566463 65535 16776960 16711935 15726591 8355711 32639 8355584 8323199 10461087) CustomColors.XSize = 8 CustomColors.YSize = 2 CustomColors.Colors = ( 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215) Color = clWindowText OnColorChange = cmbEditorFontsChange end object colbtnWindowColor: TDFSColorButton Left = 252 Top = 95 Width = 48 Height = 21 Hint = 'Selects color of window (background).' HelpContext = 8215 TabOrder = 2 OtherBtnCaption = '&Other' OtherColor = clBtnFace PaletteColors.XSize = 4 PaletteColors.YSize = 5 PaletteColors.Colors = ( 16777215 255 65280 16711680 12572607 0 127 32512 8323072 15712159 12566463 65535 16776960 16711935 15726591 8355711 32639 8355584 8323199 10461087) CustomColors.XSize = 8 CustomColors.YSize = 2 CustomColors.Colors = ( 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215) Color = clWindow OnColorChange = cmbEditorFontsChange end object ckbSplashScreen: TCheckBox Left = 16 Top = 189 Width = 284 Height = 17 Hint = 'Opens FontLister with a startup image.' HelpContext = 8220 Caption = 'Show &SplashScreen at startup' Checked = True State = cbChecked TabOrder = 3 OnClick = cmbEditorFontsChange end object ckbLargeButtons: TCheckBox Left = 16 Top = 214 Width = 284 Height = 17 Hint = 'Uses larger buttons on toolbars.' HelpContext = 8225 Caption = '&Large Toolbar Buttons' TabOrder = 4 OnClick = cmbEditorFontsChange end object ckbAlignListOfFontsAtTop: TCheckBox Left = 16 Top = 239 Width = 284 Height = 17 Hint = 'Aligns listview containing fonts in top of window.' HelpContext = 8230 Caption = 'Al&ign '#39'List Of Fonts'#39' above Edit/Compare windows' TabOrder = 6 OnClick = cmbEditorFontsChange end object colbtnCompareInformal: TDFSColorButton Left = 252 Top = 124 Width = 48 Height = 21 Hint = 'Selects color of fileinfo shown in compare window.' HelpContext = 8235 TabOrder = 5 OtherBtnCaption = '&Other' OtherColor = clBtnFace PaletteColors.XSize = 4 PaletteColors.YSize = 5 PaletteColors.Colors = ( 16777215 255 65280 16711680 12572607 0 127 32512 8323072 15712159 12566463 65535 16776960 16711935 15726591 8355711 32639 8355584 8323199 10461087) CustomColors.XSize = 8 CustomColors.YSize = 2 CustomColors.Colors = ( 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215) Color = clInfoText OnColorChange = cmbEditorFontsChange end end object tbsWMFEMF: TTabSheet Caption = ' WMF/EMF Export ' ImageIndex = 3 object lblDimension: TLabel Left = 10 Top = 8 Width = 48 Height = 13 Caption = 'Dimension' end object Bevel8: TBevel Left = 8 Top = 23 Width = 300 Height = 9 Shape = bsTopLine end object lblDimWidth: TLabel Left = 16 Top = 36 Width = 28 Height = 13 Caption = '&Width' Enabled = False FocusControl = sneWidth Layout = tlCenter end object lblDimHeight: TLabel Left = 203 Top = 36 Width = 31 Height = 13 Caption = '&Height' Enabled = False FocusControl = sneHeight Layout = tlCenter end object lblEMFFontColor: TLabel Left = 16 Top = 126 Width = 56 Height = 13 Caption = '&Foreground' FocusControl = colbtnEMFForeColor Layout = tlCenter end object lblEMFBackgroundColor: TLabel Left = 16 Top = 154 Width = 56 Height = 13 Caption = '&Background' Enabled = False FocusControl = colbtnEMFBackColor Layout = tlCenter end object lblEMFColors: TLabel Left = 10 Top = 96 Width = 30 Height = 13 Caption = 'Colors' end object Bevel9: TBevel Left = 8 Top = 111 Width = 300 Height = 9 Shape = bsTopLine end object sneWidth: TRxSpinEdit Left = 64 Top = 32 Width = 48 Height = 21 Hint = 'Width of generated metafile.' ButtonKind = bkStandard Decimal = 0 MaxValue = 2000.000000000000000000 MinValue = 10.000000000000000000 Value = 100.000000000000000000 Ctl3D = True Enabled = False MaxLength = 4 ParentCtl3D = False TabOrder = 0 OnChange = cmbEditorFontsChange end object sneHeight: TRxSpinEdit Left = 251 Top = 32 Width = 48 Height = 21 Hint = 'Height of generated metafile.' ButtonKind = bkStandard Decimal = 0 MaxValue = 2000.000000000000000000 MinValue = 10.000000000000000000 Value = 100.000000000000000000 Ctl3D = True Enabled = False MaxLength = 4 ParentCtl3D = False TabOrder = 1 OnChange = cmbEditorFontsChange end object colbtnEMFBackColor: TDFSColorButton Left = 252 Top = 151 Width = 48 Height = 21 Hint = 'Color of background used in metafile' Caption = 'colbtnEMFBackColor' Enabled = False TabOrder = 3 OtherBtnCaption = '&Other' OtherColor = clBtnFace PaletteColors.XSize = 4 PaletteColors.YSize = 5 PaletteColors.Colors = ( 16777215 255 65280 16711680 12572607 0 127 32512 8323072 15712159 12566463 65535 16776960 16711935 15726591 8355711 32639 8355584 8323199 10461087) CustomColors.XSize = 8 CustomColors.YSize = 2 CustomColors.Colors = ( 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215) Color = clWindow OnColorChange = cmbEditorFontsChange end object colbtnEMFForeColor: TDFSColorButton Left = 252 Top = 122 Width = 48 Height = 21 Hint = 'Color of font used in metafile.' Caption = 'colbtnEMFForeColor' TabOrder = 2 OtherBtnCaption = '&Other' OtherColor = clBtnFace PaletteColors.XSize = 4 PaletteColors.YSize = 5 PaletteColors.Colors = ( 16777215 255 65280 16711680 12572607 0 127 32512 8323072 15712159 12566463 65535 16776960 16711935 15726591 8355711 32639 8355584 8323199 10461087) CustomColors.XSize = 8 CustomColors.YSize = 2 CustomColors.Colors = ( 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215 16777215) Color = clWindowText OnColorChange = cmbEditorFontsChange end object ckbTransparentBackground: TCheckBox Left = 16 Top = 183 Width = 284 Height = 17 Hint = 'Background in generated metafile will be transparent.' Caption = '&Transparent background' Checked = True State = cbChecked TabOrder = 4 OnClick = ckbTransparentBackgroundClick end object ckbAdjustAutomatically: TCheckBox Left = 16 Top = 63 Width = 284 Height = 17 Hint = 'Dimension of metafile will be calculated.' Caption = '&Adjust automatically using cell dimension' Checked = True State = cbChecked TabOrder = 5 OnClick = ckbAdjustAutomaticallyClick end end object tbsFontCopy: TTabSheet Caption = ' Copy-/Move fonts ' TabVisible = False object Bevel5: TBevel Left = 8 Top = 23 Width = 300 Height = 9 Shape = bsTopLine end object lblFontCopyCaption: TLabel Left = 10 Top = 8 Width = 64 Height = 13 Caption = 'Font Copying' end object tbbBrowse: TToolbarButton97 Left = 275 Top = 103 Width = 22 Height = 21 Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000001000000010000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00AAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAA000000000000AAA8888888888800AAA8F7B7B7B7B 800AA8F7B7B7B7B7080A88FB7B7B7B78000A8FB7B7B7B7B0770A8FFFFFFFFF80 CF70A88888888888FF0AA8FB78FFC7CFF00AA8F7B78FFCFF080AA8FB7B78FFF0 88AAAA8FFFF88F0AAAAAAAA8888AA0AAAAAAAAAAAAAAAAAAAAAA} NoBorder = True OnClick = tbbBrowseClick end object ToolbarButton971: TToolbarButton97 Left = 275 Top = 215 Width = 22 Height = 21 Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000001000000010000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00AAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAA000000000000AAA8888888888800AAA8F7B7B7B7B 800AA8F7B7B7B7B7080A88FB7B7B7B78000A8FB7B7B7B7B0770A8FFFFFFFFF80 CF70A88888888888FF0AA8FB78FFC7CFF00AA8F7B78FFCFF080AA8FB7B78FFF0 88AAAA8FFFF88F0AAAAAAAA8888AA0AAAAAAAAAAAAAAAAAAAAAA} NoBorder = True OnClick = tbbBrowseClick end object lblFontMoving: TLabel Left = 10 Top = 144 Width = 59 Height = 13 Caption = 'Font Moving' end object Bevel6: TBevel Left = 8 Top = 159 Width = 300 Height = 9 Shape = bsTopLine end object lblFontSettingCaption: TLabel Left = 10 Top = 256 Width = 81 Height = 13 Caption = 'Font Overwriting' end object Bevel7: TBevel Left = 8 Top = 271 Width = 300 Height = 9 Shape = bsTopLine end object robCopyClipboard: TRadioButton Left = 16 Top = 33 Width = 249 Height = 17 Hint = 'Copies fonts to Windows Clipboard.' Caption = 'Copy to &Clipboard' Ctl3D = True ParentCtl3D = False TabOrder = 0 TabStop = True end object robAskOnCopy: TRadioButton Left = 16 Top = 58 Width = 249 Height = 17 Hint = 'Asks you where you want to place the copied fonts.' Caption = '&Ask for destination Folder' Checked = True Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 TabStop = True end object robCopyFolder: TRadioButton Left = 16 Top = 83 Width = 249 Height = 17 Hint = 'Copies all fonts to the specified Folder.' Caption = 'Copy to &specific Folder' TabOrder = 2 TabStop = True end object ediCopyFolder: TEdit Left = 40 Top = 103 Width = 230 Height = 21 TabOrder = 3 end object ckbPromptOverwrite: TCheckBox Left = 16 Top = 285 Width = 249 Height = 17 Caption = '&Prompt to overwrite files' Checked = True State = cbChecked TabOrder = 7 end object robAskOnMove: TRadioButton Left = 16 Top = 169 Width = 249 Height = 17 Caption = 'Ask for &destination Folder' TabOrder = 4 end object robMoveFolder: TRadioButton Left = 16 Top = 194 Width = 249 Height = 17 Caption = 'Move to sp&ecific Folder' TabOrder = 5 TabStop = True end object ediMoveFolder: TEdit Left = 40 Top = 215 Width = 230 Height = 21 TabOrder = 6 end end end end object pnlButtons: TPanel Left = 0 Top = 356 Width = 334 Height = 31 Align = alBottom BevelOuter = bvNone BorderWidth = 4 ParentColor = True TabOrder = 1 object btnOK: TCorelButton Left = 95 Top = 4 Width = 75 Height = 23 Hint = 'Apply changes and close dialog.' HelpContext = 8005 Caption = '&OK' Default = True ModalResult = 1 TabOrder = 0 OnClick = btnOKClick end object btnCancel: TCorelButton Left = 175 Top = 4 Width = 75 Height = 23 Hint = 'Close dialog and discard changes.' HelpContext = 8010 Cancel = True Caption = '&Cancel' ModalResult = 2 TabOrder = 1 OnClick = btnCancelClick end object btnApply: TCorelButton Left = 255 Top = 4 Width = 75 Height = 23 Hint = 'Apply changes without closing dialog.' HelpContext = 8015 Caption = '&Apply' TabOrder = 2 OnClick = btnApplyClick end end object BrowseDirectoryDlg: TBrowseDirectoryDlg Title = 'Select destination Folder for Copy/Move Operations' Options = [bfDirectoriesOnly] StatusText = 'C:\WINDOWS\Desktop' Caption = 'Browse for Folder' ShowSelectionInStatus = True OnCreate = BrowseDirectoryDlgCreate Left = 296 Top = 16 end end