object Form4: TForm4 Left = 200 Top = 174 Width = 751 Height = 522 Caption = 'All Font Preview' Color = clBtnFace Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Microsoft Sans Serif' Font.Style = [] OldCreateOrder = False OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Panelall: TPanel Left = 0 Top = 0 Width = 743 Height = 495 Align = alClient Caption = 'Panelall' TabOrder = 0 Visible = False object AdvStringGrid1: TAdvStringGrid Left = 1 Top = 1 Width = 741 Height = 493 Cursor = crDefault Align = alClient ColCount = 9 DefaultColWidth = 80 DefaultRowHeight = 80 RowCount = 2 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing] ParentFont = False ScrollBars = ssBoth TabOrder = 0 ActiveCellFont.Charset = DEFAULT_CHARSET ActiveCellFont.Color = clWindowText ActiveCellFont.Height = -13 ActiveCellFont.Name = 'Microsoft Sans Serif' ActiveCellFont.Style = [] ActiveCellColor = clInfoBk EnhRowColMove = False ControlLook.ControlStyle = csClassic HintColor = clYellow SearchFooter.FindNextCaption = 'Find next' SearchFooter.FindPrevCaption = 'Find previous' SearchFooter.Font.Charset = DEFAULT_CHARSET SearchFooter.Font.Color = clWindowText SearchFooter.Font.Height = -11 SearchFooter.Font.Name = 'MS Sans Serif' SearchFooter.Font.Style = [] SearchFooter.HighLightCaption = 'Highlight' SearchFooter.HintClose = 'Close' SearchFooter.HintFindNext = 'Find next occurence' SearchFooter.HintFindPrev = 'Find previous occurence' SearchFooter.HintHighlight = 'Highlight occurences' SearchFooter.MatchCaseCaption = 'Match case' SelectionColor = clHighlight SelectionTextColor = clHighlightText PrintSettings.DateFormat = 'dd/mm/yyyy' PrintSettings.Title = ppTopCenter PrintSettings.TitleLines.Strings = ( 'TAdvStringGrid image catalogue') PrintSettings.Font.Charset = DEFAULT_CHARSET PrintSettings.Font.Color = clWindowText PrintSettings.Font.Height = -11 PrintSettings.Font.Name = 'MS Sans Serif' PrintSettings.Font.Style = [] PrintSettings.FixedFont.Charset = DEFAULT_CHARSET PrintSettings.FixedFont.Color = clWindowText PrintSettings.FixedFont.Height = -11 PrintSettings.FixedFont.Name = 'MS Sans Serif' PrintSettings.FixedFont.Style = [] PrintSettings.HeaderFont.Charset = DEFAULT_CHARSET PrintSettings.HeaderFont.Color = clWindowText PrintSettings.HeaderFont.Height = -11 PrintSettings.HeaderFont.Name = 'MS Sans Serif' PrintSettings.HeaderFont.Style = [] PrintSettings.FooterFont.Charset = DEFAULT_CHARSET PrintSettings.FooterFont.Color = clWindowText PrintSettings.FooterFont.Height = -11 PrintSettings.FooterFont.Name = 'MS Sans Serif' PrintSettings.FooterFont.Style = [] PrintSettings.PageNumSep = '/' PrintSettings.PrintGraphics = True CellNode.ShowTree = False MouseActions.AllColumnSize = True MouseActions.AllRowSize = True ScrollWidth = 16 FixedColWidth = 8 FixedRowHeight = 8 FixedFont.Charset = DEFAULT_CHARSET FixedFont.Color = clWindowText FixedFont.Height = -11 FixedFont.Name = 'MS Sans Serif' FixedFont.Style = [] FloatFormat = '%.2f' Filter = <> Version = '3.3.2.9' ColWidths = ( 8 80 80 80 80 80 80 80 80) RowHeights = ( 8 80) end end object Panelsingal: TPanel Left = 0 Top = 0 Width = 743 Height = 495 Align = alClient BevelOuter = bvNone Ctl3D = True ParentCtl3D = False TabOrder = 1 Visible = False object Panel1: TPanel Left = 0 Top = 0 Width = 743 Height = 49 Align = alTop BevelOuter = bvNone TabOrder = 0 object Label2: TLabel Left = 6 Top = 9 Width = 27 Height = 13 Caption = 'Zoom' end object Label1: TLabel Left = 90 Top = 8 Width = 24 Height = 13 Caption = 'Input' end object ComboBox1: TComboBox Left = 35 Top = 4 Width = 51 Height = 21 Style = csDropDownList ItemHeight = 13 ItemIndex = 2 TabOrder = 0 Text = '8*8' OnChange = ComboBox1Change Items.Strings = ( '1*1' '5*5' '8*8' '12*12') end object Button1: TButton Left = 312 Top = 11 Width = 77 Height = 21 Caption = 'Preview' TabOrder = 1 OnClick = Button1Click end object Memo1: TMemo Left = 120 Top = 3 Width = 185 Height = 42 TabOrder = 2 end end object AdvStringGrid2: TAdvStringGrid Left = 296 Top = 143 Width = 454 Height = 312 Cursor = crDefault ColCount = 1 Ctl3D = True DefaultColWidth = 8 DefaultRowHeight = 8 FixedCols = 0 RowCount = 1 FixedRows = 0 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing] ParentCtl3D = False ParentFont = False ScrollBars = ssBoth TabOrder = 1 ActiveCellFont.Charset = DEFAULT_CHARSET ActiveCellFont.Color = clWindowText ActiveCellFont.Height = -13 ActiveCellFont.Name = 'Microsoft Sans Serif' ActiveCellFont.Style = [] ActiveCellColor = clInfoBk EnhRowColMove = False ControlLook.ControlStyle = csClassic HintColor = clYellow SearchFooter.FindNextCaption = 'Find next' SearchFooter.FindPrevCaption = 'Find previous' SearchFooter.Font.Charset = DEFAULT_CHARSET SearchFooter.Font.Color = clWindowText SearchFooter.Font.Height = -11 SearchFooter.Font.Name = 'MS Sans Serif' SearchFooter.Font.Style = [] SearchFooter.HighLightCaption = 'Highlight' SearchFooter.HintClose = 'Close' SearchFooter.HintFindNext = 'Find next occurence' SearchFooter.HintFindPrev = 'Find previous occurence' SearchFooter.HintHighlight = 'Highlight occurences' SearchFooter.MatchCaseCaption = 'Match case' SelectionColor = clHighlight SelectionTextColor = clHighlightText PrintSettings.DateFormat = 'dd/mm/yyyy' PrintSettings.Title = ppTopCenter PrintSettings.TitleLines.Strings = ( 'TAdvStringGrid image catalogue') PrintSettings.Font.Charset = DEFAULT_CHARSET PrintSettings.Font.Color = clWindowText PrintSettings.Font.Height = -11 PrintSettings.Font.Name = 'MS Sans Serif' PrintSettings.Font.Style = [] PrintSettings.FixedFont.Charset = DEFAULT_CHARSET PrintSettings.FixedFont.Color = clWindowText PrintSettings.FixedFont.Height = -11 PrintSettings.FixedFont.Name = 'MS Sans Serif' PrintSettings.FixedFont.Style = [] PrintSettings.HeaderFont.Charset = DEFAULT_CHARSET PrintSettings.HeaderFont.Color = clWindowText PrintSettings.HeaderFont.Height = -11 PrintSettings.HeaderFont.Name = 'MS Sans Serif' PrintSettings.HeaderFont.Style = [] PrintSettings.FooterFont.Charset = DEFAULT_CHARSET PrintSettings.FooterFont.Color = clWindowText PrintSettings.FooterFont.Height = -11 PrintSettings.FooterFont.Name = 'MS Sans Serif' PrintSettings.FooterFont.Style = [] PrintSettings.PageNumSep = '/' PrintSettings.PrintGraphics = True CellNode.ShowTree = False MouseActions.AllColumnSize = True MouseActions.AllRowSize = True ScrollWidth = 16 FixedColWidth = 8 FixedRowHeight = 8 FixedFont.Charset = DEFAULT_CHARSET FixedFont.Color = clWindowText FixedFont.Height = -11 FixedFont.Name = 'MS Sans Serif' FixedFont.Style = [] FloatFormat = '%.2f' ShowSelection = False Filter = <> Version = '3.3.2.9' end object ScrollBox1: TScrollBox Left = 0 Top = 49 Width = 743 Height = 446 Align = alClient BevelInner = bvNone BevelOuter = bvNone Ctl3D = False ParentCtl3D = False TabOrder = 2 object Image1: TImage Left = 1 Top = 1 Width = 105 Height = 86 end end end end