object frmConv: TfrmConv Tag = 8 Left = 10 Top = 92 Width = 578 Height = 379 HorzScrollBar.Visible = False VertScrollBar.Visible = False ActiveControl = txtValue Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} KeyPreview = True Menu = mnuMain Position = poDefault ShowHint = True Visible = True OnClose = FormClose OnCreate = FormCreate OnKeyDown = FormKeyDown OnKeyPress = FormKeyPress OnMouseUp = FormMouseUp OnResize = FormResize OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object tabMain: TTabControl Left = 9 Top = 6 Width = 550 Height = 316 MultiLine = True TabIndex = 0 TabOrder = 0 Tabs.Strings = ( 'Length' 'Area' 'Volume' 'Time' 'Mass' 'Liquid' 'Pressure' 'Power' 'Energy' 'Force' 'Density' 'Velocity' 'Acceleration' 'Temperature' 'SI Prefixes') OnChange = tabMainChange object panMain: TPanel Left = 4 Top = 42 Width = 257 Height = 139 BevelOuter = bvNone BevelWidth = 2 ParentColor = True TabOrder = 0 object lblDimension: TLabel Left = 13 Top = 38 Width = 49 Height = 13 Alignment = taRightJustify Caption = '&Dimension' FocusControl = cboDimension Transparent = True OnClick = labelClick end object lblValue: TLabel Left = 37 Top = 14 Width = 27 Height = 13 Alignment = taRightJustify Caption = '&Value' FocusControl = txtValue Transparent = True OnClick = labelClick end object sgrMeas: TStringGrid Left = 7 Top = 71 Width = 240 Height = 57 ColCount = 2 DefaultColWidth = 303 DefaultDrawing = False FixedCols = 0 RowCount = 1 FixedRows = 0 Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] Options = [goVertLine, goHorzLine, goRangeSelect, goDrawFocusSelected, goRowSelect, goThumbTracking] ParentFont = False ScrollBars = ssVertical TabOrder = 2 OnDrawCell = sgrMeasDrawCell end object cboDimension: TComboBox Left = 71 Top = 37 Width = 150 Height = 21 Style = csDropDownList DropDownCount = 20 ItemHeight = 13 TabOrder = 1 OnClick = cboDimensionClick end object txtValue: TEdit Left = 71 Top = 12 Width = 150 Height = 21 MaxLength = 30 TabOrder = 0 OnChange = txtValueChange end end end object mnuMain: TMainMenu Left = 3 object mnuFile: TMenuItem Caption = '&File' ShortCut = 0 OnClick = mnuFileClick object mnuSaveAsText: TMenuItem Caption = 'Save As &Text' ShortCut = 0 OnClick = mnuFileClick end object mnuSaveAsBitmap: TMenuItem Caption = 'Save As &Bitmap' ShortCut = 0 OnClick = mnuFileClick end object N2: TMenuItem Caption = '-' ShortCut = 0 end object mnuPrint: TMenuItem Caption = 'P&rint' ShortCut = 0 OnClick = mnuFileClick end object N4: TMenuItem Caption = '-' ShortCut = 0 end object mnuSetAsWallpaperTiled: TMenuItem Caption = 'Set As &Wallpaper (Tiled)' ShortCut = 0 OnClick = mnuFileClick end object mnuSetAsWallpaperCentered: TMenuItem Caption = 'Set As Wa&llpaper (Centered)' ShortCut = 0 OnClick = mnuFileClick end object N5: TMenuItem Caption = '-' ShortCut = 0 end object mnuExit: TMenuItem Caption = 'E&xit' ShortCut = 0 OnClick = mnuFileClick end end object mnuEdit: TMenuItem Caption = '&Edit' ShortCut = 0 OnClick = mnuEditClick object mnuCut: TMenuItem Caption = 'Cu&t' ShortCut = 16472 OnClick = mnuEditClick end object mnuCopy: TMenuItem Caption = '&Copy' ShortCut = 16451 OnClick = mnuEditClick end object mnuPaste: TMenuItem Caption = '&Paste' ShortCut = 16470 OnClick = mnuEditClick end object N8: TMenuItem Caption = '-' ShortCut = 0 end object mnuSelectAll: TMenuItem Caption = 'Select &All' ShortCut = 0 OnClick = mnuEditClick end end object mnuSetup: TMenuItem Caption = '&Setup' ShortCut = 0 object mnuHorGridlines: TMenuItem Caption = '&Horizontal Gridlines' ShortCut = 0 OnClick = setupChanged end object mnuVerGridlines: TMenuItem Caption = '&Vertical Gridlines' ShortCut = 0 OnClick = setupChanged end object mnuStretched: TMenuItem Caption = '&Stretch Cells Vertically' ShortCut = 0 OnClick = setupChanged end object mnuHideAbout: TMenuItem Caption = 'Hide &About Window on Startup' ShortCut = 0 OnClick = setupChanged end object N3: TMenuItem Caption = '-' ShortCut = 0 end object mnuPrecision: TMenuItem Caption = '&Precision' ShortCut = 0 object mnuScientific: TMenuItem Caption = '&Scientific' ShortCut = 0 OnClick = setupChanged end object mnu0Dec: TMenuItem Caption = '&Integers Only' ShortCut = 0 OnClick = setupChanged end object mnu1Dec: TMenuItem Caption = '&1 Decimal' ShortCut = 0 OnClick = setupChanged end object mnu2Dec: TMenuItem Caption = '&2 Decimals' ShortCut = 0 OnClick = setupChanged end object mnu3Dec: TMenuItem Caption = '&3 Decimals' ShortCut = 0 OnClick = setupChanged end object mnu4Dec: TMenuItem Caption = '&4 Decimals' ShortCut = 0 OnClick = setupChanged end object mnu5Dec: TMenuItem Caption = '&5 Decimals' ShortCut = 0 OnClick = setupChanged end object mnu6Dec: TMenuItem Caption = '&6 Decimals' ShortCut = 0 OnClick = setupChanged end object mnu7Dec: TMenuItem Caption = '&7 Decimals' ShortCut = 0 OnClick = setupChanged end object mnu8Dec: TMenuItem Caption = '&8 Decimals' ShortCut = 0 OnClick = setupChanged end object mnu9Dec: TMenuItem Caption = '&9 Decimals' ShortCut = 0 OnClick = setupChanged end object mnu10Dec: TMenuItem Caption = '10 Decimals' ShortCut = 0 OnClick = setupChanged end object mnu11Dec: TMenuItem Caption = '11 Decimals' ShortCut = 0 OnClick = setupChanged end object mnu12Dec: TMenuItem Caption = '12 Decimals' ShortCut = 0 OnClick = setupChanged end object mnu13Dec: TMenuItem Caption = '13 Decimals' ShortCut = 0 OnClick = setupChanged end end object N7: TMenuItem Caption = '-' ShortCut = 0 end object mnuFont: TMenuItem Caption = '&Font ...' ShortCut = 0 OnClick = setupChanged end end object mnuRegister: TMenuItem Caption = '&Register' ShortCut = 0 object mnuRegistrationForm: TMenuItem Caption = '&Registration Guide' ShortCut = 0 OnClick = mnuRegistrationFormClick end object mnuRegCode: TMenuItem Caption = '&Enter Registration Code' ShortCut = 0 OnClick = mnuRegCodeClick end object mnuExtendTrial: TMenuItem Caption = 'Extend &Trial Period' ShortCut = 0 Visible = False OnClick = mnuExtendTrialClick end end object mnuHelp: TMenuItem Caption = '&Help' ShortCut = 0 object mnuHelpContents: TMenuItem Caption = '&Help' ShortCut = 112 OnClick = mnuHelpContentsClick end object N6: TMenuItem Caption = '-' ShortCut = 0 end object mnuCopyProgram: TMenuItem Caption = '&Copy Program for a Friend' ShortCut = 0 OnClick = mnuCopyProgramClick end object N1: TMenuItem Caption = '-' ShortCut = 0 end object mnuProducts: TMenuItem Caption = '&Latest VulcanSoft Products' ShortCut = 0 OnClick = mnuProductsClick end object mnuAbout: TMenuItem Caption = '&About' ShortCut = 0 OnClick = mnuAboutClick end end end object dlgSave: TSaveDialog FileEditStyle = fsEdit Options = [ofOverwritePrompt, ofHideReadOnly, ofExtensionDifferent, ofPathMustExist, ofNoTestFileCreate] Left = 33 end object dlgFont: TFontDialog Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MinFontSize = 0 MaxFontSize = 0 Left = 63 end end